当代码红色部分 为如下时vals(i) 可以正常起作用
Dim Vals As List(of String)
Vals = DataTables("干警信息").sqlGetValues("姓名",filter )
vals(i)
当代码为以下代码时,怎么使用vals集合0.1的值呢?对应的vals(i) 该怎么写呢?
If br("信息内容") <>"" Then
Dim Vals As List(of String())
If br("发送人员") <>"" Then
Dim filter As String = "1=2"
For Each s As String In br("发送人员").split(",")
filter = filter & " or [姓名] like '%" & s & "%' "
Next
Vals = DataTables("干警信息").sqlGetValues("姓名|身份属性",filter )
End If
For i As Integer = 0 To Vals.Count - 1
Dim dr0 As DataRow = DataTables("信息模板").sqlfind("操作单位='" & _usergroup & "' And 信息类别 = '" & br("信息类别") & "'" )
Dim dr As DataRow = DataTables("告知内容").sqlfind("信息内容 = '" & br("信息内容") & "'and 操作单位 = '" & _usergroup & "' and 姓名 = '" & vals(i) & "'")
If dr Is Nothing Then
dr = DataTables("告知内容").AddNew()
dr("信息时间") = Date.Now
dr("姓名") = Vals(i)
dr("身份属性")= Vals(?)
身份属性该怎么获取集合值显示呢?
[此贴子已经被作者于2020/3/28 14:22:21编辑过]