ExcelVBA 用户窗体编程基础

ExcelVBA用户窗体编程基础

概述

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

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

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

本文包含以下内容：

● 基本的用户窗体操作

● 用户窗体和控件的属性

● 一个用户窗体的生命周期

● 用户窗体和控件的事件

● 问题

● 问题

● 问题

● 问题1：如何在用户窗体间传递数据？ 2：如何找到我的窗体中的某类控件？ 3：如何获取数据到列表框中？ 4：如何为循环创建进度条？

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

基本的用户窗体操作

创建一个窗体。打开VBE编辑器(选择菜单“工具——宏——Visual Basic编辑器”或

按Alt+F11组合键)，选择菜单“插入——用户窗体”，或者在工程窗口中单击右键，从弹出的快捷菜单中选择“插入——用户窗体”，即可创建一个窗体。

添加控件。当你创建了一个窗体后，将会显示一个名为“控件工具箱”的浮动工具箱(如

果没有该工具箱的话，您可以从视图菜单中找到它)，其中显示了最普遍的控件类型。

单击您想要的控件，拖动它到您的用户窗体中。

更多的控件。有一些更多的可用的控件，您可以在控件工具箱中单击右键，从中选择“附加控件”，您能添加日历、电子表格、图形，等等。 添加事件程序。事件允许当用户对窗体和控件进行操作时作出相应的反应，事件程序要

放置在用户窗体模块中，您能通过双击窗体或控件来打开代码模块窗口，或者在窗体或控件中单击右键，从快捷菜单中选择“查看代码”来打开代码模块窗口，或者在工程窗口中的用户窗体图标上单击右键后选择“查看代码”来打开代码模块窗口。然后，在代码模块窗口中，对窗体或控件添加相应的事件程序代码。

显示窗体。打开窗体模块，按F5键可以运行宏程序，或者单击工具栏中的运行按钮，

将显示用户窗体。注意，在窗体模块中按F5键并不会运行光标所在的子过程，而是运行用户窗体自身。

调试。和在宏程序中一样，按F8键允许您逐语句运行代码。

用户窗体和控件的属性

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

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

Name属性可用于指定某个控件。您能通过控件的索引号指定控件，但这样会难于理解和调试，因此，使用名称是更可取的。 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及以上版本有效。

用户窗体和控件的事件

事件允许窗体和控件对用户所做的操作作出相应的反应。您可能熟悉ExcelVBA事件，如

Workbook_Open，Worksheet_Change等等。在Excel中，如果没有事件，您能做一些操作，但是在窗体中，如果 …… 此处隐藏：5684字，全部文档内容请下载后查看。喜欢就下载吧 ……