Foxtable(狐表)用户栏目专家坐堂 → GetComboListString


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

主题:GetComboListString

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


加好友 发短信 好心情 一级勋章
等级:超级版主 帖子:715 积分:5564 威望:0 精华:1 注册:2008/8/31 20:45:00
GetComboListString  发帖心情 Post By:2008/11/22 13:44:00 [只看该作者]

 

GetComboListString

从指定的列中提取不重复的值,用符号"|"将这些值连接成一个字符串,并返回这个字符串。

此方法通常用于动态设置列表项目。

语法:

GetComboListString(ColumnNameFilter)

    ColumnName:列名称
Filter:
     可选参数,指定一个条件表达式,只返回符合此条件的值。请参考表达式的运算符和函数

示例,设置订单表产品列的列表项目:

Tables("订单").Cols("产品").ComboList = DataTables("订单").GetComboListString("产品")

也可以设置条件,例如,从客户表中提取华中地区的客户名单:

Output.Show(DataTables("客户").GetComboListString("客户名称","[地区] = '华北'"))

这样可以大大简化设计列表项目代码

[此贴子已经被作者于2008-11-22 18:34:33编辑过]

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


加好友 发短信
等级:贵宾 帖子:102 积分:880 威望:0 精华:4 注册:2008/8/31 21:47:00
  发帖心情 Post By:2008/11/22 15:55:00 [只看该作者]

顶。将简化进行到底。
再举例比较以下的前后应用,非常节约命令行数,达到1:6或1:7。

e.Form.Controls("ComboBox1").Combolist =DataTables("A表").getcomboliststring("分类")  一条语句相当于以下六条:
Dim Items As String
Dim lst As List(Of String) = DataTables("A表").GetuniqueValues("","分类")
For Each Item As String In Lst
      Items = Items & "|" & Item
Next
e.Form.Controls("ComboBox1").ComboList = Items

e.Form.Controls("ComboBox2").Combolist=DataTables("A表").getcomboliststring("名称","[分类]='" & e.Form.Controls("ComboBox1").value & "'" )   一条语句相当于以下七条:
Dim drs As New List(Of string)  '字符串集合
drs = DataTables("A表").GetUniqueValues("[分类]='" & e.Form.Controls("ComboBox1").value & "'" , "名称")
Dim Val AS String        
For Each dr As string In drs    
   Val = Val & "|" & dr
Next
e.Form.Controls("ComboBox2").Combolist = Val


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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12999 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2008/11/22 16:14:00 [只看该作者]

顶!经试验效率很好,只是不明白帮助里只有GetUniqueValues而没有GetComboListString,怕就怕会有什么副作用,就象表达式里可用Not in(副作用是效率非常低),但帮助只介绍In一样.

[此贴子已经被作者于2008-11-22 16:14:35编辑过]

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


加好友 发短信 F6
等级:狐精 帖子:3036 积分:19229 威望:0 精华:2 注册:2008/9/1 7:50:00
  发帖心情 Post By:2008/11/22 16:16:00 [只看该作者]

好东西,顶一下

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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33963 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2008/11/22 17:18:00 [只看该作者]

顶一个。

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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33963 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2008/11/22 17:20:00 [只看该作者]

以下是引用don在2008-11-22 16:14:00的发言:

顶!经试验效率很好,只是不明白帮助里只有GetUniqueValues而没有GetComboListString,怕就怕会有什么副作用,就象表达式里可用Not in(副作用是效率非常低),但帮助只介绍In一样.

[此贴子已经被作者于2008-11-22 16:14:35编辑过]


不会有副作用的,GetComboListString说明只是现在的帮助中还没加入。


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


加好友 发短信
等级:四尾狐 帖子:781 积分:9870 威望:0 精华:0 注册:2008/9/1 13:47:00
  发帖心情 Post By:2008/11/22 17:25:00 [只看该作者]

用户已被锁定

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


加好友 发短信 一级勋章
等级:超级版主 帖子:7258 积分:40773 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2008/11/22 17:32:00 [只看该作者]

好东西,来迟了也要强顶!


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


加好友 发短信
等级:幼狐 帖子:59 积分:741 威望:0 精华:0 注册:2008/9/1 16:54:00
  发帖心情 Post By:2008/11/22 17:45:00 [只看该作者]

收藏了

 回到顶部