Accss报表问题

BennySun 2012-11-09 04:15:44
请教一个Access报表的问题.我通过以下代码动态创建了一个报表.

DoCmd.CopyObject  , "AirMaster1", acReport, "AirWithMaster1000"

DoCmd.OpenReport  "AirMaster1", acViewPreview

请教下如何给AirMaster1新报表,新增一个报表关闭事件.我想在用户预览完此报表后,自动删除此报表.

请高人指点.
...全文
122 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
BennySun 2012-11-21
  • 打赏
  • 举报
回复
抱歉,很结贴了.你的回答很详细,试了下,还是可行的.
WWWWA 2012-11-12
  • 打赏
  • 举报
回复
不能在报表中实现,示例:假设EE为报表名,窗体3为执行操作有窗体名 Private Sub Form_Timer() On Error Resume Next DoCmd.DeleteObject acReport, "ee" Me.TimerInterval = 0 'Disable End Sub Private Sub 命令3_Click() DoCmd.OpenReport "ee", acViewDesign ' acViewDesign Reports("ee").Visible = False lngReturn = Reports("ee").Module.CreateEventProc("Close", "Report") Reports("ee").Module.InsertLines lngReturn + 1, "Forms!窗体3.TimerInterval = 2000 " & vbCrLf DoCmd.Close acReport, "ee", acSaveYes DoCmd.OpenReport "ee", acViewPreview End Sub 测试通过
BennySun 2012-11-09
  • 打赏
  • 举报
回复
可怜呐,没人可以回答.

7,732

社区成员

发帖
与我相关
我的任务
社区描述
Microsoft Office Access是由微软发布的关系数据库管理系统。它结合了 MicrosoftJet Database Engine 和 图形用户界面两项特点。
社区管理员
  • Access
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧