- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 集合、遍历问题。。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=52813)
-- 发布时间：2014/6/23 17:25:00
-- 集合、遍历问题。。
各位老师好，一个基础的问题研究半天了没有弄会，来请教各位大虾：
此主题相关图片如下：代码图.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编辑过]
-- 发布时间：2014/6/23 17:33:00
--
if VIPS .Contains(r("VIP电话") ) then
-- 发布时间：2014/6/23 17:34:00
--
嗯嗯。可以啊！谢谢Bin老师！！
[此贴子已经被作者于2014-6-23 17:36:26编辑过]