Foxtable(狐表)用户栏目专家坐堂 → [求助]CheckedComboBox全选


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

主题:[求助]CheckedComboBox全选

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


加好友 发短信
等级:幼狐 帖子:134 积分:1037 威望:0 精华:0 注册:2014/12/15 10:51:00
[求助]CheckedComboBox全选  发帖心情 Post By:2015/6/17 16:31:00 [只看该作者]

请问老师怎么能够让CheckedComboBox做到全选呢?有些情况可能需要选择全选,列表项目又太多,一个个打勾是不是很累
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150617163156.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/6/17 16:39:00 [只看该作者]

DoubleClick

e.Sender.Value = e.Sender.ComboList.Replace("|",",")

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


加好友 发短信
等级:幼狐 帖子:134 积分:1037 威望:0 精华:0 注册:2014/12/15 10:51:00
  发帖心情 Post By:2015/6/17 16:55:00 [只看该作者]

请问lsy老师我的DoubleClick代码这样写正确么?怎么没有效果啊
If e.Sender.SelectedItem="选择所有" Then
e.Sender.Value = e.Sender.ComboList.Replace("|",",")
End If
[此贴子已经被作者于2015/6/17 16:55:05编辑过]

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


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

建议用下拉窗口

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


加好友 发短信
等级:幼狐 帖子:134 积分:1037 威望:0 精华:0 注册:2014/12/15 10:51:00
  发帖心情 Post By:2015/6/17 17:03:00 [只看该作者]

LSY 老师你好:我把你所说的代码放在了SelectedIndexChanged里面起作用了,但是只是文本框里面有作用,下拉框中的数据并没有勾选上,求指教

图片点击可在新窗口打开查看此主题相关图片如下:dropdownlist.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/6/17 17:06:00 [只看该作者]

TextChanged

If e.Sender.Text.Contains("选择所有") Then
    e.Sender.Value = e.Sender.ComboList.Replace("选择所有","").Replace("|",",").Trim(",")
End If
[此贴子已经被作者于2015/6/17 17:08:06编辑过]

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


加好友 发短信
等级:幼狐 帖子:134 积分:1037 威望:0 精华:0 注册:2014/12/15 10:51:00
  发帖心情 Post By:2015/6/17 17:12:00 [只看该作者]

LSY老师:貌似还是行不通哦,没有反应的

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


加好友 发短信
等级:幼狐 帖子:134 积分:1037 威望:0 精华:0 注册:2014/12/15 10:51:00
  发帖心情 Post By:2015/6/17 17:14:00 [只看该作者]

请教:文本值发生变化后能否刷新下拉框呢,如果能刷新估计勾就自动打上了

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/6/17 17:14:00 [只看该作者]

额外增加一个全选按钮

e.form.controls("CheckedComboBox1").Value = e.form.controls("CheckedComboBox1").ComboList.Replace("选择所有","").Replace("|",",").Trim(",")

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/6/17 17:15:00 [只看该作者]

行的啊:


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150617171500.jpg
图片点击可在新窗口打开查看


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