For Each c As Col In Tables("通讯录").Cols
If c.name.Contains(e.sender.SelectedPage.text)Then
c.Visible=True
Else
c.Visible=True
c.Visible=True
End If
Next
Select Case e.Sender.SelectedIndex
Case 0
Tables("窗口2_Table1").OpenView("个人信息")
Case 1
Tables("窗口2_Table1").OpenView("企业信息")
Case 2
Tables("窗口2_Table1").OpenView("查询")
End Select
老师好,我在窗口集合有增加了一个查询页面,窗口的副表视图是跟页面跑得可是主表不动。谢谢老师给我设置一下。