各位老师好,一个基础的问题研究半天了没有弄会,来请教各位大虾:
此主题相关图片如下:代码图.jpg
想实现:除VIP客户之外的其他的客户来源(不是VIP客户,如美容美发、培训公司等)如果有VIP客户的电话号码,则在 是否是VIP 列打勾。
If e.DataCol.Name = "VIP电话" Then
Dim VIPS As List(Of String)
VIPS = DataTables("VIP基本信息").GetValues("VIP电话","[客户来源]= 'VIP客户' ")
For Each r As Row In Tables("VIP基本信息").Rows
' If r("VIP电话") In VIPS 就是想在这里判断是不是有包含在VIPS这个集合里,不知道怎么写
r("是否是VIP") = True
' End If
Next
End If
[此贴子已经被作者于2014-6-23 17:27:38编辑过]