全部显示

Close 方法

       

在 Visual Basic 中,Close 方法执行 Close 操作。

expression.Close(ObjectType, ObjectName, Save)

expression   必需。返回“Applies To”列表中的一个对象的表达式。

ObjectType  可选 AcObjectType

ObjectName  可选 Variant 型。字符串表达式objecttype 参数所选类型的对象的有效名称。

Save  可选 AcCloseSave

说明

有关该操作及其参数如何使用的详细信息,请参阅该操作的主题。

如果将 objecttypeobjectname 参数留空(默认常量 acDefault 用作 objecttype 值),则 Microsoft Access 将关闭活动窗口。如果指定 save 参数并将 objecttypeobjectname 参数留空,则必须包含 objecttypeobjectname 参数的逗号。

注意   如果窗体上有一个绑定到 Required 属性设为“是”的字段上的控件,并且未在该字段输入任何数据就用 Close 方法关闭了窗体,则不会显示错误消息。对该记录所做的任何更改都将取消。当使用 Windows“关闭”按钮或宏中的 Close 操作关闭窗体,或者从“文件”菜单中选择“关闭”关闭窗体时,Microsoft Access 将显示警告信息。以下代码将在用户试图用 Close 方法关闭有 Null 字段的窗体时,显示一条错误消息。

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 方法关闭“订单回顾”窗体,在不进行提示的情况下,保存所有对窗体的更改:

DoCmd.Close acForm, "Order Review", acSaveYes