Access) (Form.CurrentView 屬性
使用 CurrentView 屬性來判斷表單目前顯示的方式。 可讀寫的 Integer。
語法
運算式。CurrentView
expression 代表 Form 物件的變數。
註解
CurrentView 屬性使用下列設定值。
設定 | 表單顯示于: |
---|---|
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 支援與意見反應。