Foxtable(狐表)用户栏目专家坐堂 → 复选组合框能不能做动态筛选?


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

主题:复选组合框能不能做动态筛选?

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


加好友 发短信
等级:幼狐 帖子:190 积分:1445 威望:0 精华:0 注册:2011/6/17 6:33:00
复选组合框能不能做动态筛选?  发帖心情 Post By:2011/11/28 14:16:00 [只看该作者]

如果是简单的组合框的话,没问题的

Dim cmb As WinForm.ComboBox = e.Sender
Dim str As String = e.Form.Controls("ComboBox3").Value
cmb.ComboList = DataTables("杂项").GetComboListString("二级单位", "一级单位= '" & str & "'")

 

 

但是要用复选组合框,这样就无效了~~

就是复选组合框根据前一个组合框的内容改变列表


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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57634 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2011/11/28 14:33:00 [只看该作者]

Dim str As String = e.Form.Controls("ComboBox4").Value  '另外一个组合框的值
e.sender.ComboList = DataTables("杂项").GetComboListString("二级单位", "一级单位= '" & str & "'")

 

这个代码放在enter执行

 


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/11/28 14:56:00 [只看该作者]


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


加好友 发短信
等级:幼狐 帖子:190 积分:1445 威望:0 精华:0 注册:2011/6/17 6:33:00
  发帖心情 Post By:2011/11/28 14:57:00 [只看该作者]

果断不对啊。。这是普通组合框的吧

 

我要动态筛选的是复选组合框CheckedComboBox


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/11/28 15:00:00 [只看该作者]

道理一样,没有差别的,将组合框的值拆分成单个的值,合成筛选条件。

搞不定,就做例子,泛泛而问,也只能泛泛而答。

 


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


加好友 发短信
等级:幼狐 帖子:190 积分:1445 威望:0 精华:0 注册:2011/6/17 6:33:00
  发帖心情 Post By:2011/11/28 15:19:00 [只看该作者]

抱歉,按照组合框的方式做不出来。

新建了个例子,求助。

 

目标是:

根据部门不同,复选组合框内出现的是不同部门的员工

 

感谢

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:复选组合框.table


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


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

参与部门控件SelectedIndexChanged事件代码:


e.Form.Controls("CheckedComboBox1").ComboList = DataTables("表A").GetComboListString("员工","[部门] = '" & e.Sender.Value & "'")


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/11/28 15:36:00 [只看该作者]

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


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


加好友 发短信
等级:幼狐 帖子:190 积分:1445 威望:0 精华:0 注册:2011/6/17 6:33:00
  发帖心情 Post By:2011/11/28 15:44:00 [只看该作者]

老大你是不是传错了。。。。这里面那个复选框直接都被删了。。。


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


加好友 发短信
等级:幼狐 帖子:190 积分:1445 威望:0 精华:0 注册:2011/6/17 6:33:00
  发帖心情 Post By:2011/11/28 15:49:00 [只看该作者]

以下是引用czy在2011-11-28 15:34:00的发言:

参与部门控件SelectedIndexChanged事件代码:


e.Form.Controls("CheckedComboBox1").ComboList = DataTables("表A").GetComboListString("员工","[部门] = '" & e.Sender.Value & "'")

 

不行额,直接报错了


 回到顶部
总数 15 1 2 下一页