MS-Access:如何以与关闭/以前的形式相同的位置/大小打开表单?

web*_*orm 2 forms ms-access access-vba

我正在使用Access 2003创建一个数据库应用程序,它将作为一个独立的应用程序运行(即使用Access运行时).我有一个主窗体打开到预定义的位置和大小,我想控制任何其他窗体打开的位置.

我想在与主表单相同的位置和大小处打开其他表单.我可以使用"自动中心"属性,但我希望用户能够在任何他们喜欢的地方移动表单并让新表单出现在该位置.由于我在打开新表单时关闭上一个表单,因此任何时候都只能打开一个表单.

有关如何使用VBA实现此目的的任何建议?谢谢.

Han*_*sUp 5

您可以读取表单属性值以确定第一个表单的位置和大小.

Debug.Print Me.WindowLeft, Me.WindowTop, Me.WindowWidth, Me.WindowHeight
Run Code Online (Sandbox Code Playgroud)

下一个表单可以使用Move方法匹配这些值.

Me.Move Left:=0, Top:=0, Width:=400, Height:=300
Run Code Online (Sandbox Code Playgroud)

您必须决定将值从第一个表单传递到第二个表单的方法.

  1. 作为自定义类的属性
  2. 作为OpenArgs的第二种形式
  3. 使用表来存储值