Vb6 VB类型不匹配'；返回'；

我想使用一个函数来返回一个字符串，但是，我一直得到一个类型不匹配的“return”错误

任何帮助都将不胜感激

Dim myvar
myvar = getMultiLineString()
MsgBox(myvar)

Function getMultiLineString()

    Dim a(3)
    Dim i
    Dim query

    a(1)   = "test line 1"
    a(2)   = "test line 2"
    a(3)   = "test line 3"

    query = a(1)

    For i=2 to 3
        query = query & VbCrLf &  a(i)
    next

    MsgBox(query)
    Return query

End Function

而不是

Return query

您可以使用“函数的名称=值它应该返回”：

---

那很有效，谢谢你！你能解释一下为什么原来的语法不起作用吗？或者，您能否解释一下，是否有一个选项可以使用“return”方法实现相同的功能？您的代码似乎是真正的vbscript，它没有return语句。VB6可以。

getMultiLineString = query