在 Visual Basic 中,Close 方法執(zhí)行 Close 操作。
expression.Close(ObjectType, ObjectName, Save)
expression 必需。返回“應(yīng)用于”列表中的一個(gè)對(duì)象的表達(dá)式。
ObjectType 可選 AcObjectType 常量。
AcObjectType 可以是下列 AcObjectType 常量之一: |
acDataAccessPage |
acDefault 默認(rèn) |
acDiagram |
acForm |
acFunction |
acMacro |
acModule |
acQuery |
acReport |
acServerView |
acStoredProcedure |
acTable 注釋 如果關(guān)閉“Visual Basic 編輯器”(VBE) 中的一個(gè)模塊,則必須在 objecttype 參數(shù)中使用 acModule。 |
ObjectName 可選 Variant 型。字符串表達(dá)式,objecttype 參數(shù)所選類型的對(duì)象的有效名稱。
Save 可選 AcCloseSave 常量。
AcCloseSave 可以是下列 AcCloseSave 常量之一: |
acSaveNo |
acSavePrompt 默認(rèn)值 如果正在關(guān)閉 Visual Basic 模塊,該值將被忽略。模塊將關(guān)閉,但不會(huì)保存對(duì)模塊的更改。 |
acSaveYes 如果將該參數(shù)留空,將采用默認(rèn)常量 (acSavePrompt)。 |
有關(guān)該操作及其參數(shù)如何使用的詳細(xì)信息,請(qǐng)參閱該操作的主題。
如果將 objecttype 和 objectname 參數(shù)留空(默認(rèn)常量 acDefault 用作 objecttype 值),則 Microsoft Access 將關(guān)閉活動(dòng)窗口。如果指定 save 參數(shù)并將 objecttype 和 objectname 參數(shù)留空,則必須包含 objecttype 和 objectname 參數(shù)的逗號(hào)。
注釋 如果窗體上有一個(gè)綁定到 Required 屬性設(shè)為“是”的字段上的控件,并且未在該字段輸入任何數(shù)據(jù)就用 Close 方法關(guān)閉了窗體,則不會(huì)顯示錯(cuò)誤消息。對(duì)該記錄所做的任何更改都將取消。當(dāng)使用 Windows“關(guān)閉”按鈕或宏中的 Close 操作關(guān)閉窗體,或者從“文件”菜單中選擇“關(guān)閉”關(guān)閉窗體時(shí),Microsoft Access 將顯示警告信息。以下代碼將在用戶試圖用 Close 方法關(guān)閉有 Null 字段的窗體時(shí),顯示一條錯(cuò)誤消息。
If IsNull(Me![Field1]) Then
If MsgBox("'Field1' must contain a value." _
& Chr(13) & Chr(10) _
& "Press 'OK' to return and enter a value." _
& Chr(13) & Chr(10) _
& "Press 'Cancel' to abort the record.", _
vbOKCancel, "A Required field is Null") = _
vbCancel Then
DoCmd.Close
End If
End If
下面的示例使用 Close 方法關(guān)閉“訂單回顧”窗體,在不進(jìn)行提示的情況下,保存所有對(duì)窗體的更改:
DoCmd.Close acForm, "Order Review", acSaveYes