以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]CheckedComboBox全选 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=70236)
|
-- 作者:307587760
-- 发布时间:2015/6/17 16:31:00
-- [求助]CheckedComboBox全选
请问老师怎么能够让CheckedComboBox做到全选呢?有些情况可能需要选择全选,列表项目又太多,一个个打勾是不是很累 此主题相关图片如下:qq截图20150617163156.png
|
-- 作者:lsy
-- 发布时间:2015/6/17 16:39:00
--
DoubleClick
e.Sender.Value = e.Sender.ComboList.Replace("|",",")
|
-- 作者:307587760
-- 发布时间: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
-- 发布时间:2015/6/17 16:55:00
--
建议用下拉窗口
|
-- 作者:307587760
-- 发布时间:2015/6/17 17:03:00
--
LSY 老师你好:我把你所说的代码放在了SelectedIndexChanged里面起作用了,但是只是文本框里面有作用,下拉框中的数据并没有勾选上,求指教此主题相关图片如下:dropdownlist.png
|
-- 作者:lsy
-- 发布时间: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
-- 发布时间:2015/6/17 17:12:00
--
LSY老师:貌似还是行不通哦,没有反应的
|
-- 作者:307587760
-- 发布时间:2015/6/17 17:14:00
--
请教:文本值发生变化后能否刷新下拉框呢,如果能刷新估计勾就自动打上了
|
-- 作者:Bin
-- 发布时间:2015/6/17 17:14:00
--
额外增加一个全选按钮
e.form.controls("CheckedComboBox1").Value = e.form.controls("CheckedComboBox1").ComboList.Replace("选择所有","").Replace("|",",").Trim(",")
|
-- 作者:lsy
-- 发布时间:2015/6/17 17:15:00
--
行的啊:
此主题相关图片如下:qq截图20150617171500.jpg
|