Excel VBA用户窗体常用的方法.pdfVIP

ExcelVBA用户窗体常用的方法

2009-06-2023:40

1、显示用户窗体

用于以编程方式显示用户窗体的语法是：

UserFormName.Show

若要显示用户窗体名为UserForm1，使用以下代码：

UserForm1.Show

时可以加载到内存用户窗体而不实际显示它。可能需要复杂的用户窗体几秒钟才显

示。可以预用户窗体加载到内存中，因为您可以决定何时引发此开销。但不显示加载到

内存的UserForm1，使用以下代码：

LoadUserForm1

您必须使用Show方法时以前显示的。

2、如何临时隐藏用户窗体

如果想要临时隐藏用户窗体，请使用隐藏方法。可以隐藏用户窗体，如果您的应用

程序涉及用户窗体之间移动。若要隐藏用户窗体，使用以下代码：

UserForm1.Hide

3、如何从内存中删除用户窗体

要从内存中删除用户窗体使用在卸载语句。若要卸载一个名为UserForm1用户

窗体，使用以下代码：

UnloadUserForm1

如果卸载与用户窗体或与用户窗体上的控件相关联的事件过程中用户窗体（例如，您

单击CommandButton控件)，您可以使用Me关键字而不是用户窗体的名称。要使用

Me关键字卸载用户窗体，使用以下代码：

UnloadMe

4、如何使用用户窗体事件

用户窗体支持许多预定义的事件，您可以将附加VBA过程。在事件发生时,该过程

附加到该事件就会运行。由用户执行的单个操作可以启动多个事件。最频繁用户窗体使

用的事件包括Initialize事件、Click事件和终止事件。

请注意VisualBasic模块包含事件的过程可能被称为隐藏用户窗体的模块。看

MicrosoftProjectExplorer窗口的VisualBasic编辑器的Modules集合中不包含事

件过程的模块。您必须双击用户窗体可以查看用户窗体的主体代码模块。

5、如何捕获用户窗体事件

要捕获用户窗体事件，请按下列步骤操作：

在Excel中创建一个新工作簿。

在工具菜单上指向宏，然后单击VisualBasic编辑器。

在插入菜单中上,单击用户窗体插入您的工作簿的用户窗体。

双击用户窗体的用户窗体中显示代码窗口。

在模块中键入以下代码：

PrivateSubUserForm_Click()

Me.Height=Int(Rnd*500)

Me.Width=Int(Rnd*750)

EndSub

PrivateSubUserForm_Initialize()

Me.Caption=EventsEventsEvents!

Me.BackColor=RGB(10,25,100)

EndSub

PrivateSubUserForm_Resize()

msg=Width:Me.WidthChr(10)Height:Me.Height

copyrightvbacn

MsgBoxprompt:=msg,Title:=ResizeEvent

EndSub

PrivateSubUserForm_QueryClose(CancelAsInteger,CloseModeAsInteger)

msg=NowUnloadingMe.Caption

MsgBoxprompt:=msg,Title:=QueryCloseEvent

EndSub

PrivateSubUserForm_Terminate()

msg=NowUnloadingMe.Caption

MsgBoxprompt:=msg,Title:=TerminateEvent

EndSub