VBA专题05-1:一文彻底掌握用户窗体编程基础知识(上)

引子:本文改编著自Microsoft很久以前的一篇技术文章,虽然年代已久,但完全不过时。文章以完整的示例详细介绍了用户窗体的基本概念及常用技术,能够帮助你快速掌握用户窗体编程基础。

概述

当使用MsgBox函数和InputBox函数不能满足与用户交互的需求时,可以使用用户窗体来自定义对话框。能够使用用户窗体来显示所输入的数据,甚至能够使用用户窗体创建一个完整的用户界面,而不会让用户接触到电子表格本身。

在Windows对话框中所看到的大多数控件都能在用户窗体中实现,例如命令按钮、选项按钮、复选框、文本框、组合框,以及一些其它不常用的控件如图像、日历,等等。

本文介绍了用户窗体的基本概念,以及使用用户窗体的常用技术,在其中穿插讲解了一些最通用的思路,最后给出了一个包含所有过程的完整示例文件,以及实现这些过程的代码,让你能在实践中看到所有工作的基本原理和方法。

本文包含以下内容:

1.基本的用户窗体操作

2.用户窗体和控件的属性

3.用户窗体的生命周期

4.用户窗体和控件的事件

5.问题1:如何在用户窗体间传递数据?

6.问题2:如何找到用户窗体中的某类控件?

7.问题3:如何获取数据到列表框中?

8.问题4:如何创建进度条?

9.一个完整的用户窗体综合示例

基本的用户窗体操作

1.创建一个用户窗体。打开VBE编辑器(选择“开发工具”选项卡中的“VisualBasic”或按Alt+F11组合键),选择菜单“插入——用户窗体”,或者在工程资源管理器窗口中单击右键,从弹出的快捷菜单中选择“插入——用户窗体”,即可创建一个用户窗体。

2.添加控件。当创建了一个用户窗体后,将会显示一个名为“工具箱”的浮动控件工具箱(如果没有该工具箱的话,可以从视图菜单中找到它),其中显示了最常用的控件。单击想要的控件,在用户窗体中进行绘制。

3.更多的控件。有一些更多的可用的控件,可以在控件工具箱中单击右键,从快捷菜单中选择“附加控件”,能够添加日历、电子表格、图形等等其它控件。

4.添加事件程序。事件允许当用户对窗体和控件进行操作时作出相应的反应,事件程序要放置在用户窗体模块中,能够通过双击用户窗体或控件来打开代码模块窗口,或者在用户窗体或控件中单击右键,从快捷菜单中选择“查看代码”来打开代码模块窗口,或者在工程资源管理器窗口中的用户窗体图标上单击右键后选择“查看代码”来打开代码模块窗口。然后,在代码模块窗口中,对用户窗体或控件添加相应的事件程序代码。

5.显示用户窗体。打开用户窗体模块,按F5键可以运行宏程序,或者单击工具栏中的运行按钮,将显示用户窗体。注意,在用户窗体模块中按F5键并不会运行光标所在的子过程,而是运行用户窗体自身。

6.调试。和在宏程序中一样,按F8键可以逐语句运行代码。

用户窗体和控件的属性

用户窗体和控件都有属性(如尺寸、位置,等等),在设置用户窗体时能够改变这些属性,并且也能够在运行时通过代码来改变它们中的大多数属性。在设置用户窗体时所选择的值是缺省值,而在运行时所作的变化仅当用户窗体被装载时有效。

两个最重要的属性是Name属性和Value属性:

1.Name属性可用于指定某个控件。当然,可以通过控件的索引号来指定控件,但这样会难于理解和调试,因此,使用名称更可取。

2.Value属性是实际输入或者输出的数据。在不同的控件中,该属性值稍有区别。例如,选项按钮控件和复选框控件的Value属性值为True/False,而文本框控件的Value值则是该文本框所包含的文本。Value属性既可用于输入,也可用于输出。

例如:

txtFirstName.Text = Range("A1").Value Range("B1").Value = optVegetarian.Value

一个好习惯

给用户窗体和控件起一个具有描述性且分类清楚的名字,是一个习惯。最好在每类控件名前加一个前缀来代表该控件的类型,例如,frm代表用户窗体,opt代表选项按钮,等等。这样,将会使代码更易阅读,并且也方便应用一些使代码更为简洁的技巧。

指定控件和用户窗体,以及Me关键字

当在用户窗体代码模块中指定窗体中的控件时,可以通过名字指定它们,例如txtFirstName.value="John"。而对于在其它用户窗体中的控件,用户窗体名称应该放在控件名之前,例如,frmEmployees.lstDepartments。

同样的方法对在用户窗体模块中所声明的公共变量也是有效的——这是用户窗体的基本属性(例如,frmImputs.AllDone)。注意,不能在用户窗体的代码模块中声明全局变量。

Me是一个在用户窗体的代码模块中指定该用户窗体的快捷方式(例如,Me.Height表示当前用户窗体的高度)。又如,在用户窗体UserForm1中指定TextBox1:

'在当前用户窗体模块中Me.TextBox1.Text" ="Example" '在不同的模块中UserForm1.TextBox1.Text ="Example"

用户窗体的生命周期——显示和关闭

可以在用户窗体窗口中或者是在用户窗体的代码模块中,按F5键来显示用户窗体。如果在模块中有一个Userform_Initialize过程,那么在用户窗体显示时,该过程将首先运行。

如果要使用代码显示和隐藏用户窗体(例如,可能想在frmIntro窗体中使用一个命令按钮来隐藏frmIntro窗体并显示frmMain窗体),应该使用Show方法(显示窗体)和Hide方法(隐藏窗体)。

装载和卸载

在用户窗体显示之前,必须将其装载到内存中。如果显示一个没有装载的用户窗体,该窗体将自动装载。事实上,用户窗体中的任何引用或者变量或者控件或者属性都将强制装载,并且触发初始化事件。如果想初始化用户窗体但不显示窗体的话,可以使用如下方式装载:

Load frmMain

在隐藏了用户窗体后,该窗体仍然被装载。如果再次显示它,初始化程序不会再次运行。(但Activate程序将会运行)。为了从内存中清除窗体,必须卸载(unload)它。当用户单击关闭按钮关闭窗体时,用户窗体将被自动卸载。

因此,用户窗体装载和卸载的顺序是:

装载(Load)—显示(Show)—……—隐藏(Hide)—卸载(Unload)。

卸载会清除用户窗体模块中的所有的变量——类似于停止了一个过程。用户已经输入的任何数值都将丢失,控件将恢复为属性窗口中输入的缺省值。如果想保存它们的值,则需要在卸载用户窗体前进行保存。

模式和无模式

用户窗体可在两种“模式”之间显示,即模式或者无模式。模式窗体不允许用户当窗体显示时还能够在Excel中进行其它的操作,像MsgBox对话框一样。无模式窗体则允许用户当窗体显示时在Excel中进行其它操作,然后回到用户窗体中来。

当无模式窗体显示时,代码将在后台继续执行。能够使代码暂时停止,直到用户窗体关闭后继续执行。可使用一个循环语句来检查用户窗体是否已关闭:

Do Until frmOther.Visible =False DoEvents

Loop

缺省设置是模式窗体。一旦用户窗体作为模式窗体显示后,不能将它改变为无模式窗体。必须先隐藏该窗体,然后再显示它,并指定为无模式窗体。

无模式窗体仅对Excel2000及以上版本有效。

用户窗体和控件的事件

事件允许用户窗体和控件对用户所做的操作做出相应的反应。可能熟悉Excel VBA事件,例如Workbook_Open事件、Worksheet_Change事件,等等。在Excel中,如果没有事件,还能做许多操作,但是在用户窗体中,如果没有事件的话,用户窗体几乎没什么作用。

1.最常用的用户窗体事件包括窗体初始化(Initialize)、窗体激活(Activate)、窗体请求关闭(QueryClose)、以及单击窗体(Click)。

2.用户窗体中控件的常用事件包括更新后(AfterUpdate)、变化(Change)、单击(Click)、输入(Enter)、以及退出(Exit)。

为了插入某对象的事件过程,可以在该对象上单击右键,在快捷菜单中选择“查看代码”,将会自动创建一个该控件标准的事件过程。如果想创建不同的事件过程,可以从VBE窗口顶部右侧的下拉列表中选择想要创建的事件过程。还有一个方法是,可以先进入用户窗体代码窗口,在代码窗口顶部的左侧的下拉列表中选择对象,在右侧的下拉列表中选择相应的事件。

用户窗体初始化

最重要的用户窗体事件是初始化(Initialize)事件。初始化是发生在用户窗体中的第一件事情——只要用户窗体开始装载,就会触发初始化事件。

在这里,可以初始化变量和控件。例如,能够从电子表格中更新最新的数据到文本框中、改变文本框的缺省值为当天的日期,等等。

请求关闭和中止

结束用户窗体的事件有两个:请求关闭(QueryClose)和中止(Terminate)。请求关闭事件首先发生,并且给你取消的机会(不会关闭窗体);中止事件是最终的并不能取消。

因此,事件的顺序是:

初始化(Initialize)—……—请求关闭(QueryClose)—中止(Terminate)。

激活用户窗体

如果不卸载用户窗体而只是隐藏它,然后再显示它,初始化事件不会再运行。但是,激活(Activate)事件将会发生。当用户窗体每次获得焦点时,都会触发激活事件。在每次显示用户窗体时,该事件也会发生。如果有几个用户窗体同时可见,那么当在这些窗体之间切换时,激活事件也会被触发。

带参数的事件

和Excel的事件一样,一些窗体事件也带有参数,提供更多的关于怎样触发事件和为什么会触发事件的信息。例如,UserForm_KeyDown事件将告诉按下了哪个按键。当在VBE中使用代码窗口顶部的下拉菜单创建一个事件过程时,该过程会自动为它的所有参数设置合适的值。

一些参数是只读的,而另一些参数则可读写。例如,发生在用户窗体关闭前的Userform_QueryClose事件,带有一个取消(Cancel)参数,在该过程中设置Cancel=True,将忽略该事件,并且该窗体不会被关闭。

原文发布于微信公众号 - 完美Excel(excelperfect)

原文发表时间:2019-09-13

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

发表于

我来说两句

0 条评论
登录 后参与评论

扫码关注云+社区

领取腾讯云代金券