以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助】代码如何编写  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=69306)
--  作者：吾家细草
--  发布时间：2015/6/2 19:11:00
--  [求助】代码如何编写

项目结构如下

表格A有a,b,c三列，a,b列为字符列，c列为逻辑列。

建立窗口B，有复选框1，组合框1，组合框2三个控件。

想实现以下功能，当选择复选框1后，将组合框1的内容输入到a列，组合框2的内容输入到b列，c列同步变为选择。

请教老师改如何编辑复选框1的代码？

 

 

新手不会发图请包涵。
--  作者：大红袍
--  发布时间：2015/6/2 20:28:00
--  

CheckedChanged事件

 

If e.Sender.Checked Then
    Dim cr As Row = Tables("表A").Current
    cr("第二列") = e.Form.Controls("ComboBox1").Text
    cr("第三列") = e.Form.Controls("ComboBox2").Text
    cr("第四列") = True
End If
--  作者：吾家细草
--  发布时间：2015/6/2 21:47:00
--  

谢谢。

如何复选框的“选中状态”和“未选择状态”作为判断依据来执行不同指令？

可以用这种方式吗

if e.Form.Controls("CheckBox3") = true  Then

*****执行指令1

Else

*****执行指令2

end if

 

用那种事件呢？
--  作者：狐狸爸爸
--  发布时间：2015/6/2 22:12:00
--  
参考：
http://www.foxtable.com/help/topics/0777.htm