Foxtable(狐表)用户栏目专家坐堂 → 请教:tab control 页面集合的用法


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

主题:请教:tab control 页面集合的用法

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


加好友 发短信
等级:幼狐 帖子:187 积分:1987 威望:0 精华:0 注册:2017/1/21 16:12:00
请教:tab control 页面集合的用法  发帖心情 Post By:2017/8/7 23:41:00 [只看该作者]

本人想给患者信息设计一个登记系统, 信息包括,基本信息、治疗信息、随访信息、实验室检查信息 总之好几个表。想使用页面集合的控件,弄一个录入窗口,请问怎么搞?我想说的意思是,这些个分页的信息,都是同一个患者的。怎么才能把这些个分页的信息联结在一起表示同一个人的信息。?

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/8/8 8:51:00 [只看该作者]

 方法一:直接写代码控制筛选,如

 

Tables("表A").filter = "编号 = '12345'"

Tables("表B").filter = "编号 = '12345'"

 

 方法二:你可以设置父子关联,一个患者信息表为父表,其余的为子表,然后直接绑定关联表即可。


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


加好友 发短信
等级:幼狐 帖子:187 积分:1987 威望:0 精华:0 注册:2017/1/21 16:12:00
  发帖心情 Post By:2017/8/9 12:15:00 [只看该作者]

代码筛选,在哪个地方,写? 第二,关联,只有两个表都有了同一 编号,才能关联,请问,我在窗口新增一个记录(新编号),如何让其他子表也相应增加 一个记录(新编号)? 设计卡在这里了,很急,请帮忙解答.

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/9 15:29:00 [只看该作者]

1、可以写在窗口afterLoad事件。

 

2、你应该在DataColChanged事件,也就是编号修改的时候,新增,如代码

 

If e.DataCol.Name = "编号" Then

    Dim ndr As DataRow = DataTables("子表").addNew

    ndr("编号") = e.datarow("编号")

End If


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


加好友 发短信
等级:幼狐 帖子:187 积分:1987 威望:0 精华:0 注册:2017/1/21 16:12:00
  发帖心情 Post By:2017/8/9 16:04:00 [只看该作者]

谢谢,我摸索出来了,如您介绍的第二种方法。

 回到顶部