主题：[求助]tabcontrol控件的page页面

tabcontrol有4个page页面，分别为A，B，C，D，我要写一个select case 语句实现一个功能，当我点页面A时，执行代码，当我点B时，执行代码。

SelectedIndexChanged事件

 

Select case e.Sender.selectedpage.Text

    Case "A"

 

    Case "B"

 

End Select

这种方法不行，我要在currentchanged事件中执行代码，因为我要table表中点中一行，然后在tabcontrol控件中点中页面A，页面A的表中会加载点中行的明细，谢谢！

If Forms("窗口1").opened Then
    Dim tab As WinForm.TabControl = forms("窗口1").controls("TabControl1")
    Select Case tab.selectedpage.Text
        Case "A"
           
        Case "B"
           
    End Select
End If

感谢 老师 ！！问题解决