Foxtable(狐表)用户栏目专家坐堂 → 复合组合框下拉项目的问题


  共有4393人关注过本帖树形打印复制链接

主题:复合组合框下拉项目的问题

帅哥哟,离线,有人找我吗?
pcxjxjhkw
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
复合组合框下拉项目的问题  发帖心情 Post By:2014/2/17 18:43:00 [只看该作者]

一复合组合框 绑定“姓名”列,组合框的下拉项目又来源于“姓名”列,如何得到不重复项?

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目23.table

如:

姓名

张三,李四

张三,李四,王五

赵六,李四

 

 

想得到的下拉项目:张三|李四|王五|赵六

[此贴子已经被作者于2014-2-17 18:44:47编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
e-png
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1695 积分:10725 威望:0 精华:0 注册:2009/10/25 16:45:00
  发帖心情 Post By:2014/2/17 19:03:00 [只看该作者]

单独做一个人名表吧,不然很麻烦的。

 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4759 积分:34603 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2014/2/17 19:06:00 [只看该作者]

Dim s1,s2 As String
s1 = DataTables("表A").GetComboListString("姓名")
s2 = ""
s1 = s1.Replace("|",",").TrimStart(",")
For Each s As String In s1.Split(",")
    If s2.Contains(s & "|") = False
        s2 += s & "|"
    End If
Next
e.Sender.ComboList = s2

 回到顶部
帅哥哟,离线,有人找我吗?
pcxjxjhkw
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
  发帖心情 Post By:2014/2/17 19:16:00 [只看该作者]

谢谢 图片点击可在新窗口打开查看
y2287958

 回到顶部