对话框弹出窗口启动画面

Question

我有一个问题，对某人而言可能是本周最简单的问题，但不幸的是，我被困住了。 我有一个启动画面，我希望在数据库以全屏模式打开之前以acDialog弹出框类型格式打开。此时启动画面打开，但也处于全屏模式。下面是关于启动画面打开和关闭时的代码。我只是想弄清楚如何重新格式化..提前感谢

Private Sub Form_Current()

  DoCmd.OpenForm "frmsplashscreen", acNormal, , , , acDialog
End Sub

Private Sub Form_Timer()
  DoCmd.Close acForm, "frmSplashScreen"
  DoCmd.OpenForm "frmProjectPhaseMasterBoard", acNormal, "", "", , acNormal
End Sub

Answer 1

Popup =是;模态=是;自动居中=是;自动调整=否; FitToScreen =否