Как требовать подтверждения при выходе
 |
Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
|
| ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
| [3.144.38.24] |
|
|
Как требовать подтверждения при выходе
|
Сообщ.
#1
,
|
  |
  Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) If MsgBox("Действительно хотите выйти ?", vbQuestion + vbYesNo, "Confirmation") = vbNo Then Cancel = -1 End If End Sub |
1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
0 пользователей:
[ Script execution time: 0,0162 ] [ 15 queries used ] [ Generated: 14.05.24, 19:14 GMT ]