• 🔥 Бесплатный курс от Академии Кодебай: «Анализ защищенности веб-приложений»

    🛡 Научитесь находить и использовать уязвимости веб-приложений.
    🧠 Изучите SQLi, XSS, CSRF, IDOR и другие типовые атаки на практике.
    🧪 Погрузитесь в реальные лаборатории и взломайте свой первый сайт!
    🚀 Подходит новичкам — никаких сложных предварительных знаний не требуется.

    Доступ открыт прямо сейчас Записаться бесплатно

Vba Access

NickProstoNick

Статус как статус :)
Lotus Team
22.08.2008
1 851
27
Всем привет!
Второй день мучаю Access. Нужно создать диалог с пользователем.
Есть модальная всплывающая форма... в ней выполняются определенные действия.
Форма вызывается по событию кнопки из другой формы. Кроме вызова формы в событии кнопки есть еще другой код (циклы, сообщения... и т.д.) как до вызова формы так и после.
Ну так собственно в чем проблема: необходимо остановить выполнение кода в событии кнопки до тех пор пока не закроется модальное окно.
Сразу оговорюсь - менять и переписывать программу нельзя! Дописывать можно. И я VBA не знаю.
Немного для наглядности
Код:
Private Sub Btn0_Click()
On Error GoTo Err_Btn0_Click

Call UISendMail("", "", "") ' - рукописная функция... из нее вызывается моя модальная форма
MsgBox "TEST"

Exit_Btn0_Click:
Exit Sub

Err_Btn0_Click:
MsgBox Err.Description
Resume Exit_Btn0_Click

End Sub
Ну так в таком варианте MsgBox засветится вместе с модальным окном. А нужно чтоб светился после закрытия окна
 
Мы в соцсетях:

Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab