主题：通用控件

切换页签，选择表，SelectedIndexChanged事件 

Dim p As WinForm.TabPage = e.sender.SelectedPage
For Each c As object In p.Children
    If Typeof c Is winform.Table Then
        c.Select
        Exit For
    End If
Next

代码肯定没问题，如果有问题，实例发上来测试。