VBA制作分享 制作欢迎界面

《实例介绍》

制作一个简单的欢迎界面，当用户单击“欢迎”按钮时，显示欢迎词并提示输入用户名，当单击“结束”按钮时，结束程序。运行界面如下图所示，不含其它功能。

《开发过程》

（1）Alt+F11打开VBA编辑界面，鼠标右键>插入>用户窗体，默认窗体为UserForm1（名字可以自行修改）；

（2）向UserForm1窗体中添加两个标签和一个文本框，添加两个命令按钮，并修改它们的标题属性（用来显示相应的文字，也可以用代码修改）；

（3）设置标签和文本框的Visible属性为False；

（4）双击命令按钮，添加相应的代码；

《代码分享》

下面贴上相应的代码，以便有兴趣的人复制粘贴。

Private Sub CommandButton1_Click() '欢迎按钮

  Label1.Visible = True          '设置标签可见

  Label2.Visible = True          '设置标签可见

  TextBox1.Visible = True        '设置文本框可见

End Sub

Private Sub CommandButton2_Click() '结束按钮

  Unload Me                      '卸载用户窗体

End Sub

不定期分享相关内容，如有好的建议欢迎在下方留言！