安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假

解决Access隐藏主界面窗口后 报表预览不显示

2018-12-29 15:43:00
黄善超
原创
226

在前面,我们讲过用API去隐藏主界面窗口。《Access程序隐藏主界面窗口(只显示打开窗体)

窗体显示需要设置弹出和模式为“是” 的,而报表预览并不会弹出,此时如果进入了报表预览即会导致窗体操作界面丢失。


小编的处理办法是在预览报表的时候,先关闭掉隐藏主界面的功能,待报表关闭后再重新打开。

Public Function 显示()
     ShowWindow Access.Application.hWndAccessApp, 0
     报表名.Visible = True
End Function
Public Function 隐藏窗体()
     ShowWindow Access.Application.hWndAccessApp, 5
     报表.Visible = False
End Function


打开报表预览时,主窗体背景界面是存在的。


在报表中调用函数:

Private Sub Report_Close()
    Call 显示
End Sub

Private Sub Report_Open(Cancel As Integer)
    Call 隐藏窗体
End Sub
    分享
    ? 1999-2019 Office交流网?? 中山市天鸣科技发展有限公司 粤ICP备10043721号-5 SQL查询:18
    内存占用:8.00MB
    PHP 执行时间:0.14
    双色球大奖2000年
    安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假