Foxtable(狐表)用户栏目专家坐堂 → [求助]]请教复选框的问题


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

主题:[求助]]请教复选框的问题

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


加好友 发短信
等级:幼狐 帖子:90 积分:1057 威望:0 精华:0 注册:2013/1/2 19:17:00
[求助]]请教复选框的问题  发帖心情 Post By:2013/3/1 2:47:00 [只看该作者]

父表中行的复选框选中后,自动选中关联表中的所有行的复选框

 

请问这代码应该怎么写


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


加好友 发短信
等级:婴狐 帖子:89 积分:535 威望:0 精华:0 注册:2013/2/23 20:06:00
  发帖心情 Post By:2013/3/1 8:02:00 [只看该作者]

父表的DataColChanged事件:
 
For Each dr As DataRow In e.DataRow.GetChildRows("子表名称")
    dr("逻辑列名称") = True
Next

 

参考:

http://www.foxtable.com/help/topics/2649.htm

 


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


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

不论两表是否关联,只要B表的某一列与A表的某一列类型相同,且是多对一的关系,因为不一定要复选B表中的所有行,最好加上条件判断:

在A表的AfterCheckRow事件中,代码如下:

For Each r As Row In Tables("B表").Rows
    If r("编号") = e.Row("编号") Then
        r.Checked = e.Row.Checked
    Else
        Continue For
    End If
Next

[此贴子已经被作者于2013-3-1 8:27:17编辑过]

 回到顶部