在access程序中，自动创建的窗体上会默认设置“导航按钮”属性为“是”
这个功能就是能在左下角显示出记录数和选中第几条记录。
通过下面的代码可以引用窗体或者报表的记录集记录数
Sub 记录数()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb()
DoCmd.OpenForm "员工信息"
Set rs = Forms!员工信息.RecordsetClone '复制窗体的记录集
MsgBox "员工信息中的记录数为：" & rs.RecordCount
End Sub
