Access. Программирование на VBA
CError.ShowAVIForm
' Состояние ожидания до закрытия формы.
Me.WaitState (True)
' Закрытие AVI-формы.
DoCmd.Close acForm, "frmErrorAVI", acSaveNo
End If
' Открытие формы для ввода примечания пользователя.
If Me.UserEnterNoteFlag Then
DoCmd.OpenFonn "frmErrorNote", acNormal
' Состояние ожидания до закрытия формы. Me.WaitState (True)
' Закрытие формы для примечания.
DoCmd.Close acForm, "frmErrorNote", acSaveNo
End If
