- Код: Выделить всё
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = True
End Sub
есть ли замена этому событию?
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = True
End Sub
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As FormClosingEventArgs) Handles FormClosing
e.Cancel = True
End Sub
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 117