Метод Show

Статья
04/07/2023

Отображает объект UserForm .

Синтаксис

[ объект ]. Показатьмодальное

Синтаксис метода Show содержит следующие элементы:

Part	Описание
object	Необязательный параметр. Выражение объекта, которое вычисляет объект в списке Применимо к. Если объект опущен, предполагается, что объект UserForm, связанный с активным модулемUserForm.
Модального	Необязательный параметр. Значение Variant, определяющее, является ли UserForm модальной или безрежимной.

Settings

Параметры элемента модальность:

Константа	Значение	Описание
vbModal	1	UserForm является модальной. Значение, используемое по умолчанию.
vbModeless	0	Элемент UserForm является немодальным.

Замечания

Если указанный объект не загружается при вызове метода Show, его автоматически загружает Visual Basic.

Примечание.

В Microsoft Office 97, если элемент UserForm настроен для отображения как немодальный элемент, он вызывает ошибку среды выполнения; в Office 97 элементы UserForm всегда являются модальными.

Если userForm является модерным, последующий код выполняется при обнаружении. Немодерные формы не отображаются на панели задач и не находятся в порядке вкладки окна.

Примечание.

Данные, связанные с немодальным элементом UserForm могут быть потеряны при изменении проекта UserForm, который вызывает их повторную компиляцию, например, при удалении модуля кода.

Если элемент UserForm является модальным, пользователю необходимо отправить отклик, прежде чем использовать любую другую часть приложения. Последующий код не выполняется до тех пор, пока элемент UserForm скрыт или не загружен. Хотя одни формы в приложении отключены при отображении UserForm, другие остаются включенными.

Пример

В следующем примере предполагается наличие двух элементов UserForm в программе. В событии Инициализация UserForm1 загружается и отображается UserForm2. Когда пользователь щелкает элемент UserForm2, тот скрывается и отображается элемент UserForm1. При щелчке элемент UserForm1 снова отображается UserForm2.

' This is the Initialize event procedure for UserForm1
Private Sub UserForm_Initialize()
    Load UserForm2
    UserForm2.Show
End Sub
' This is the Click event for UserForm2
Private Sub UserForm_Click()
    UserForm2.Hide
End Sub

' This is the click event for UserForm1
Private Sub UserForm_Click()
    UserForm2.Show
End Sub

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через