access在窗体添加按钮默认打印报表的最后一页
答案:2 悬赏:70 手机版
解决时间 2021-12-25 04:33
- 提问者网友：愿为果
- 2021-12-24 04:40
ACCESS里面,在窗体里面添加一个按钮,如何让他默认打印报表的最后一页,窗体和报表用的是同一个表.窗体和报表里面的字段设计都是一样的.
最佳答案
- 五星知识达人网友：玩世
- 2021-12-24 05:22
楼主可以这样编写按钮单击事件过程：
Private Sub Command1_Click()
Dim LastPage As Integer
DoCmd.OpenReport "报表名", acViewPreview '打开报表预览模式，以便获取报表总页数
LastPage = Reports!报表名.Pages '获取报表的总页数
DoCmd.PrintOut acPages, LastPage, LastPage '只打印报表最后那页
DoCmd.Close acReport, "报表名" '关闭报表
End Sub
如有不明白或疑问，请发追问。Hi我也行
Private Sub Command1_Click()
Dim LastPage As Integer
DoCmd.OpenReport "报表名", acViewPreview '打开报表预览模式，以便获取报表总页数
LastPage = Reports!报表名.Pages '获取报表的总页数
DoCmd.PrintOut acPages, LastPage, LastPage '只打印报表最后那页
DoCmd.Close acReport, "报表名" '关闭报表
End Sub
如有不明白或疑问，请发追问。Hi我也行
全部回答
- 1楼网友：你可爱的野爹
- 2021-12-24 06:22
命令按钮的单击事件中写：docmd.openreport “报表名"即可。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯