以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  多选框  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69526)

--  作者:yongxuanchen
--  发布时间:2015/6/6 16:46:00
--  多选框

    你好,我在窗口中使用了多选框控件,没有绑定列,但利用代码作为判读改变某行内容。现在我遇到的问题是,当我进行

连续操作时,勾选了一个多选框,完成了一次操作,当我选其他行时,窗口中的多选框一直保持选中状态,使我连续操作不方便。

    现需要完成以下效果:

    当操作完一行后,改变选中行,在不改变结果的情况下,多选框自动复位。


--  作者:Bin
--  发布时间:2015/6/6 16:48:00
--  
在CurrentChanged 事件 为 这个控件赋值为当前行的值
--  作者:yongxuanchen
--  发布时间:2015/6/6 18:23:00
--  代码
    能不能举一个代码的例子
--  作者:狐狸爸爸
--  发布时间:2015/6/6 20:39:00
--  
你说的多选框是什么? CheckedBox? 还是CheckedComboBox? 还是CheckedListBox?
描述问题要尽量准确一些。

如果是CheckedBox,设置表的CurrentChange事件:

if Forms("窗口名").Opend then
Forms("窗口名").Controls("CheckBox1").Checked = False
Forms("窗口名").Controls("CheckBox2").Checked = False
Forms("窗口名").Controls("CheckBox3").Checked = False
End if





--  作者:yongxuanchen
--  发布时间:2015/6/6 22:24:00
--  编译错误
提示opend不是winform.form的成员。谢谢!
--  作者:大红袍
--  发布时间:2015/6/7 9:58:00
--  

If Forms("窗口名").Opened Then
    Forms("窗口名").Controls("CheckBox1").Checked = False
    Forms("窗口名").Controls("CheckBox2").Checked = False
    Forms("窗口名").Controls("CheckBox3").Checked = False
End If