- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 获取分组名称的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=23212)
-- 发布时间：2012/9/5 20:40:00
-- 获取分组名称的问题
If e.Col.Name = "分组" Then
Dim s As String
For Each us As UserInfo In Users
s = s & "|" & us.Group
Next
e.Col.Combolist = s
End If
项目内,已经定义了三个分组.分别是:销售部,采购部,生产部.
同时也定义了4个用户名,分别是 A,B,C,D 4个用户.
销售部:A,B
采购部:C
生产部:D
此时,在下拉列显示的是:二个销售部,一个采购部,一个生产部.
而不是获取不重复的分组名称
-- 发布时间：2012/9/5 21:30:00
--
If e.Col.Name = "分组" Then
Dim s As String
For Each us As UserInfo In Users
If s.IndexOf(us.group) < 0 Then
s = s & "|" & us.Group
End If
Next
e.Col.Combolist = s
End If
-- 发布时间：2012/9/5 21:45:00
--
狐爸,这代码出错呢.
此主题相关图片如下：qq截图20120905214155.jpg
-- 发布时间：2012/9/5 22:10:00
--
If e.Col.Name = "分组" Then
Dim s As String
For Each us As UserInfo In Users
If s = "" OrElse s.IndexOf(us.group) < 0 Then
s = s & "|" & us.Group
End If
Next
e.Col.Combolist = s
End If