【Access基础】限制录入的条数/限制表中数据只能录入多少条记录

这里面的例子是非绑定表的，我现在用的是绑定表，该如何限制呢？我摘了一段代码，但不好用，能弹出对话框，但数据还是录进去了，而且能接着录。代码如下：

Private Sub Form_AfterUpdate()
If DCount("*", "tblBxmx") >= 5 Then
MsgBox "该表最多只能录入五条记录！", vbCritical, "提示"
Exit Sub
End If
End Sub
点击下载此附件

zhaoyoulong 发表于：2014-03-26 12:11:47

代码放在更新前加ME.UNDO

Private Sub Form_BeforeUpdate(Cancel As Integer)

If DCount("*", "tblBxmx") >= 8 Then
MsgBox "该表最多只能录入五条记录！", vbCritical, "提示"
Me.Undo
Exit Sub
End If
End Sub

总记录：1篇页次：1/1 9 1 :

Access交流中心