以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  RecordGrid动态记录窗口  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90106)
--  作者：yifan3429
--  发布时间：2016/9/5 17:56:00
--  RecordGrid动态记录窗口
RecordGrid动态记录窗口
1和2 是表格  3是RecordGrid

我想焦点在1时  RecordGrid显示1的 数据  
我想焦点在2时  RecordGrid显示2
图片点击可在新窗口打开查看此主题相关图片如下：qq截图20160905175114.png
图片点击可在新窗口打开查看
的 数据  
--  作者：有点蓝
--  发布时间：2016/9/5 18:07:00
--  
CurrentTableChanged事件

If Forms("窗口1").Opened Then
    Select Case CurrentTable.Name
        Case "表A","表B"
            Dim rg As WinForm.RecordGrid = Forms("窗口1").Controls("RecordGrid1")
            rg.Table = CurrentTable
            rg.Build
    End Select
End If