ACCESS当选项卡为当前,则打印预览对应的报表
ACCESS当选项卡为当前,则打印预览对应的报表。打印预览按钮:预览选项卡分别为:A-B-C-D报表分别为B1-B2-B3-B4我想要实现的是,当选择A选项卡时,点击’预...
ACCESS当选项卡为当前,则打印预览对应的报表。打印预览按钮:预览选项卡分别为:A-B-C-D报表分别为B1-B2-B3-B4我想要实现的是,当选择A选项卡时,点击’预览’按钮时,则打开B1为打印预览,当选择B选项卡时,点击’预览’按钮时,则打开B2为打印预览以此类推
展开
3个回答
展开全部
打印按钮单击事件这样写,比如:
Private Sub 打印按钮_Click()
if me.选项卡="A" then
docmd.OpenReport "B1", acViewPreview
else
if me.选项卡="B" then
docmd.OpenReport "B2", acViewPreview
else
if me.选项卡="C" then
docmd.OpenReport "B3", acViewPreview
else
if me.选项卡="D" then
docmd.OpenReport "B4", acViewPreview
end if
end if
end if
end if
exit sub
end sub
Private Sub 打印按钮_Click()
if me.选项卡="A" then
docmd.OpenReport "B1", acViewPreview
else
if me.选项卡="B" then
docmd.OpenReport "B2", acViewPreview
else
if me.选项卡="C" then
docmd.OpenReport "B3", acViewPreview
else
if me.选项卡="D" then
docmd.OpenReport "B4", acViewPreview
end if
end if
end if
end if
exit sub
end sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |