- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助] (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=114427)
-- 发布时间：2018/2/6 9:24:00
-- [求助]
项目拥有四个表格，制作了一个窗口类似这样。
此主题相关图片如下：tim图片20180205214733.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:科室资料.table |
如何才能让鼠标点击窗口上任意一个表的任意一行，主表也同步翻页到相应的表的相应的行上。
如何实现将窗口的筛选结果同步应用到主表上。
-- 发布时间：2018/2/6 9:50:00
--
CurrentChanged事件
If e.Table.Current IsNot Nothing Then
Dim t As Table = e.Form.controls("table1").Table
Dim idx = t.FindRow("姓名 = \'" & e.Table.Current("姓名") & "\'")
If idx >= 0 Then
t.Position = idx
End If
End If
http://www.foxtable.com/webhelp/scr/2631.htm