主题：[求助]循坏变量的问题

Dim ndx As Table = Tables("E1生产发料单_ndx")
For Each dr As Row In detail.Rows
    Dim Colsa() As String = {"usercode"}
    Dim filter As String
    For i As Integer = 0 To Colsa.Length-1
            If filter = "" Then
                filter = Colsa(i) & " = '" & dr(Colsa(i)) & "'"
            Else
                filter =filter & " and " & Colsa(i) & " = '" & dr(Colsa(i)) & "'"
            End If
    Next
    MessageBox.show("提示 " & filter)

Dim filter As String