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


Свойство Form.CurrentView (Access)

Используйте свойство CurrentView , чтобы определить, как в данный момент отображается форма. Для чтения и записи, Integer.

Синтаксис

expression. CurrentView

выражение: переменная, представляющая объект Form.

Замечания

Свойство CurrentView использует следующие параметры.

Setting Форма, отображаемая в:
0 Конструктор
1 представление формы
2 Табличное представление
7 Представление макета

Используйте это свойство для выполнения различных задач в зависимости от текущего представления. Например, процедура события может определить, в каком представлении отображается форма, и выполнить одну задачу, если форма отображается в режиме формы или другая задача, если она отображается в режиме таблицы.

Пример

В следующем примере используется подпрограмма GetCurrentView, чтобы определить, находится ли форма в представлении формы или таблицы. Если он находится в режиме формы, сообщение пользователю отображается в текстовом поле в форме; Если оно находится в режиме таблицы, то в окне сообщения отображается то же самое сообщение.

GetCurrentView Me, "Please contact system administrator." 
 
Sub GetCurrentView(frm As Form, strDisplayMsg As String) 
 Const conFormView = 1 
 Const conDataSheet = 2 
 Dim intView As Integer 
 intView = frm.CurrentView 
 Select Case intView 
 Case conFormView 
 frm!MessageTextBox.SetFocus 
 ' Display message in text box. 
 frm!MessageTextBox = strDisplayMsg 
 Case conDataSheet 
 ' Display message in message box. 
 MsgBox strDisplayMsg 
 End Select 
End Sub

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

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