Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/ms-access/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Ms access 如果从VBA代码打开远程访问数据库,为什么退出该实例时它会在一秒钟内可见?_Ms Access_Vba_Ms Access 2010 - Fatal编程技术网

Ms access 如果从VBA代码打开远程访问数据库,为什么退出该实例时它会在一秒钟内可见?

Ms access 如果从VBA代码打开远程访问数据库,为什么退出该实例时它会在一秒钟内可见?,ms-access,vba,ms-access-2010,Ms Access,Vba,Ms Access 2010,我使用这样的代码 Dim AccApp as Access.Application Set AccApp = New Access.Application AccApp.OpenCurrentDatabase (Access file to open here) AccApp.Visible = False (做事) 最后我整理了一下: AccApp.Quit”在这一行,Access应用程序在瞬间可见,然后关闭。有办法吗?我不想让用户在看到Access实例打开然后关闭时感到困惑。也许可以尝试

我使用这样的代码

Dim AccApp as Access.Application

Set AccApp = New Access.Application
AccApp.OpenCurrentDatabase (Access file to open here)
AccApp.Visible = False
(做事)

最后我整理了一下:


AccApp.Quit
”在这一行,Access应用程序在瞬间可见,然后关闭。有办法吗?我不想让用户在看到Access实例打开然后关闭时感到困惑。

也许可以尝试在首次打开Access窗口时将其设置为最小化?如何最小化该实例?这将为您指明正确的方向。。。感谢您的帮助,但在这种情况下,这看起来太麻烦了;它只出现了一小会儿,我不想为此添加太多额外的代码。我希望有一种简单的方法来添加AccApp.Minimize或DoCmd.RunCommand acMinimize“在此处指定某个内容”,这将是一种快速的方法来最小化它。您有两个选项。。。找到access.application的某些属性/方法,您可以使用这些属性/方法将其最小化,或者使用导入的API函数执行相同的操作。虽然这看起来太复杂了,但你真正要做的就是确定你需要最小化的窗口,然后最小化它!如果你选择了API路线,一段时间后,新的能力世界将突然变得显而易见。我想问另一个问题。。。如何使用Windows API调用最小化应用程序窗口?