小编Imt*_*iaz的帖子

我们一直在 Windows 7 中使用 MS Access 数据库（Office 2007，32 位），但最近我们切换到 Office 2016，64 位。

现在每个表单都显示以下消息，这真的很烦人：

此外，访问窗口没有最小化。我不是 VBA 专家，不知道该怎么做。我正在粘贴代码。请不要推荐 Microsoft 提供的任何文章或文档。我试图理解这些，但失败了。

使用的代码是：

Option Compare Database
Private Declare Function SetWindowPos Lib "user32.dll" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

和：

Private Sub Form_Load()
    Application.RunCommand (acCmdAppRestore)
    SetWindowPos Application.hWndAccessApp, 0, 0, 0, 0, 0, 0
    Application.DoCmd.MoveSize 0, 0
End Sub

以前（在 32 位办公室中）Access …