怎样给表中的记录限制数量

或者用风老师的方法 把下面的代码放在你需要的窗体里面  若是新增窗体用  就放在新增里面

Private Sub ToolbarFrm_ButtonClick(ByVal Button As Object)
    Select Case Button
    Case "保存"
        if Dcount("*","表名称") >100 then
           msgbox "记录数超过了100"
        exit sub
        end if       
        cmd_Save
    Case "关闭"
        DoCmd.Close
    End Select
End Sub