我一直在开发Access 2007数据库,并且在通过拆分视图表单添加新记录时遇到了问题。
为了防止意外删除字段,我在每个表单上添加了一个锁定按钮(下图中右起第2个)。用户切换此按钮可在编辑模式和只读模式之间切换。默认情况下,表单处于只读模式。
按钮点击事件上的此VBA代码切换以下属性AllowEdits
,AllowAdditions
,AllowDeletions
,并切换“删除记录”和“添加记录”的启用状态按钮,使用以下代码。
Private Sub Form_Load()
ReadOnly (True)
End Sub
Private Sub btnLock_Click()
If lblEditMode.Caption = "Edit Mode" Then
ReadOnly (True)
Else
ReadOnly (False)
End If
End Sub
Private Function ReadOnly(value As Boolean)
Dim enableState As Boolean
enableState = Not value
If Dirty Then Dirty = False
AllowEdits = enableState
AllowAdditions = enableState
AllowDeletions = enableState
BtnNew.Enabled = enableState
BtnDelete.Enabled = enableState
If enableState = False Then
lblEditMode.Caption = ""
Else
lblEditMode.Caption = "Edit Mode"
End If
End Function
最初,我在表单底部使用了自定义导航按钮,但之后将其删除,转而使用拆分表单。
现在我可以在表格上做的就是编辑或删除记录。我无法添加新记录。
我已经浏览了所有我能想到的使用设计视图的属性,但是没有找到可能导致这种情况的任何内容。可能导致这种情况的任何想法?
我修改了许多表单以使用拆分视图,现在他们都遇到了同样的问题。
“添加新”按钮(使用标准宏)会生成“您无法转到指定记录”消息。表格的数据表部分未在底部显示可插入的行。此外,当AllowAdditions
的状态切换时,主页功能区上的“添加”按钮启用和禁用。
编辑:将表单从拆分表单更改回单个表单允许我添加新记录。但是一旦我将表单再次更改为拆分表单,我就失去了添加新记录的能力。
答案 0 :(得分:0)
我知道这是一个迟到的回复。但这可能有助于其他人。 我认为你把所有控件放在Form Header中。请将所有控件放在详细信息部分并试一试。希望这可以解决问题。