首先定义数组,我是同事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 Next
然后就可以吧strruser带入到sql语句中使用。 |