vb.net 数组参与SQL语句的查询范例

　　首先定义数组，我是同事session传值的

复制代码代码如下:

　　Dim struser As New List(Of String)

　　struser = Session("chooseuser")

　　strruser = ""

　　For a = 0 To struser.Count - 1

　　If a = 0 Then

　　strruser = "'" & struser.Item(a).ToString.Trim & "'"

　　Else

　　strruser = strruser & " , " & "'" & struser.Item(a).ToString.Trim & "'"

　　End If