Foxtable(狐表)用户栏目专家坐堂 → [求助]正副本表的行联动


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

主题:[求助]正副本表的行联动

帅哥,在线噢!
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/11/28 15:39:00 [显示全部帖子]

If Forms("w_make").Opened Then '如果窗口已经打开
    If e.Table.current IsNot Nothing Then
        Dim dr As DataRow = e.Table.Current.DataRow
        Dim nms() As String = {"Table1","Table2","Table3"} '请改为各个Table控件的实际名称
        For Each nm As String In nms
            Dim tbl As Table = Tables("w_make" & "_" & nm)
            Dim wz As Integer = tbl.FindRow(dr)
            If wz >=0 Then
                tbl.Position=wz
            End If
        Next
    End If
End If

 

只是非常的不理解,通常最多一个副本,怎么同一个表在同一个窗口会出现五个副本?

[此贴子已经被作者于2013-11-28 15:39:46编辑过]

 回到顶部