全局代码:
Public Sub C1DockingTab2_SelectedIndexChanging(sender As Object, e As C1.Win.C1Command.SelectedIndexChangingEventArgs)
msgbox(sender.text)
End Sub
afteropenproject事件
Dim MainTab As C1Command.C1DockingTab = BaseMainform.Controls("MainPages")
Dim FormTab As C1Command.C1DockingTab = MainTab.TabPages(0).controls(0)
AddHandler Formtab.SelectedIndexChanging, AddressOf C1DockingTab2_SelectedIndexChanging