主题：判断数组包含

有没有直接判断一个数组是否包含一个数，不要用FOR NEXT.谢谢

要不你使用LIST集合 有个Contains 方法

好的，谢谢

请大侠帮忙看下红色的判断不了，要如何写了？

Dim gg As WinForm.ComboBox = e.Form.Controls("ComboBox1")
If gg.text<> "" Then
    Dim trv1 As WinForm.TreeView = e.Form.Controls("TreeView1")
    For Each cc As WinForm.TreeNode In trv1.AllNodes
        Dim dr As DataRow
        dr = DataTables("目录树").find("[目录] = '" & cc.text & "'")
        Dim v1() As String = dr("姓名").Split(",")
        Dim hh As New List(Of String)
        hh.AddRange(v1) 
        If cc.Checked = True Then              
            If hh.Contains(cc.text)= False Then
                If dr("姓名")= Nothing Then
                    dr("姓名")= gg.text & ","
                Else
                    dr("姓名")= dr("姓名") & gg.text & ","
                End If
            End If
        End If
    Next
End If

晓的了，谢谢

 还有个简单的方法，数组有个IndexOf（“**”）属性用来返回括号中字符在数组中的位置，如果位置返回为-1就是没有。