Excel窗体编程案例说明

1、Excel窗体编程案例说明 窗体和命令按钮 标签和文本框 单选按钮、复选框和框架 定时器 输入框和消息框 列表框和组合框 滚动条 控件应用综合案例 主要内容主要内容 窗体和常用控件编程窗体和常用控件编程 Excel窗体编程案例说明 1.1 案例案例4-1窗体编程案例说明窗体编程案例说明 程序运行后，窗体的标题为程序运行后，窗体的标题为“窗体变化窗体变化”，窗体的右上，窗体的右上 角无角无“最大化最大化”按钮和按钮和“最小化最小化”按钮，单击窗体中按钮，单击窗体中 不同的按钮窗体发生相应的变化。单击不同的按钮窗体发生相应的变化。单击“窗体变大窗体变大”、 “窗体变小窗体变小”按钮，窗体的长和宽都

2、会随着变大和缩按钮，窗体的长和宽都会随着变大和缩 小，单击小，单击“窗体最大窗体最大”按钮后，窗体最大化，同时按钮后，窗体最大化，同时 “窗体变大窗体变大”、“窗体变小窗体变小”、“窗体居中窗体居中”三个按三个按 钮不能使用，单击钮不能使用，单击“窗体恢复窗体恢复”按钮后，窗体恢复为按钮后，窗体恢复为 启动该窗体时的大小状态，同时启动该窗体时的大小状态，同时“窗体变大窗体变大”、“窗窗 体变小体变小”、“窗体居中窗体居中”恢复有效，单击恢复有效，单击“窗体居中窗体居中” 按钮后，窗体位于屏幕的中间，单击按钮后，窗体位于屏幕的中间，单击“为窗体设置颜为窗体设置颜 色色”、“为窗体加载图片为窗体加

3、载图片”按钮则分别给窗体设置颜按钮则分别给窗体设置颜 色或加载图片。色或加载图片。 Excel窗体编程案例说明 1.2 程序实现程序实现 1.界面设计界面设计 在窗体上添加在窗体上添加7个命令按钮，并设置控件的相关属个命令按钮，并设置控件的相关属 性：性： 对象名称对象名称属性属性值值 Form1Form1 CaptionCaption窗体变化窗体变化 MaxButtonMaxButtonFalseFalse MinButtonMinButtonFalseFalse Command1Command1CaptionCaption窗体变大窗体变大 Command2Command2CaptionCa

4、ption窗体变小窗体变小 Command3Command3CaptionCaption窗体最大窗体最大 Command4Command4CaptionCaption窗体恢复窗体恢复 Command5Command5CaptionCaption窗体居中窗体居中 Command6Command6CaptionCaption为窗体设置颜色为窗体设置颜色 Command7Command7CaptionCaption为窗体设置属性为窗体设置属性 Excel窗体编程案例说明 1.2 程序实现程序实现 2.代码设计代码设计 Excel窗体编程案例说明 1.3 相关知识相关知识 1.窗体窗体 ：用户界面的基

5、础是窗体，各种控件必须建立在窗体上，：用户界面的基础是窗体，各种控件必须建立在窗体上， 窗体是一种容器控件。窗体是一种容器控件。 （1）窗体属性）窗体属性 （2）窗体事件）窗体事件 2. 命令按钮：用来执行某一功能，接受用户的操作信息，触发命令按钮：用来执行某一功能，接受用户的操作信息，触发 相应的事件过程，以实现指定的功能。相应的事件过程，以实现指定的功能。 （1）命令按钮的属性：）命令按钮的属性： （2）命令按钮的事件：）命令按钮的事件： Excel窗体编程案例说明 1.4 拓展知识拓展知识 1.加载图片：为对象加载图片有两种方法，可以在设计界面时在加载图片：为对象加载图片有两种方法，可以

6、在设计界面时在 对象的属性窗口中设置对象的属性窗口中设置Picture属性，另一种方法是在程序运属性，另一种方法是在程序运 行时使用加载图片函数行时使用加载图片函数LoadPicture（文件名）为对象加载图（文件名）为对象加载图 片。加载图片的语句格式为：片。加载图片的语句格式为： 对象名对象名.Picture=LoadPicture（文件名文件名） 对象名对象名.Picture=LoadPicture（App.Path+“文件名文件名.扩展扩展 名名”） 要删除加载的图片则可以使用如下语句：要删除加载的图片则可以使用如下语句： 对象名对象名.Picture=LoadPicture() 2.

7、颜色常数：颜色常数：VB中将常用的颜色用指定的名字表示，不需要声中将常用的颜色用指定的名字表示，不需要声 明，可以直接引用，这些名字称为颜色常数，从颜色常数可明，可以直接引用，这些名字称为颜色常数，从颜色常数可 以看出其所代表的颜色。以看出其所代表的颜色。 Excel窗体编程案例说明 2.1 复制文本案例说明复制文本案例说明 主要介绍标签控件和文本框控件的属性和编程方法。主要介绍标签控件和文本框控件的属性和编程方法。 程序运行后，窗体上出现一条程序运行后，窗体上出现一条“提示信息提示信息”，单击后出现两个，单击后出现两个 文本框，文本框，“提示信息提示信息”的内容发生改变。在其中任何一个文本的

8、内容发生改变。在其中任何一个文本 框输入文本，另一个文本框则显示相同的内容。框输入文本，另一个文本框则显示相同的内容。 Excel窗体编程案例说明 2.2 程序实现程序实现 界面设计：在窗体上添加界面设计：在窗体上添加1个标签控件、个标签控件、2个文本框个文本框 对象名称对象名称属性属性值值 Form1Caption文本框操作文本框操作 Label1Caption单击我单击我 Text1Text为空为空 Text2Text为空为空 2.代码设计：代码设计： Excel窗体编程案例说明 2.3 相关知识相关知识 1.标签：可以用标签实现接收信息和显示信息。标签：可以用标签实现接收信息和显示信息。

9、 （1）标签属性）标签属性 （2）标签事件）标签事件 2.文本框：用于在窗体中为用户提供一个既能显示文本又文本框：用于在窗体中为用户提供一个既能显示文本又 能编辑文本的区域。能编辑文本的区域。 （1）文本框属性）文本框属性 （2）文本框事件）文本框事件 （3）文本框方法）文本框方法 Excel窗体编程案例说明 2.4 文本复制文本复制 1.案例说明：这是一个简单的剪贴板应用程序。程序由案例说明：这是一个简单的剪贴板应用程序。程序由 一个标签，二个文本框和四个按钮组成。单击一个标签，二个文本框和四个按钮组成。单击“复制复制” 或或“剪切剪切”按钮，然后单击按钮，然后单击“粘贴粘贴”按钮，可以把在

10、按钮，可以把在 第一个文本框中选中的内容复制或剪切到第二个文本第一个文本框中选中的内容复制或剪切到第二个文本 框中。框中。 Excel窗体编程案例说明 3.1字体设置案例说明字体设置案例说明 本案例演示如何为文本框中的文本设置字体样式本案例演示如何为文本框中的文本设置字体样式 和字体大小。程序运行后出现如图和字体大小。程序运行后出现如图3-7所示，所示， 两个框架控件内分别包含了一组单选按钮控件两个框架控件内分别包含了一组单选按钮控件 和一组复选按钮控件，单击这两组控件，可以和一组复选按钮控件，单击这两组控件，可以 把文本框中的文本字体分别设置成把文本框中的文本字体分别设置成“粗体粗体”、 “

11、斜体斜体”及添加及添加“下划线下划线”或是这三种的组合。或是这三种的组合。 单击单选按钮可以设置文本框中文字的分别为单击单选按钮可以设置文本框中文字的分别为 “18”、“24”和和“28”，只能设置一种字体大，只能设置一种字体大 小。小。 Excel窗体编程案例说明 3.2 程序实现程序实现 1.界面设计：在窗体中添加一个文本框，两个框架界面设计：在窗体中添加一个文本框，两个框架 （Frame），在第一个框架中添加三个复选框），在第一个框架中添加三个复选框 （CheckBox），在第二框架种添加三个单选框），在第二框架种添加三个单选框 （OptionButton），）， 2.代码设计：对两个命

12、令按钮代码设计：对两个命令按钮 的单击事件进行编程。的单击事件进行编程。 2.代码设计：代码设计： Excel窗体编程案例说明 3.3 相关知识相关知识 1.框架：框架的作用是将窗体内的控件分组，将具有联框架：框架的作用是将窗体内的控件分组，将具有联 系的一类控件单独分成一组放置在框架中。系的一类控件单独分成一组放置在框架中。 （1）框架的属性和事件）框架的属性和事件 （2）使用框架的注意事项）使用框架的注意事项 2.单选按钮：常常成组出现，主要用于单选按钮：常常成组出现，主要用于“多选一多选一”的问的问 题。用户在一组单选按钮中必须选择一项，并且最多题。用户在一组单选按钮中必须选择一项，并且

13、最多 只能选择一项。只能选择一项。 3.复选框：复选框（复选框：复选框（CheckBox）也称为检查框，单击）也称为检查框，单击 复选框一次被选中，左边出现复选框一次被选中，左边出现“”号，再次单击则号，再次单击则 取消选中。清除复选框中的取消选中。清除复选框中的“”。可同时使多个复。可同时使多个复 选框同时处于选中状态，进行多种情况的组合。选框同时处于选中状态，进行多种情况的组合。 Excel窗体编程案例说明 3.4 拓展知识拓展知识 1.字体样式字体样式 Excel窗体编程案例说明 4.1趣味计时器案例说明趣味计时器案例说明 本案例实现一个多功能计时器的应用，以此来介绍时钟本案例实现一个多

14、功能计时器的应用，以此来介绍时钟 控件。用控件。用4个文本框分别用来显示个文本框分别用来显示“当前时间当前时间”、 “开始时间开始时间”、“结束时间结束时间”、“共计耗时共计耗时”，有三，有三 个命令按钮，个命令按钮，“开始开始”、“停止停止”和和“退出退出”。用来。用来 控制开始计时的时刻和停止的时刻，另一个按钮用来控制开始计时的时刻和停止的时刻，另一个按钮用来 退出应用程序。当程序运行时，退出应用程序。当程序运行时，“开始开始”按钮可用，按钮可用， “停止停止”按钮不可用。当需要进行计时的时候单击一按钮不可用。当需要进行计时的时候单击一 下下“开始开始”按钮，同时按钮，同时“停止停止”按钮

15、可用。当需要停按钮可用。当需要停 止时，单击一下止时，单击一下“停止停止”按钮，则停止计时，在按钮，则停止计时，在“共共 计耗时计耗时”文本框中显示从开始计时到停止计时所花的文本框中显示从开始计时到停止计时所花的 时间，精确到时间，精确到0.1秒。秒。 为了增加动感，在窗体上添加了两个图像框控件，两幅为了增加动感，在窗体上添加了两个图像框控件，两幅 相似的图片以相似的图片以1秒的时间间隔交替显示，同时会发出秒的时间间隔交替显示，同时会发出 “嘟、嘟嘟、嘟”的声音。的声音。 Excel窗体编程案例说明 4.2 程序实现程序实现 1.界面设计：在窗体上添加界面设计：在窗体上添加4个标签控件、个标签

16、控件、4个文本框控个文本框控 件、件、3个命令按钮、个命令按钮、2个图像框、个图像框、1个图片框、个图片框、3个时钟控个时钟控 件。件。 2.代码设计：代码设计： Excel窗体编程案例说明 4.3 相关知识相关知识 1.定时器控件：定时器控件（定时器控件：定时器控件（Timer）是一种按一定）是一种按一定 时间间隔触发事件的控件，用以实现定时执行指时间间隔触发事件的控件，用以实现定时执行指 定的操作。该控件在设计可见，而在运行时是不定的操作。该控件在设计可见，而在运行时是不 可见的。可见的。 （1）定时器属性：）定时器属性： （2）定时器事件：）定时器事件： 2.图像框控件和图片框：图像框控

17、件和图片框： Excel窗体编程案例说明 4.4 拓展知识拓展知识 1.Beep语句：通过喇叭发出一个声调。语句：通过喇叭发出一个声调。 2.Time函数和函数和Time语句语句 Time函数：返回一个指明当前系统时间的函数。为函数：返回一个指明当前系统时间的函数。为 了设置系统时间可以使用了设置系统时间可以使用Time语句。例如：语句。例如： n=Time Time语句：用来设置系统时间，时间参数可以使用语句：用来设置系统时间，时间参数可以使用 任何能够表示时刻的数值表达式、字符串表达式任何能够表示时刻的数值表达式、字符串表达式 或它们的组合。如果或它们的组合。如果Time是一个字符串，系统

18、利是一个字符串，系统利 用时间分隔符将其转换成一个时间，如果无法转用时间分隔符将其转换成一个时间，如果无法转 换成一个有效的时间，则会导致错误发生。换成一个有效的时间，则会导致错误发生。 Excel窗体编程案例说明 5.1求三角形面积案例说明求三角形面积案例说明 要求用输入框从键盘输入三个数，作为三角形的要求用输入框从键盘输入三个数，作为三角形的 三条边。在计算面积之前，首先要判断这三个三条边。在计算面积之前，首先要判断这三个 数作为三条边是否能构成三角形，如果不能构数作为三条边是否能构成三角形，如果不能构 成三角形，则给出提示信息，并可选择重新输成三角形，则给出提示信息，并可选择重新输 入或

19、退出执行；如果能构成三角形则用入或退出执行；如果能构成三角形则用“消息消息 框框”把三角形的面积显示出来。注意这两种消把三角形的面积显示出来。注意这两种消 息框的不同之处。息框的不同之处。 Excel窗体编程案例说明 5.2 程序实现程序实现 1.界面设计：界面设计： 2.代码设计：代码设计： Excel窗体编程案例说明 5.3 相关知识相关知识 1.输入框：把数据输入计算机，使用输入框：把数据输入计算机，使用VB提供的提供的InputBox 函数生成的输入框来进行数据信息的输入。函数生成的输入框来进行数据信息的输入。 InputBox函数的一般格式为：函数的一般格式为： InputBox(

20、,标题标题 ,缺省值缺省值 ,x坐标位置坐标位置 ,y坐标位置坐标位置) 该函数产生一个对话框，作为输入数据的界面，等待用该函数产生一个对话框，作为输入数据的界面，等待用 户输入正文或按下按钮，函数返回值是字符串类型：户输入正文或按下按钮，函数返回值是字符串类型： 几点说明：几点说明： Excel窗体编程案例说明 5.3 相关知识相关知识 2.消息框：用消息框：用MsgBox语句或语句或MsgBox函数产生的，两者函数产生的，两者 的不同之处在于的不同之处在于MsgBox函数会产生一个与用户所选函数会产生一个与用户所选 择按钮相对应的整数。择按钮相对应的整数。 （1）MsgBox函数：格式为：

21、函数：格式为： MsgBox（提示（提示 ，按钮组合，按钮组合，标题，标题） 按钮组合说明：按钮组合说明： Excel窗体编程案例说明 类别类别符号常量符号常量值值含义含义 按钮的类型按钮的类型 vbOKOnlyvbOKOnly0 0只显示只显示“确定确定”按钮按钮 vbOKCancelvbOKCancel1 1显示显示“确定确定”和和“取消取消”按钮按钮 vbAbortRetryIgnorevbAbortRetryIgnore2 2 显示显示“放弃放弃”、“重试重试”和和“忽略忽略” 按钮按钮 vbYesNoCancelvbYesNoCancel3 3 显示显示“是是”、“否否”和和“取消取

22、消”按按 钮钮 vbYesNovbYesNo4 4显示显示“是是”和和“否否”按钮按钮 vbRetryCancelvbRetryCancel5 5显示显示“重试重试”和和“取消取消”按钮按钮 图标样式图标样式 vbCriticalvbCritical1616图标图标 vbQuestionvbQuestion3232图标图标 vbExclamationvbExclamation4848图标图标 vbInformationvbInformation6464图标图标 默认按钮默认按钮 vbDefaultButton1vbDefaultButton10 0第一个按钮为默认按钮第一个按钮为默认按钮 vb

23、DefaultButton2vbDefaultButton2256256第二个按钮为默认按钮第二个按钮为默认按钮 vbDefaultButton3vbDefaultButton3512512第三个按钮为默认按钮第三个按钮为默认按钮 Excel窗体编程案例说明 表表4-11 MsgBox4-11 MsgBox函数的返回值函数的返回值 值值符号常量符号常量用户操作用户操作 1 1vbOKvbOK单击单击“确定确定”按钮按钮 2 2vbCancelvbCancel单击单击“取消取消”按钮按钮 3 3vbAbortvbAbort单击单击“放弃放弃”按钮按钮 4 4vbRetryvbRetry单击单击“

24、重试重试”按钮按钮 5 5vbIgnorevbIgnore单击单击“忽略忽略”按钮按钮 6 6vbYesvbYes单击单击“是是”按钮按钮 7 7vbNovbNo单击单击“否否”按钮按钮 Excel窗体编程案例说明 （2）MsgBox语句语句 消息框也可以写成语句的形式，即消息框也可以写成语句的形式，即 MsgBox 提示提示 ，按钮组合，按钮组合，标题，标题 其中各参数的含义及作用与其中各参数的含义及作用与MsgBox函数相同，只是函数相同，只是 MsgBox语句没有返回值，因而常用于较简单的信息语句没有返回值，因而常用于较简单的信息 提示。提示。 5.3 相关知识相关知识 Excel窗体编

25、程案例说明 5.4 拓展知识拓展知识 GoTo语句语句 GoTo语句的格式：语句的格式：GoTo | GoTo的功能是无条件转移到标号或行号所指的功能是无条件转移到标号或行号所指 定的语句执行，而且只能是同一过程中的语定的语句执行，而且只能是同一过程中的语 句。句。是一个字符系列，首字符必须为是一个字符系列，首字符必须为 字母，标号的后面必须有一个冒号字母，标号的后面必须有一个冒号“：”； 而而可以是一个数字序列。理解本案例可以是一个数字序列。理解本案例 中中Goto语句的作用。语句的作用。 不过在程序设计时，应尽量避免使用不过在程序设计时，应尽量避免使用GoTo语语 句，以提高可读性。句，以

26、提高可读性。 Excel窗体编程案例说明 6.1项目选择案例说明项目选择案例说明 本案例是一个列表框和组合框的简单应用。先选本案例是一个列表框和组合框的简单应用。先选 择择“姓名姓名”的列表框，然后从的列表框，然后从“项目项目”列表框列表框 中选择项目，此时在列表框中就会显示姓名和中选择项目，此时在列表框中就会显示姓名和 运动项目。如果要删除某项，则可先选中该项，运动项目。如果要删除某项，则可先选中该项， 然后单击然后单击“删除删除”按钮。单击按钮。单击“清空清空”按钮，按钮， 则可把列表框中的内容全部删除。则可把列表框中的内容全部删除。 Excel窗体编程案例说明 6.2 程序实现程序实现

27、1.界面设计：在窗体上添加界面设计：在窗体上添加2个组合框、个组合框、1个列表框、两个列表框、两 个命令按钮，适当调整它们的大小和位置。个命令按钮，适当调整它们的大小和位置。 2.代码设计：代码设计： Excel窗体编程案例说明 6.3 相关知识相关知识 1.列表框：主要用途在于提供列表式的多个数据项供用列表框：主要用途在于提供列表式的多个数据项供用 户选择。如果项目总数超过了可显示的项目数，则系户选择。如果项目总数超过了可显示的项目数，则系 统会自动在列表框边上加上一个垂直滚动条。统会自动在列表框边上加上一个垂直滚动条。 （1）属性（）属性（2）方法）方法 （3）事件）事件 2.组合框：将文

28、本框和列表框的功能结合在一起，它可组合框：将文本框和列表框的功能结合在一起，它可 以像列表框控件一样让用户通过鼠标选择所需要的项以像列表框控件一样让用户通过鼠标选择所需要的项 目，也可以像文本框控件一样，用键盘输入的方法选目，也可以像文本框控件一样，用键盘输入的方法选 择项目。择项目。 （1）属性（）属性（2）方法）方法 （3）事件）事件 Excel窗体编程案例说明 7.1调色板案例说明调色板案例说明 用一个标签制作一个调色板，通过三个滚动条来用一个标签制作一个调色板，通过三个滚动条来 调整这个标签的前景色和背景色，而且前景色调整这个标签的前景色和背景色，而且前景色 和背景色是互为补色，如图和背景色是互为补色，如图4-18所示。前景色所示。前景色 和背景色的调节用和背景色的调节用RGB函数，而三个滚动条的函数，而三个滚动条的 当前值作为当前值作为RGB函数的三个参数，分别代表了函数的三个参数，分别代表了 RGB中的红、绿和蓝色所占的比重；每个滚动中的红、绿和蓝色所占的比重；每个滚动 条旁都有一个标签，用以显示每个滚动条的当条旁都有一个标签，用以显示每个滚动条的当