OpenArgs 屬性

重要:  本文係由機器翻譯而成,請參閱免責聲明。本文的英文版本請見這裡,以供參考。

適用於

Form 物件

Report 物件

會決定由開啟表單之 OpenForm 方法的 OpenArgs 引數所指定的字串運算式。可讀寫的 Variant

expression.OpenArgs

expression 必要。會傳回 [適用於] 清單中其中一個物件的運算式。

備註

只使用巨集或使用 Visual Basic for Applications (VBA) 程式碼中,使用 [ DoCmd ] 物件的OpenForm方法使用此屬性。此屬性設定為唯讀,在所有檢視。

若要使用 OpenArgs 屬性,請使用 DoCmd 物件的 OpenForm 方法,並將 OpenArgs 引數設為所需的字串運算式,以開啟表單。然後就可以在表單的程式碼 (例如 Open 事件程序) 中使用 OpenArgs 屬性設定。您也可以參照巨集 (例如 Open 巨集) 或運算式 (例如設定表單上控制項之 ControlSource 屬性的運算式) 中的屬性設定。

例如,假設您開啟的表單是用戶端連續表單清單。如果您想焦點移至特定的用戶端記錄中,開啟表單時,您可以OpenArgs屬性設定用戶端的名稱,然後在用戶端與指定的名稱,將焦點移至記錄的在開啟的巨集使用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

下列範例使用 FindFirst 方法來尋找 OpenArgs 屬性中指定名稱的員工。

Private Sub Form_Open(Cancel As Integer)
If Not IsNull(Me.OpenArgs) Then
Dim strEmployeeName As String
strEmployeeName = Me.OpenArgs
Dim RS As DAO.Recordset
Set RS = Me.RecordsetClone
RS.FindFirst "LastName = '" & _
strEmployeeName & "'"
If Not RS.NoMatch Then
Me.Bookmark = RS.Bookmark
End If
End If
End Sub

附註: 機器翻譯免責聲明︰本文係以電腦系統翻譯而成,未經人為介入。Microsoft 提供此等機器翻譯旨在協助非英語系使用者輕鬆閱讀 Microsoft 產品、服務及技術相關內容。基於本文乃由機器翻譯而成,因此文中可能出現詞辭、語法、文法上之錯誤。

擴展您的技能
探索訓練
優先取得新功能
加入 Office 測試人員

這項資訊有幫助嗎?

感謝您的意見反應!

感謝您的意見反應! 我們將協助您與其中一位 Office 支援專員連絡以深入了解您的意見。

×