Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
'Prevent user from closing with the Close box in the title bar.
If CloseMode <> 1 Then Cancel = 1
UserForm1.Caption = "The Close box won't work! Click me!"
End Sub
Form_Closed?
Скажите, как остановить процесс Form_Closed?
К примеру:
Private Sub Form_Closed(...)...
'break или еще что-то
End Sub
Вобщем, что бы при закрытии формы она не закрывалась.
К примеру:
Private Sub Form_Closed(...)...
'break или еще что-то
End Sub
Вобщем, что бы при закрытии формы она не закрывалась.
Пример из справки (обрати внимание на пермен. Cancel):
А ты вообще в чем пишешь то?
Код:
А ты вообще в чем пишешь то?
Цитата:
Originally posted by SergeySV
Пример из справки (обрати внимание на пермен. Cancel):
А ты вообще в чем пишешь то?
Пример из справки (обрати внимание на пермен. Cancel):
Код:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
'Prevent user from closing with the Close box in the title bar.
If CloseMode <> 1 Then Cancel = 1
UserForm1.Caption = "The Close box won't work! Click me!"
End Sub
'Prevent user from closing with the Close box in the title bar.
If CloseMode <> 1 Then Cancel = 1
UserForm1.Caption = "The Close box won't work! Click me!"
End Sub
А ты вообще в чем пишешь то?
Пишу я в VB.NET.
Вообщем, надо было вот что сделать:
Private Sub MyForm_Closing(...)...
e.cancel=true;
End Sub