Foxtable(狐表)用户栏目专家坐堂 → 怎样将CheckedComboBox下拉的栏目全选或全清


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

主题:怎样将CheckedComboBox下拉的栏目全选或全清

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/27 14:14:00 [显示全部帖子]

需要另外再加按钮处理“全选”或者“全不选”

“全选”
Dim cmb As WinForm.CheckedComboBox
cmb = Forms(
"窗口1").Controls("CheckedComboBox1")
cmb.text = cmb.ComboList.replace("|",",")

“全不选”:
Dim cmb As WinForm.CheckedComboBox
cmb = Forms(
"窗口1").Controls("CheckedComboBox1")
cmb.text = nothing

 回到顶部