求助:复选组合框单个值时可以模糊进行查找筛选,多个值时就不执行
发送对象是复选组合框,有多个值可选 如:党员,院领导,中层干部等
备注是复选组合框,也可以选择多个值,如:党员,院领导,中层干部等
此主题相关图片如下:11.png
上图是单个值时,系统可以根据信息内容变化后,自动生成对应的值此主题相关图片如下:22.png
上图是多个值时,系统不根据信息内容变化后,自动生成对应的值,系统无动作
疑是 红色部分代码有问题 麻烦各位老师指导一下 谢谢
党建业务 表中代码如下:
Select Case e.DataCol.Name
Case "信息内容"
If e.DataRow("信息内容") IsNot Nothing Then
Dim Vals As List(of String)
Vals = DataTables("干警信息").GetValues("姓名","[备注] like '%" & e.DataRow("发送对象").Replace(",","") & "%'" )
For i As Integer = 0 To Vals.Count - 1
Dim dr As DataRow = DataTables("告知内容").AddNew()
dr("信息时间") = Date.Now
dr("姓名") = Vals(i)
dr("信息内容")=e.DataRow("信息内容")
dr("是否告知")= "否"
dr("注意事项")= e.DataRow("注意事项")
Next
End If
End Select
[此贴子已经被作者于2019/2/19 14:26:12编辑过]