自定义函数中的语法错误

Question

我在以下代码的第一行遇到语法错误。我正在使用 array function parameters as shown in MSDN。从 String() 中删除括号 后，错误消失，但我需要一个字符串数组。 到目前为止我的代码：

Private Function Contains(name As String, names As String()) As Boolean
Contains = False

Dim Index As Integer
For Index = 0 To names.GetUpperBound(0)
    If names(Index) = name Then
        Contains = True
        Exit For
    End If
Next
End Function

Answer 1

试试这个。

Private Function Contains(name As String, names() As String) As Boolean

或

Private Function Contains(name As String, ByRef names() As String) As Boolean

看你需要什么。

Answer 2

数组的括号应该放在变量名之后，而不是类型之后：

names() as String

而不是

names as String()

顺便说一句：name 和 names 不是很好用的变量名！描述性最好一点。