Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-模块/函数/VBA

复制窗体记录及返回其记录数

时 间:2021-07-31 19:32:23
作 者:杨雪   ID:42182  城市:南京
摘 要:分享一个复制窗体记录及返回其记录数的示例。
正 文:

点击下载此附件


截   图:

点击图片查看大图


源   码:

'复制窗体记录及返回其记录数
Sub 记录数()
    Dim db As DAO.Database
    Dim rs As DAO.Recordset
    Set db = CurrentDb()
    '打开窗体"F_员工工资"
    DoCmd.OpenForm "F_员工档案"
    '复制窗体的记录集
    Set rs = Forms!F_员工档案.RecordsetClone
    '输出窗体中的记录集的记录数
    MsgBox "F_员工档案中的记录数为:" & rs.RecordCount
End Sub 


Access软件网官方交流QQ群 (群号:483923997)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助