之前我有问过如果切换窗口时当前窗口有修改未做保存则禁止转换窗口，你们给我提供下面的程序，是可以的。
只是我不是看的明白，你们可以再提供这样的代码“自创一个事件”吗？或在哪里可以找到这样的资料学习一下。
Public Sub C1DockingTab2_SelectedIndexChanging(sender As Object, e As C1.Win.C1Command.SelectedIndexChangingEventArgs)
If vars("sa") = 1 Then
MessageBox.Show("这个""" & sender.text & """窗口有修改未做保存,请先保存修改或取消修改")
e.cancel = True
'forms("" & sender.text & "").show()
End If
End Sub
Dim MainTab As C1Command.C1DockingTab = BaseMainform.Controls("MainPages")
For Each p As object In MainTab.TabPages
Dim FormTab As C1Command.C1DockingTab = p.controls(0)
AddHandler Formtab.SelectedIndexChanging, AddressOf C1DockingTab2_SelectedIndexChanging
Next
加好友 
发短信
Post By：2019/12/23 20:42:00 [只看该作者]
