全局代码
Public Sub C1DockingTab1_SelectedIndexChanging(sender As Object, e As C1.Win.C1Command.SelectedIndexChangingEventArgs)
vars("ot") = sender.SelectedTab.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 C1DockingTab1_SelectedIndexChanging
vars("ot")就是上一个窗口的名称
加好友 
发短信
Post By：2018/9/15 14:40:00 [只看该作者]
