CommitOnClose 属性

       

返回或设置一个 Byte 值,表明窗体关闭时是否指定的窗体保存了已更改的记录。可读写。

expression.CommitOnClose

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

说明

CommitOnClose 属性值可以是下列设置之一:

设置 说明
0 关闭窗体,放弃所有未保存的更改。
1 (默认值)关闭窗体,并保存窗体上的所有未保存的更改。
2 关闭窗体时 Microsoft Access 会提示用户是否保存更改。

该属性仅在设计时才可以更改。在运行时,该属性为只读。

示例

下面的示例检查指定的窗体,查看窗体关闭时是否保存了更改,并会显示一条消息来汇报结果。

With Forms(0)
    Select Case .CommitOnClose
        Case 0
            MsgBox "The """ & .Name & """ form discards " _
                & "unsaved changes when you close it."
        Case 1
            MsgBox "The """ & .Name & """ form saves " _
                & "changes when you close it."
        Case 2
            MsgBox "The """ & .Name & """ form asks you " _
                & "whether to save changes when you close it."
    End Select
End With