Question

VBA隐藏access背景

以下代码在64位程序中运行错误，如何修改？
目的是通过下面的代码程序运行时ACCESS背景隐藏。因为我用的是办公电脑，公司不对Internet信息服务（IIS）管理器设置了权限，我不能修改，所以请教各路大侠，是否有其他办法。非常感谢
Private Declare Function ShowWindow Lib "user32" _
(ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

Answer 1

1.在窗体属性表【全部】选项卡中，弹出方式、模式都选择“是”
2.在窗体属性表【事件】选项卡——加载...——代码生成器中输入
Option Explicit
Private Declare PtrSafe Function ShowWindow Lib "user32" (ByVal bwnd As Long, ByVal ncmdshow As Long) As Long
Private Sub Form_Load()
ShowWindow Me.Application.hWndAccessApp, 0
End Sub
注：需要输入参数的窗体，隐藏功能要在参数输入后才能启动，可以通过导航窗体跳转。