Ms access 如何在access 2007中自动居中窗体中的对象?

Ms access 如何在access 2007中自动居中窗体中的对象?,ms-access,vba,ms-access-2007,Ms Access,Vba,Ms Access 2007,我不知道在设计表单时,我将对象设置在表单的中心,并将属性设置为“自动中心”,但在表单视图中,当最大化表单对象到表单的左上角时, 有人能帮我吗 Access窗体有一个On Resize事件,在该事件中,您可以根据窗体本身的.Width属性操纵窗体上各种控件的.Left属性,从而调整窗体上各种控件的水平位置 例如,假设我有一个表单,其中有一个名为Button0的命令按钮。要在调整窗口大小时使其(或多或少)水平居中,我可以在窗体的On Resize事件中使用以下代码: Private Sub Form

我不知道在设计表单时,我将对象设置在表单的中心,并将属性设置为“自动中心”,但在表单视图中,当最大化表单对象到表单的左上角时,
有人能帮我吗

Access窗体有一个
On Resize
事件,在该事件中,您可以根据窗体本身的
.Width
属性操纵窗体上各种控件的
.Left
属性,从而调整窗体上各种控件的水平位置

例如,假设我有一个表单,其中有一个名为
Button0
的命令按钮。要在调整窗口大小时使其(或多或少)水平居中,我可以在窗体的
On Resize
事件中使用以下代码:

Private Sub Form_Resize()
'' adjust the horizontal position of the Command0 button
Me.Command0.Left = (Me.InsideWidth - Me.Command0.Width) / 2
End Sub
注意:

对于Access 2007及更高版本,您还可以使用。有关如何使用它们对中的详细信息,请参见此处的相关问题:


我是access的初学者,我不知道该怎么办!请你再解释一下我要做什么好吗?@arm我在回答中加了一个例子。tanks,这很有帮助。但在我的表单中,一些对象在调整表单大小时会消失,例如,文本框正确居中,但其标签会消失!我没有发现问题!有没有办法在一条语句中为所有对象写入此cod?@arm re:消失标签——可能是您的文本框被移动到标签顶部并隐藏了它。以这种方式移动文本框不会同时移动其标签(与在“设计”视图中拖动文本框并同时移动其关联标签不同)。re:在一条语句中移动所有对象--不,必须单独移动每个对象。