Access (的 Form.OpenArgs 屬性)
決定開啟表單之OpenForm方法的OpenArgs引數所指定的字串運算式。 讀取/寫入的 Variant。
語法
運算式。OpenArgs
expression 代表 Form 物件的變數。
註解
只有使用宏或搭配DoCmd物件的OpenForm方法使用 Visual Basic,才能使用這個屬性。 在所有檢視中,此屬性設定值是唯讀的。
若要使用OpenArgs屬性,請使用DoCmd物件的OpenForm方法開啟表單,並將OpenArgs引數設定為所需的字串運算式。 OpenArgs屬性設定接著可以在表單的程式碼中使用,例如Open 事件程序。 您也可以參照宏中的屬性設定,例如 Open 宏或運算式,例如設定表單上控制項之 ControlSource 屬性的運算式。
舉例來說,假設您所開啟的表單是客戶的連續表單清單。 如果您想要在表單開啟時將焦點移至特定用戶端記錄,您可以將 OpenArgs 屬性設定為用戶端的名稱,然後在 Open 宏中使用 FindRecord 巨集指令,將焦點移至具有指定名稱的用戶端記錄。
範例
下列範例會使用 OpenArgs 屬性,將 Employees 表單開啟至特定的員工記錄,並示範 OpenForm 方法如何設定 OpenArgs 屬性。 您可以適當地執行此程式;例如,當用來輸入員工新資訊的自訂對話方塊發生 AfterUpdate 事件時。
Sub OpenToCallahan()
DoCmd.OpenForm "Employees", acNormal, , , acReadOnly, _
, "Callahan"
End Sub
Sub Form_Open(Cancel As Integer)
Dim strEmployeeName As String
' If OpenArgs property contains employee name, find
' corresponding employee record and display it on form. For
' example,if the OpenArgs property contains "Callahan",
' move to first "Callahan" record.
strEmployeeName = Forms!Employees.OpenArgs
If Len(strEmployeeName) > 0 Then
DoCmd.GoToControl "LastName"
DoCmd.FindRecord strEmployeeName, , True, , True, , True
End If
End Sub
下列範例會顯示如何使用 OpenArgs 屬性來防止從瀏覽窗格開啟表單。
Private Sub Form_Open(Cancel As Integer)
If Me.OpenArgs() <> "Valid User" Then
MsgBox "You are not authorized to use this form!", _
vbExclamation + vbOKOnly, "Invalid Access"
Cancel = True
End If
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。