Есть форма. При ее закрытии выводится диалог с кнопками OK и Cansel
При выборе ОК форма закрывается, при Cansel - нет.
Подскажите как отменить закрытие формы при выборе Cansel?
Private Sub Form_Unload(Cancel As Integer)
If MsgBox("Close Me?", vbQuestion Or vbYesNo) = vbNo Then Cancel = True
End Sub
Achiles писал(а):Спасибо за ответ, но я уже рзобрался
Private Sub BaseForm_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
If (MsgBox("Вы действительно хотите закончить работу с программой?", vbOKCancel + vbExclamation, "Внимание") = MsgBoxResult.OK) Then
e.Cancel = False
Else
e.Cancel = True
End If
End Sub
Сейчас этот форум просматривают: Yandex-бот и гости: 183