主题：记录窗口共用表的问题求助？

窗口里有页面集合，里面有表1和表2，另还有2个记录窗口，现已通过页面集合的SelectedIndexchanged事件写入代码后可以达到选表1页面时记录窗口显示表1，选表2 页面就显示表2，因娱乐 表1和表2列都一样，都很多，想通过点任一页面时，2个记录窗口一起显示当前表的列，这样可以不要拉滚动条才可以看到表的全部列内容。现在我是通过页面集合的 Click事件写入代码后达到了我所想要的效果，但如果把代码全部写进页面集合的SelectedIndexchanged事件就不行，这种效是不是达不到？请版主指点！

Dim rgd As WinForm.RecordGrid = e.Form.Controls("RecordGrid1")
Select e.Sender.SelectedPage.Text
    Case "报名登记表"
        rgd.Table = Tables("报名登记表") '指定绑定表
        rgd.Build() '重新生成记录窗口
       
    Case "审核合格表"
        rgd.Table = Tables("审核合格表") '指定绑定表
        rgd.Build() '重新生成记录窗口
       
End Select
这是页面集合的SelectedIndexchanged事件代码

Dim rgd As WinForm.RecordGrid = e.Form.Controls("RecordGrid2")
Select e.Sender.SelectedPage.Text
    Case "报名登记表"
        rgd.Table = Tables("报名登记表") '指定绑定表
        rgd.Build() '重新生成记录窗口
       
    Case "审核合格表"
        rgd.Table = Tables("审核合格表") '指定绑定表
        rgd.Build() '重新生成记录窗口
       
End Select

这是页面集合的 Click事件代码