Сообщение закрыть программу “Да” “Нет”

  • Автор темы segail
  • Дата начала
S

segail

Гость
#1
При клике по кнопке CommandButton2 выходит сообщение закрыть программу ”Да” ”Нет”
При клике Да необходимо выполнить действии Unload Me а при клике Нет закрыть сообщение.
У меня закрывает программу при клике ”Да” и ”Нет” Дополните код.

Private Sub CommandButton2_Click()
MsgBox "Данные сохранены. Закрыть программу?", 32 + 4, "Закрытие программы"
Unload Me
End Sub
 

alex77755

Well-Known Member
15.02.2009
128
0
#2
Можно так. Только не разобрался с подсветкой кода??
<!--shcode--><pre><code class='VBA'>Private Sub Комманда1_Click()

Dim Вопрос

Вопрос = MsgBox("Данные сохранены. Закрыть программу?", 32 + 4, "Закрытие программы")

Select Case Вопрос
Case 6
Unload Me
End Select

End Sub[/CODE]