《Excel窗体编程案例说明》由会员分享，可在线阅读，更多相关《Excel窗体编程案例说明（34页珍藏版）》请在金锄头文库上搜索。
1、窗体和命令按钮 标签和文本框 单选按钮、复选框和框架 定时器 输入框和消息框 列表框和组合框 滚动条 控件应用综合案例 主主要要内内容容窗窗体体和和常常用用控控件件编编程程1.1 案例案例4-1窗体编程案例说明窗体编程案例说明 程序运行后，窗体的标题为程序运行后，窗体的标题为“窗体变化窗体变化”，窗体的右上，窗体的右上角无角无“最大化最大化”按钮和按钮和“最小化最小化”按钮，单击窗体中按钮，单击窗体中不同的按钮窗体发生相应的变化。单击不同的按钮窗体发生相应的变化。单击“窗体变大窗体变大”、“窗体变小窗体变小”按钮，窗体的长和宽都会随着变大和缩按钮，窗体的长和宽都会随着变大和缩小，单击小，单击“
2、窗体最大窗体最大”按钮后，窗体最大化，同时按钮后，窗体最大化，同时“窗体变大窗体变大”、“窗体变小窗体变小”、“窗体居中窗体居中”三个按钮三个按钮不能使用，单击不能使用，单击“窗体恢复窗体恢复”按钮后，窗体恢复为启按钮后，窗体恢复为启动该窗体时的大小状态，同时动该窗体时的大小状态，同时“窗体变大窗体变大”、“窗体窗体变小变小”、“窗体居中窗体居中”恢复有效，单击恢复有效，单击“窗体居中窗体居中”按钮后，窗体位于屏幕的中间，单击按钮后，窗体位于屏幕的中间，单击“为窗体设置颜为窗体设置颜色色”、“为窗体加载图片为窗体加载图片”按钮则分别给窗体设置颜按钮则分别给窗体设置颜色或加载图片。色或加载图片。
3、1.2 程序实现程序实现1.界面设计界面设计在窗体上添加在窗体上添加7个命令按钮，并设置控件的相关属个命令按钮，并设置控件的相关属性：性：对象名称对象名称属性属性值值Form1Form1CaptionCaption窗体窗体变化化MaxButtoMaxButton nFalseFalseMinButtoMinButton nFalseFalseCommand1Command1CaptionCaption窗体窗体变大大Command2Command2CaptionCaption窗体窗体变小小Command3Command3CaptionCaption窗体最大窗体最大Command4Command4
4、CaptionCaption窗体恢复窗体恢复Command5Command5CaptionCaption窗体居中窗体居中Command6Command6CaptionCaption为窗体窗体设置置颜色色Command7Command7CaptionCaption为窗体窗体设置属置属性性1.2 程序实现程序实现 2.代码设计代码设计1.3 相关知识相关知识 1.窗体窗体 ：用户界面的基础是窗体，各种控件必须建立在窗体上，：用户界面的基础是窗体，各种控件必须建立在窗体上，窗体是一种容器控件。窗体是一种容器控件。（1）窗体属性）窗体属性（2）窗体事件）窗体事件2. 命令按钮：用来执行某一功能，接受用
5、户的操作信息，触发相命令按钮：用来执行某一功能，接受用户的操作信息，触发相应的事件过程，以实现指定的功能。应的事件过程，以实现指定的功能。（1）命令按钮的属性：）命令按钮的属性：（2）命令按钮的事件：）命令按钮的事件： 1.4 拓展知识拓展知识 1.加载图片：为对象加载图片有两种方法，可以在设计界面时在加载图片：为对象加载图片有两种方法，可以在设计界面时在对象的属性窗口中设置对象的属性窗口中设置Picture属性，另一种方法是在程序运属性，另一种方法是在程序运行时使用加载图片函数行时使用加载图片函数LoadPicture（文件名）为对象加载图（文件名）为对象加载图片。加载图片的语句格式为：片。
6、加载图片的语句格式为：对象名对象名.Picture=LoadPicture（文件名文件名）对象名对象名.Picture=LoadPicture（App.Path+“文件名文件名.扩展名扩展名”）要删除加载的图片则可以使用如下语句：要删除加载的图片则可以使用如下语句：对象名对象名.Picture=LoadPicture()2.颜色常数：颜色常数：VB中将常用的颜色用指定的名字表示，不需要声中将常用的颜色用指定的名字表示，不需要声明，可以直接引用，这些名字称为颜色常数，从颜色常数可以明，可以直接引用，这些名字称为颜色常数，从颜色常数可以看出其所代表的颜色。看出其所代表的颜色。返回返回2.1 复制文
7、本案例说明复制文本案例说明主要介绍标签控件和文本框控件的属性和编程方法。主要介绍标签控件和文本框控件的属性和编程方法。程序运行后，窗体上出现一条程序运行后，窗体上出现一条“提示信息提示信息”，单击后出现两个，单击后出现两个文本框，文本框，“提示信息提示信息”的内容发生改变。在其中任何一个文本的内容发生改变。在其中任何一个文本框输入文本，另一个文本框则显示相同的内容。框输入文本，另一个文本框则显示相同的内容。 2.2 程序实现程序实现 1.界面设计：在窗体上添加界面设计：在窗体上添加1个标签控件、个标签控件、2个文本框个文本框对象名称对象名称属性属性值值Form1Caption文本框操作文本框操
8、作Label1Caption单击我我Text1Text为空空Text2Text为空空2.代码设计：代码设计：2.3 相关知识相关知识 1.标签：可以用标签实现接收信息和显示信息。标签：可以用标签实现接收信息和显示信息。（1）标签属性）标签属性（2）标签事件）标签事件2.文文本本框框：用用于于在在窗窗体体中中为为用用户户提提供供一一个个既既能能显显示示文文本本又又能编辑文本的区域。能编辑文本的区域。（1）文本框属性）文本框属性（2）文本框事件）文本框事件（3）文本框方法）文本框方法2.4 文本复制文本复制 1.案例说明：这是一个简单的剪贴板应用程序。程序由案例说明：这是一个简单的剪贴板应用程序。
9、程序由一个标签，二个文本框和四个按钮组成。单击一个标签，二个文本框和四个按钮组成。单击“复制复制”或或“剪切剪切”按钮，然后单击按钮，然后单击“粘贴粘贴”按钮，可以把按钮，可以把在第一个文本框中选中的内容复制或剪切到第二个文在第一个文本框中选中的内容复制或剪切到第二个文本框中。本框中。 返回返回3.1字体设置案例说明字体设置案例说明本本案案例例演演示示如如何何为为文文本本框框中中的的文文本本设设置置字字体体样样式式和和字字体体大大小小。程程序序运运行行后后出出现现如如图图3-7所所示示，两两个个框框架架控控件件内内分分别别包包含含了了一一组组单单选选按按钮钮控控件件和和一一组组复复选选按按钮钮
10、控控件件，单单击击这这两两组组控控件件，可可以以把把文文本本框框中中的的文文本本字字体体分分别别设设置置成成“粗粗体体”、“斜斜体体”及及添添加加“下下划划线线”或或是是这这三三种种的的组组合合。单单击击单单选选按按钮钮可可以以设设置置文文本本框框中中文文字字的的分分别别为为“18”、“24”和和“28”，只只能能设设置置一一种种字字体体大小。大小。3.2 程序实现程序实现1.界界面面设设计计：在在窗窗体体中中添添加加一一个个文文本本框框，两两个个框框架架（Frame），在在第第一一个个框框架架中中添添加加三三个个复复选选框框（CheckBox），在在第第二二框框架架种种添添加加三三个个单单选
11、选框框（OptionButton）， 2.代代码码设设计计：对对两两个个命命令令按按钮钮的单击事件进行编程。的单击事件进行编程。 2.代码设计：代码设计：3.3 相关知识相关知识1.框架：框架的作用是将窗体内的控件分组，将具有联框架：框架的作用是将窗体内的控件分组，将具有联系的一类控件单独分成一组放置在框架中。系的一类控件单独分成一组放置在框架中。 （1）框架的属性和事件）框架的属性和事件（2）使用框架的注意事项）使用框架的注意事项2.单选按钮：常常成组出现，主要用于单选按钮：常常成组出现，主要用于“多选一多选一”的问的问题。用户在一组单选按钮中必须选择一项，并且最多题。用户在一组单选按钮中必
12、须选择一项，并且最多只能选择一项。只能选择一项。3.复选框：复选框（复选框：复选框（CheckBox）也称为检查框，单击）也称为检查框，单击复选框一次被选中，左边出现复选框一次被选中，左边出现“”号，再次单击则号，再次单击则取消选中。清除复选框中的取消选中。清除复选框中的“”。可同时使多个复。可同时使多个复选框同时处于选中状态，进行多种情况的组合。选框同时处于选中状态，进行多种情况的组合。3.4 拓展知识拓展知识1.字体样式字体样式返回返回4.1趣味计时器案例说明趣味计时器案例说明本案例实现一个多功能计时器的应用，以此来介绍时钟本案例实现一个多功能计时器的应用，以此来介绍时钟控件。用控件。用4
13、个文本框分别用来显示个文本框分别用来显示“当前时间当前时间”、“开始时间开始时间”、“结束时间结束时间”、“共计耗时共计耗时”，有三个，有三个命令按钮，命令按钮，“开始开始”、“停止停止”和和“退出退出”。用来控。用来控制开始计时的时刻和停止的时刻，另一个按钮用来退制开始计时的时刻和停止的时刻，另一个按钮用来退出应用程序。当程序运行时，出应用程序。当程序运行时，“开始开始”按钮可用，按钮可用，“停止停止”按钮不可用。当需要进行计时的时候单击一下按钮不可用。当需要进行计时的时候单击一下“开始开始”按钮，同时按钮，同时“停止停止”按钮可用。当需要停止按钮可用。当需要停止时，单击一下时，单击一下“停
14、止停止”按钮，则停止计时，在按钮，则停止计时，在“共计共计耗时耗时”文本框中显示从开始计时到停止计时所花的时文本框中显示从开始计时到停止计时所花的时间，精确到间，精确到0.1秒。秒。为了增加动感，在窗体上添加了两个图像框控件，两幅为了增加动感，在窗体上添加了两个图像框控件，两幅相似的图片以相似的图片以1秒的时间间隔交替显示，同时会发出秒的时间间隔交替显示，同时会发出“嘟、嘟嘟、嘟”的声音。的声音。4.2 程序实现程序实现 1.界面设计：在窗体上添加界面设计：在窗体上添加4个标签控件、个标签控件、4个文本框控个文本框控件、件、3个命令按钮、个命令按钮、2个图像框、个图像框、1个图片框、个图片框、
15、3个时钟控个时钟控件。件。 2.代码设计：代码设计：4.3 相关知识相关知识1.定时器控件：定时器控件（定时器控件：定时器控件（Timer）是一种按一定）是一种按一定时间间隔触发事件的控件，用以实现定时执行指定时间间隔触发事件的控件，用以实现定时执行指定的操作。该控件在设计可见，而在运行时是不可见的操作。该控件在设计可见，而在运行时是不可见的。的。（1）定时器属性：）定时器属性：（2）定时器事件：）定时器事件：2.图像框控件和图片框：图像框控件和图片框： 4.4 拓展知识拓展知识1.Beep语句：通过喇叭发出一个声调。语句：通过喇叭发出一个声调。2.Time函数和函数和Time语句语句Time
16、函数：返回一个指明当前系统时间的函数。为函数：返回一个指明当前系统时间的函数。为了设置系统时间可以使用了设置系统时间可以使用Time语句。例如：语句。例如：n=TimeTime语句：用来设置系统时间，时间参数可以使用语句：用来设置系统时间，时间参数可以使用任何能够表示时刻的数值表达式、字符串表达式或任何能够表示时刻的数值表达式、字符串表达式或它们的组合。如果它们的组合。如果Time是一个字符串，系统利用是一个字符串，系统利用时间分隔符将其转换成一个时间，如果无法转换成时间分隔符将其转换成一个时间，如果无法转换成一个有效的时间，则会导致错误发生。一个有效的时间，则会导致错误发生。返回返回5.1求
17、三角形面积案例说明求三角形面积案例说明要求用输入框从键盘输入三个数，作为三角形的要求用输入框从键盘输入三个数，作为三角形的三条边。在计算面积之前，首先要判断这三个三条边。在计算面积之前，首先要判断这三个数作为三条边是否能构成三角形，如果不能构数作为三条边是否能构成三角形，如果不能构成三角形，则给出提示信息，并可选择重新输成三角形，则给出提示信息，并可选择重新输入或退出执行；如果能构成三角形则用入或退出执行；如果能构成三角形则用“消息消息框框”把三角形的面积显示出来。注意这两种消把三角形的面积显示出来。注意这两种消息框的不同之处。息框的不同之处。5.2 程序实现程序实现 1.界面设计：界面设计：
18、2.代码设计：代码设计：5.3 相关知识相关知识1.输入框：把数据输入计算机，使用输入框：把数据输入计算机，使用VB提供的提供的InputBox函数生成的输入框来进行数据信息的输入。函数生成的输入框来进行数据信息的输入。InputBox函数的一般格式为：函数的一般格式为：InputBox( ,标题标题 ,缺省值缺省值 ,x坐标位置坐标位置 ,y坐标位坐标位置置)该函数产生一个对话框，作为输入数据的界面，等待用该函数产生一个对话框，作为输入数据的界面，等待用户输入正文或按下按钮，函数返回值是字符串类型：户输入正文或按下按钮，函数返回值是字符串类型：几点说明：几点说明： 5.3 相关知识相关知识2
19、.消息框：用消息框：用MsgBox语句或语句或MsgBox函数产生的，两者函数产生的，两者的不同之处在于的不同之处在于MsgBox函数会产生一个与用户所选函数会产生一个与用户所选择按钮相对应的整数。择按钮相对应的整数。（1）MsgBox函数：格式为：函数：格式为：MsgBox（提示（提示 ，按钮组合，按钮组合，标题，标题）按钮组合说明：按钮组合说明：类别类别符号常量符号常量值值含义含义按按钮的的类型型vbOKOnlyvbOKOnly0 0只只显示示“确定确定”按按钮vbOKCancelvbOKCancel1 1显示示“确定确定”和和“取消取消”按按钮vbAbortRetryIgnorevbAb
20、ortRetryIgnore2 2显示示“放弃放弃”、“重重试”和和“忽略忽略”按按钮vbYesNoCancelvbYesNoCancel3 3显示示“是是”、“否否”和和“取消取消”按按钮vbYesNovbYesNo4 4显示示“是是”和和“否否”按按钮vbRetryCancelvbRetryCancel5 5显示示“重重试”和和“取消取消”按按钮图标样式式vbCriticalvbCritical1616图标vbQuestionvbQuestion3232图标vbExclamationvbExclamation4848图标vbInformationvbInformation6464图标默默认
21、按按钮vbDefaultButton1vbDefaultButton10 0第一个按第一个按钮为默默认按按钮vbDefaultButton2vbDefaultButton2256256第二个按第二个按钮为默默认按按钮vbDefaultButton3vbDefaultButton3512512第三个按第三个按钮为默默认按按钮表表4-11 4-11 MsgBoxMsgBox函数的返回函数的返回值值值符号常量符号常量用户操作用户操作1 1vbOKvbOK单击“确定确定”按按钮2 2vbCancelvbCancel单击“取消取消”按按钮3 3vbAbortvbAbort单击“放弃放弃”按按钮4 4vb
22、RetryvbRetry单击“重重试”按按钮5 5vbIgnorevbIgnore单击“忽略忽略”按按钮6 6vbYesvbYes单击“是是”按按钮7 7vbNovbNo单击“否否”按按钮（2）MsgBox语句语句消息框也可以写成语句的形式，即消息框也可以写成语句的形式，即MsgBox 提示提示 ，按钮组合，按钮组合，标题，标题其中各参数的含义及作用与其中各参数的含义及作用与MsgBox函数相同，只是函数相同，只是MsgBox语句没有返回值，因而常用于较简单的信息语句没有返回值，因而常用于较简单的信息提示。提示。5.3 相关知识相关知识5.4 拓展知识拓展知识GoTo语句语句GoTo语句的格式
23、：语句的格式：GoTo |GoTo的功能是无条件转移到标号或行号所指的功能是无条件转移到标号或行号所指定的语句执行，而且只能是同一过程中的语定的语句执行，而且只能是同一过程中的语句。句。是一个字符系列，首字符必须为是一个字符系列，首字符必须为字母，标号的后面必须有一个冒号字母，标号的后面必须有一个冒号“：”；而而可以是一个数字序列。理解本案例可以是一个数字序列。理解本案例中中Goto语句的作用。语句的作用。不过在程序设计时，应尽量避免使用不过在程序设计时，应尽量避免使用GoTo语语句，以提高可读性。句，以提高可读性。返回返回6.1项目选择案例说明项目选择案例说明本案例是一个列表框和组合框的简单
24、应用。先选本案例是一个列表框和组合框的简单应用。先选择择“姓名姓名”的列表框，然后从的列表框，然后从“项目项目”列表框列表框中选择项目，此时在列表框中就会显示姓名和中选择项目，此时在列表框中就会显示姓名和运动项目。如果要删除某项，则可先选中该项，运动项目。如果要删除某项，则可先选中该项，然后单击然后单击“删除删除”按钮。单击按钮。单击“清空清空”按钮，按钮，则可把列表框中的内容全部删除。则可把列表框中的内容全部删除。6.2 程序实现程序实现 1.界面设计：在窗体上添加界面设计：在窗体上添加2个组合框、个组合框、1个列表框、两个列表框、两个命令按钮，适当调整它们的大小和位置。个命令按钮，适当调整
25、它们的大小和位置。 2.代码设计：代码设计：6.3 相关知识相关知识1.列表框：主要用途在于提供列表式的多个数据项供用列表框：主要用途在于提供列表式的多个数据项供用户选择。如果项目总数超过了可显示的项目数，则系户选择。如果项目总数超过了可显示的项目数，则系统会自动在列表框边上加上一个垂直滚动条。统会自动在列表框边上加上一个垂直滚动条。（1）属性（）属性（2）方法）方法 （3）事件）事件 2.组合框：将文本框和列表框的功能结合在一起，它可组合框：将文本框和列表框的功能结合在一起，它可以像列表框控件一样让用户通过鼠标选择所需要的项以像列表框控件一样让用户通过鼠标选择所需要的项目，也可以像文本框控件
26、一样，用键盘输入的方法选目，也可以像文本框控件一样，用键盘输入的方法选择项目。择项目。 （1）属性（）属性（2）方法）方法 （3）事件）事件 返回返回7.1调色板案例说明调色板案例说明用一个标签制作一个调色板，通过三个滚动条来用一个标签制作一个调色板，通过三个滚动条来调整这个标签的前景色和背景色，而且前景色调整这个标签的前景色和背景色，而且前景色和背景色是互为补色，如图和背景色是互为补色，如图4-18所示。前景色所示。前景色和背景色的调节用和背景色的调节用RGB函数，而三个滚动条的函数，而三个滚动条的当前值作为当前值作为RGB函数的三个参数，分别代表了函数的三个参数，分别代表了RGB中的红、绿
27、和蓝色所占的比重；每个滚动中的红、绿和蓝色所占的比重；每个滚动条旁都有一个标签，用以显示每个滚动条的当条旁都有一个标签，用以显示每个滚动条的当前值。前值。7.2 程序实现程序实现 1.界面设计：在窗体上添加界面设计：在窗体上添加4个标签控件，个标签控件，3个水平滚动个水平滚动条控件。条控件。 2.代码设计：代码设计：7.3 相关知识相关知识1.滚动条滚动条:通常用来辅助浏览显示信息、确定位置，在某通常用来辅助浏览显示信息、确定位置，在某些场合也可以用来输入数据。分为水平滚动条些场合也可以用来输入数据。分为水平滚动条（HScrollBar）和垂直滚动条（）和垂直滚动条（VScrollBar）两种
28、。）两种。滚动条的两端各有一个滚动箭头，在滚动箭头之间有滚动条的两端各有一个滚动箭头，在滚动箭头之间有一个滑块。滑块可以在两个滚动箭头之间移动，滚动一个滑块。滑块可以在两个滚动箭头之间移动，滚动条的值从左到右（从上往下）递增，两端分别是滚动条的值从左到右（从上往下）递增，两端分别是滚动条的最大值和最小值，其值均为整数，取值范围为条的最大值和最小值，其值均为整数，取值范围为3276832767。 （1）属性（）属性（2）方法）方法 （3）事件）事件 返回返回8.1打字练习案例说明打字练习案例说明这是一个模拟练习打字程序，运行程序后的界面如图这是一个模拟练习打字程序，运行程序后的界面如图4-20所
29、示。所示。“窗体窗体”呈最大化状态，单击窗体上的呈最大化状态，单击窗体上的“图图片片”（其实是一个按钮），在窗体内某个位置随机出（其实是一个按钮），在窗体内某个位置随机出现小写的英文字母，并且逐步往下降落，在现小写的英文字母，并且逐步往下降落，在“字母字母”没有超出窗体下端时敲击键盘，如果键入的字母与窗没有超出窗体下端时敲击键盘，如果键入的字母与窗体上的字母一致，则体上的字母一致，则“计分计分”累加一分，如果不一致，累加一分，如果不一致，则字母继续降落，直至超出窗体的下沿，此时又出现则字母继续降落，直至超出窗体的下沿，此时又出现另一个英文字母，与此同时另一个英文字母，与此同时“剩余时间剩余时间
30、”逐秒减少，逐秒减少，减到减到0时，弹出消息框，根据不同的得分范围给出不时，弹出消息框，根据不同的得分范围给出不同的信息。同的信息。8.2 程序实现程序实现 1.界面设计：在窗体上添加界面设计：在窗体上添加1个命令按钮控件、个命令按钮控件、2个时钟个时钟控件、控件、6个标签控件。各个控件的属性按表个标签控件。各个控件的属性按表4-14进行设置。进行设置。其中，其中，Label1在程序运行时显示随机产生的字母，在程序运行时显示随机产生的字母，Label4用来显示用来显示“计分计分”；Timer1每隔每隔100ms使得使得Label1的的Top属性递增，能够产生这个标签往下降的效属性递增，能够产生这个标签往下降的效果，因此，果，因此，“字母字母”下降的速度可由下降的速度可由Timer1的的Interval属性和属性和Top的增量来控制。的增量来控制。Timer2用来计时，剩余时间用来计时，剩余时间由由Label5显示，每隔显示，每隔1000ms，Label5的的Caption属性属性值减值减1，一直减到，一直减到0为止；同时把为止；同时把Label1Label6的背景的背景设置为设置为0，即透明，即透明。 2.代码设计：代码设计：返回返回
