以下代码在返回语句后显示错误
Private Sub Command1_Click()
Dim str As String
str = display("test")
MsgBox (str)
End Sub
Public Function display(s As String) As String
s = "updated"
Return s
End Function
提前致谢
答案 0 :(得分:1)
更改显示功能。区别在于,在vb6函数中,返回的值不是 return ,而是使用它的名称(在本例中为 display ),如下所示。
Public Function display(s As String) As String
s = "updated"
display = s
End Function