在窗体打开后,只要窗体大小有所更改,Resize 事件就会发生。
Private Sub Form_Resize()
若要在该事件发生时执行宏或事件过程,请将 OnResize 属性设为宏的名称或 [事件过程]。
当在宏或事件过程中更改窗体的大小,例如,在宏中使用 MoveSize 操作来调整窗体的大小时,该事件发生。
通过在 Resize 事件发生时运行宏或事件过程,可以在窗体大小改变时,移动或调整窗体上控件的大小。也可以使用 Resize 事件重新计算或重新设置那些与窗体大小相关的变量或属性。
首次打开窗体时,下列事件将按如下顺序发生:
Open → Load → Resize → Activate → Current
注释 当在 Resize 宏或事件过程中使用 MoveSize、Maximize、Minimize 或 Restore 操作(或 DoCmd 对象的相应方法)时,需要特别注意。这些操作能触发窗体的 Resize 事件,并因而引起级联事件的发生。
下面的示例演示如何利用 Resize 事件过程在窗体最大化时重绘窗体。当用户单击标有“最大化”的命令按钮时,窗体会最大化,并会触发 Resize 事件。
若要试用此示例,请将下面的事件过程添加到名为“Contacts”的窗体中,该窗体包含名为“Maximize”的命令按钮:
Private Sub Maximize_Click()
DoCmd.Maximize
End Sub
Private Sub Form_Resize()
Forms!Contacts.Repaint