Vba Access

Тема в разделе "Visual Basic", создана пользователем NickProstoNick, 21 окт 2009.

  1. NickProstoNick

    NickProstoNick Статус как статус :)

    Регистрация:
    22 авг 2008
    Сообщения:
    1.766
    Симпатии:
    39
    Всем привет!
    Второй день мучаю Access. Нужно создать диалог с пользователем.
    Есть модальная всплывающая форма... в ней выполняются определенные действия.
    Форма вызывается по событию кнопки из другой формы. Кроме вызова формы в событии кнопки есть еще другой код (циклы, сообщения... и т.д.) как до вызова формы так и после.
    Ну так собственно в чем проблема: необходимо остановить выполнение кода в событии кнопки до тех пор пока не закроется модальное окно.
    Сразу оговорюсь - менять и переписывать программу нельзя! Дописывать можно. И я VBA не знаю.
    Немного для наглядности
    Код (Text):
    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 засветится вместе с модальным окном. А нужно чтоб светился после закрытия окна
     
Загрузка...

Поделиться этой страницей