Foxtable(狐表)用户栏目专家坐堂 → 模拟关联如何实现同步引用数据?


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

主题:模拟关联如何实现同步引用数据?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/10/30 10:01:00 [显示全部帖子]

 明细表的意义是,主表一行数据,对应子表的多行数据啊。

 

 显示子表数据的时候,应该是显示一个具体表格啊

 

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

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/10/30 10:18:00 [显示全部帖子]

1、控件绑定到表列;

 

2、用findrow定位各表的行http://www.foxtable.com/help/topics/0553.htm

 

3、用数组+循环去查找定位


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/10/30 11:02:00 [显示全部帖子]


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/11/7 14:04:00 [显示全部帖子]

Dim xj As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim dr As DataRow
dr = DataTables("表b").Find("[任务ID] = '" & xj & "'", "日期 Desc")
If dr IsNot Nothing Then
    Dim wz As Integer = Tables("表b").FindRow(dr)
    If wz >= 0 Then
        Tables("表b").Position = wz
    End If
End If

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/11/7 17:04:00 [显示全部帖子]

Dim xj As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim dr As DataRow
dr = DataTables("表b").Find("[任务ID] = '" & xj.Text & "'", "日期 Desc")
If dr IsNot Nothing Then
    Dim wz As Integer = Tables("表b").FindRow(dr)
    If wz >= 0 Then
        Tables("表b").Position = wz
    End If
End If

 回到顶部