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


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

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

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


加好友 发短信
等级:狐神 帖子:4633 积分:33809 威望: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

 回到顶部