admin 管理员组文章数量: 1184232
2024年3月27日发(作者：app首页ui设计欣赏)
vba控件常规使用
UserForm基础
如何显示UserForm
以下是用于显示UserForm编程语法是：
要显示名为UserForm1,UserForm使用以下代码：
不显示它实际上还能加载UserForm装入内存。复杂UserForm可能需要几秒钟以显示。因为预先
您能加载到内存,UserForm可决定何时导致此开销。要加载到内存UserForm1不显示它,使用以下
代码：
LoadUserForm1
若要显示UserForm,必须使用以前已显示显示方法。
如何以暂时隐藏UserForm
如果要暂时隐藏UserForm,使用隐藏方法。可能想要隐藏UserForm如果应用程序涉及用户窗体之
间移动。要隐藏UserForm,使用以下代码：
如何从内存删除UserForm
要从内存,删除UserForm使用Unload语句。要卸载，名为UserForm1,UserForm使用以下代码：
UnloadUserForm1
如果您卸载UserForm，是与UserForm或者，是与UserForm上控件的事件过程中（例如,您单击
CommandButton控件）,您可以使用"我"关键字代替的UserForm名称。将关键字用于卸载
UserForm,"Me"使用以下代码：
UnloadMe
如何使用UserForm事件
支持许多预定义事件，可以附加到VBA过程。在事件发生时,该附加到事件过程运行。单个操作由
用户执行可初始化多事件。之间最经常对UserForm使用事件是Initialize事件、Click事件,和
Terminate事件。
注意包含事件过程VisualBasic模块可能称为"后面"UserForm模块。模块包含事件过程是不可见
的VisualBasic编辑器ProjectMicrosoftInternetExplorer窗口Modules集合中。您必须双击正文部
分UserForm以查看UserForm代码模块。
如何捕获UserForm事件
要捕获UserForm事件,请按照下列步骤操作：
1.
2.
Excel中创建新工作簿。
在工具菜单,指向宏,然后单击VisualBasic编辑器。
仅供个人学习参考
3.
4.
在插入菜单上,单击要在工作簿中插入UserFormUserForm。
双击以显示代码窗口对于UserFormUserForm。
模块,中键入如下代码：
PrivateSubUserForm_Click()
=Int(Rnd*500)
=Int(Rnd*750)
EndSub
PrivateSubUserForm_Initialize()
n="EventsEventsEvents!"
lor=RGB(10,25,100)
EndSub
PrivateSubUserForm_Resize()
5.
msg="Width:"&&Chr(10)&"Height:"&
MsgBoxprompt:=msg,Title:="ResizeEvent"
EndSub
PrivateSubUserForm_QueryClose(CancelAsInteger,CloseModeAsInteger)
msg="NowUnloading"&n
MsgBoxprompt:=msg,Title:="QueryCloseEvent"
EndSub
PrivateSubUserForm_Terminate()
msg="NowUnloading"&n
MsgBoxprompt:=msg,Title:="TerminateEvent"
EndSub
6. 在运行菜单上,单击运行子过程/用户窗体。
UserForm首先加载,时宏使用Initialize事件改为"事件事件事件!"和BackColor属性以深蓝色的
UserFormCaption属性。
当您单击UserForm,您初始化Click事件。调整UserFormClick事件。因为您创建Resize事件,过
程单击UserForm后收到两个消息框。因为Click事件代码更改宽度属性和Height属性是
UserFormResize事件发生两次。
关闭UserForm初始化QueryClose事件。QueryClose事件显示消息框包含标题为Initialize事件，
您赋予UserForm代码中。可以使用时要执行特定的操作集如果用户关闭UserFormQueryClose
事件。
然后生成一个消息框，指出标题为UserForm是UserForm1Terminate事件。从内存中删除
UserForm并返回到其原始状态标题为UserForm后Terminate事件发生。
如何防止UserForm关闭通过关闭按钮
当您运行UserForm,关闭按钮添加到UserForm窗口的右上角。如果要防止UserForm关闭通过关
闭按钮,您必须捕获QueryClose事件。
仅供个人学习参考
版权声明：本文标题：vba控件常规使用UserForm 基础 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/b/1711554892a599736.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论