《V B语言程序设计 程序基本结构.ppt》由会员分享，可在线阅读，更多相关《V B语言程序设计 程序基本结构.ppt（94页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构 使使使使程序结构清晰，可读性好，也易于查错和修改程序结构清晰，可读性好，也易于查错和修改程序结构清晰，可读性好，也易于查错和修改程序结构清晰，可读性好，也易于查错和修改 结构化程序设计方法有三种基本控制结构：结构化程序设计方法有三种基本控制结构：结构化程序设计方法有三种基本控制结构：结构化程序设计方法有三种基本控制结构：顺序结构、选择结构和循环结构顺序结构、选择结构和循环结构顺序结构、选择结构和循环结构顺序结构、选择结构和循环结构 具有具有具有具有单入口，单出口单入口，单出口单入口，单出口单入口，单出口的特点的特点的特点
2、的特点 (a)(b)(c)顺序结构顺序结构 选择结构选择结构 循环结构循环结构AB假假真真A 条件条件真真假假AB 条件条件结构化程序的基本结构结构化程序的基本结构顺序结构程序设计顺序结构程序设计第三章第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构本章内容本章内容3.1 3.1 赋值语句赋值语句赋值语句赋值语句 3.2 3.2 注释、结束及暂停语句注释、结束及暂停语句注释、结束及暂停语句注释、结束及暂停语句3.3 3.3 使用使用使用使用PrintPrint方法输出数据方法输出数据方法输出数据方法输出数据3.4 3.4 窗体和基本控件窗体和基本控件窗体和基本控件窗体和
3、基本控件3.5 3.5 对话框对话框对话框对话框3.6 3.6 程序举例程序举例程序举例程序举例第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构顺序结构顺序结构 顺序结构的每一个操作是按从上到下的线性顺顺序结构的每一个操作是按从上到下的线性顺序执行的，序执行的，顺序结构语句的流程：顺序结构语句的流程：程序模块程序模块程序模块程序模块a a a a程序模块程序模块程序模块程序模块b b b b 程序段落首先执行模块程序段落首先执行模块a a，接着执行模块，接着执行模块b b。第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构赋值语句赋值语句格式：格式
4、：=.属性属性属性属性=X=3+5 :Text3.Text=Text1.Text +Text2.TextX=3+5 :Text3.Text=Text1.Text +Text2.Text 功能：先计算功能：先计算 ，再将其值赋给变量或指，再将其值赋给变量或指定对象的属性。定对象的属性。注意事项：注意事项：（1 1）只能给一个变量或对象的一个属性赋值；）只能给一个变量或对象的一个属性赋值；赋值号左边只能是变量，不能是常量、表达式；赋值号左边只能是变量，不能是常量、表达式；（2 2）可以是变量、常量、函数和表达可以是变量、常量、函数和表达式；式；第第第第3 3章章章章 基本控制结构基本控制结构基本控
5、制结构基本控制结构赋值语句赋值语句 注意事项：注意事项：（3 3）赋值号和等于的区别）赋值号和等于的区别 If x=y ThenIf x=y Then z z=x x Else Else z z=y y End if End if 第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构赋值语句赋值语句 注意事项：注意事项：（4 4）类型转换问题）类型转换问题 赋值号右边的数据类型转换成赋值号左边的数据赋值号右边的数据类型转换成赋值号左边的数据类型，再赋值；类型，再赋值；n%=5.6 n%=5.6 ：m%=“56”m%=“56”n=6n=6（5 5）一条赋值语句只能给一个变量赋
6、值；）一条赋值语句只能给一个变量赋值；x x=y=z=9 x y=z=9 x 的值为的值为 0 0或或FalseFalse；y,zy,z没有被赋值没有被赋值第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构例例例例3.13.1 给定一个两位数给定一个两位数(如如36)，交换个位数和十位数的位，交换个位数和十位数的位置，把处理后的数显示在窗体上置，把处理后的数显示在窗体上处理方法处理方法两位数两位数 ab b取出个位数取出个位数 a 取出十位数取出十位数新两位数新两位数:b*10+ab*10+a第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构编写的窗
7、体单击事件过程代码如下：编写的窗体单击事件过程代码如下：编写的窗体单击事件过程代码如下：编写的窗体单击事件过程代码如下：Private Sub Private Sub Form_ClickForm_Click()()Dim x As Integer,a As Integer Dim x As Integer,a As Integer Dim b As Integer,c As Integer Dim b As Integer,c As Integer x=36 x=36 a=a=Int(xInt(x/10)/10)求十位数求十位数求十位数求十位数,a=x a=x 1010 b=x Mod 10
8、b=x Mod 10 求个位数求个位数求个位数求个位数,b=x-b=x-10*a10*a c=b*10+ac=b*10+a 生成新的数生成新的数生成新的数生成新的数 Print Print 处理后的数处理后的数处理后的数处理后的数:;c:;c End Sub End Sub运行程序后单击窗体，输出结果是：运行程序后单击窗体，输出结果是：运行程序后单击窗体，输出结果是：运行程序后单击窗体，输出结果是：处理后的数：处理后的数：处理后的数：处理后的数：6363第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构一个基本算法：交换两个变量的值一个基本算法：交换两个变量的值已知两个变
9、量已知两个变量x=5x=5，y=8y=8。算法：设一个中间算法：设一个中间变量变量t t，利用赋值语句完，利用赋值语句完成。成。t=x ：x=y ：y=t 8558xyt5第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构一个基本算法：交换两个变量的值已知两个变量已知两个变量x=5x=5，y=8y=8。算法：不借助其算法：不借助其它变量它变量,通过通过+和和-运算运算来实现。来实现。x=x+yx=13y=8y=x-yx=13y=5x=x-yx=8y=5第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构例例例例3.23.2 设计程序，实现两个文本框内容
10、的交换设计程序，实现两个文本框内容的交换 (1)(1)在窗体上建立两个标签、两个文本框和一个命令按钮在窗体上建立两个标签、两个文本框和一个命令按钮在窗体上建立两个标签、两个文本框和一个命令按钮在窗体上建立两个标签、两个文本框和一个命令按钮 (2)(2)编写程序代码编写程序代码编写程序代码编写程序代码 借助于另一个变量借助于另一个变量借助于另一个变量借助于另一个变量(假设为假设为假设为假设为 t)t)，并直接在控件中交换数据并直接在控件中交换数据并直接在控件中交换数据并直接在控件中交换数据 Private Sub Command1_Click()Private Sub Command1_Clic
11、k()Dim t As StringDim t As String t=Text1.Text t=Text1.Text Text1.Text=Text2.Text Text1.Text=Text2.Text Text2.Text=t Text2.Text=t End Sub End Sub第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构注释语句注释语句 格式：格式：注释内容注释内容注释内容注释内容 或或或或 RemRem 注释内容注释内容注释内容注释内容功能：注释语句用来对程序或程序中某些语句作注功能：注释语句用来对程序或程序中某些语句作注释，以便于程序的阅读和理解。释
12、，以便于程序的阅读和理解。第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构注释语句注释语句 说明：说明：(1)(1)注释语句是非执行语句，对程序的执行结果没注释语句是非执行语句，对程序的执行结果没有任何影响，仅在列程序清单时，其内容被列出；有任何影响，仅在列程序清单时，其内容被列出；(2)(2)注释语句作为一个独立行，可放在过程、模块注释语句作为一个独立行，可放在过程、模块的开头作为标题；也可以放在执行语句的后面。的开头作为标题；也可以放在执行语句的后面。RemRem 注释内容注释内容注释内容注释内容 ，不能不能不能不能放在执行语句的后面放在执行语句的后面如：如：x=x
13、+1 x=x+1 将变量将变量x x的值加上的值加上1 1后再赋后再赋第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构暂停语句暂停语句 格式：格式：StopStop功能：暂时停止程序的运行。功能：暂时停止程序的运行。说明：说明：(1)Stop(1)Stop可以放置在过程中的任何地方，相当于在可以放置在过程中的任何地方，相当于在程序代码中设置断点，当执行程序代码中设置断点，当执行StopStop语句时，系统语句时，系统将自动打开将自动打开“立即窗口立即窗口”，方便程序员调试跟，方便程序员调试跟踪程序。踪程序。第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本
14、控制结构暂停语句暂停语句 说明：说明：(2)(2)在程序调试通过之后，生成可执行文件在程序调试通过之后，生成可执行文件(.exe(.exe文文件件)之前，应删去代码中的所有之前，应删去代码中的所有StopStop语句。语句。(3)3)3)3)也可以通过单击工具栏上的也可以通过单击工具栏上的“中断中断”按钮来实现按钮来实现(4)(4)(4)(4)若无法正常结束程序，例如死循环的情况，若无法正常结束程序，例如死循环的情况，若无法正常结束程序，例如死循环的情况，若无法正常结束程序，例如死循环的情况，使用使用Ctrl+Pause/BreakCtrl+Pause/Break组合键组合键,可强制程序暂停运
15、行可强制程序暂停运行第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构结束语句结束语句 格式：格式：EndEnd功能：程序运行时，遇到结束语句就终止程序的运功能：程序运行时，遇到结束语句就终止程序的运行。行。第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构结束语句结束语句 说明：说明：EndEnd语句除用来结束程序外，在不同环境下还语句除用来结束程序外，在不同环境下还有其他一些用途，包括：有其他一些用途，包括：End SubEnd Sub：结束一个：结束一个：结束一个：结束一个SubSub过程过程过程过程End FunctionEnd Functi
16、on：结束一个：结束一个：结束一个：结束一个FunctionFunction过程过程过程过程End IfEnd If：结束一个：结束一个：结束一个：结束一个If If语句块语句块语句块语句块End TypeEnd Type：结束记录类型的定义：结束记录类型的定义：结束记录类型的定义：结束记录类型的定义End SelectEnd Select：结束情况语句：结束情况语句：结束情况语句：结束情况语句第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构PrintPrint方法方法 格式：格式：对象对象对象对象.PrintSpc(n)|Tab(nPrintSpc(n)|Tab(n)
17、表达式列表表达式列表表达式列表表达式列表,|;,|;功能：在窗体、图形框或打印机对象上输出信息功能：在窗体、图形框或打印机对象上输出信息,省略对省略对象则在窗体上输出。象则在窗体上输出。说明说明:；(分号分号)：光标定位在上一个显示的字符后。：光标定位在上一个显示的字符后。，(逗号逗号逗号逗号)：光标定位在下一个打印区：光标定位在下一个打印区：光标定位在下一个打印区：光标定位在下一个打印区(14(14列列列列)的开的开的开的开 始位置处。始位置处。始位置处。始位置处。省略表达式列表省略表达式列表省略表达式列表省略表达式列表,则输出一个则输出一个则输出一个则输出一个空行空行空行空行,例：例：例：
18、例：PrintPrint若语句末尾若语句末尾若语句末尾若语句末尾没有分隔符没有分隔符没有分隔符没有分隔符：输出内容后自动换行。：输出内容后自动换行。：输出内容后自动换行。：输出内容后自动换行。第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构 例例例例3.33.3 Print Print Print Print输出示例输出示例输出示例输出示例 Private Sub Private Sub Form_ClickForm_Click()()a=3:b=4a=3:b=4 Print a,b,4+a,Print a,b,4+a,Print 2*b Print 2*b Print
19、 a,b Print a,b Print Print Print a=;a,b=;b Print a=;a,b=;b End SubEnd Sub 运行结果运行结果运行结果运行结果 第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构1.1.1.1.SpcSpcSpcSpc函数函数函数函数 格式：格式：格式：格式：Spc(nSpc(nSpc(nSpc(n)功能：在输出下一项之前插入功能：在输出下一项之前插入功能：在输出下一项之前插入功能：在输出下一项之前插入n n n n个空格。个空格。个空格。个空格。例如：例如：例如：例如：Print Print Print Print
20、学号学号学号学号；Spc(2)Spc(2)Spc(2)Spc(2)；姓名姓名姓名姓名；Spc(5)Spc(5)Spc(5)Spc(5)；成绩成绩成绩成绩 输出结果输出结果输出结果输出结果(表示空格表示空格表示空格表示空格)：学号学号学号学号姓名姓名姓名姓名成绩成绩成绩成绩特殊打印格式特殊打印格式第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构 函数格式：函数格式：函数格式：函数格式：Tab(nTab(nTab(nTab(n)功能：把输出位置移到第功能：把输出位置移到第功能：把输出位置移到第功能：把输出位置移到第n n n n列。列。列。列。例如：例如：例如：例如：Pri
21、nt Tab(2);Print Tab(2);Print Tab(2);Print Tab(2);学号学号学号学号；Tab(11);Tab(11);Tab(11);Tab(11);姓名姓名姓名姓名；Tab(21);Tab(21);Tab(21);Tab(21);成绩成绩成绩成绩 输出结果是输出结果是输出结果是输出结果是(1(1(1(1个汉字占个汉字占个汉字占个汉字占2 2 2 2个位置个位置个位置个位置)：学号学号学号学号姓名姓名姓名姓名成绩成绩成绩成绩 2.Tab函数函数第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构 格式：格式：格式：格式：Format(Forma
22、t(Format(Format(表达式表达式表达式表达式 ,格式串格式串格式串格式串)功能：根据格式串规定的格式来输出表达式的值功能：根据格式串规定的格式来输出表达式的值功能：根据格式串规定的格式来输出表达式的值功能：根据格式串规定的格式来输出表达式的值 示示示示例例例例 Print Format(12345.6,Print Format(12345.6,Print Format(12345.6,Print Format(12345.6,“#,#.#,#.#,#.#,#.#”)千位分隔符千位分隔符千位分隔符千位分隔符 Print Format(12345.6,0000000)Print For
23、mat(12345.6,0000000)Print Format(12345.6,0000000)Print Format(12345.6,0000000)Print Format(12345.6,$#,#.00)Print Format(12345.6,$#,#.00)Print Format(12345.6,$#,#.00)Print Format(12345.6,$#,#.00)输出结果是：输出结果是：输出结果是：输出结果是：12,345.612,345.612,345.612,345.6 0012346 0012346 0012346 0012346$12,345.60$12,345.
24、60$12,345.60$12,345.60 数字占位符格式符号数字占位符格式符号数字占位符格式符号数字占位符格式符号#和和和和0 0 0 0都能显示数字，但符号都能显示数字，但符号都能显示数字，但符号都能显示数字，但符号#会剔除不会剔除不会剔除不会剔除不必要的必要的必要的必要的0 0 0 0，符号，符号，符号，符号0 0 0 0会按规定补足会按规定补足会按规定补足会按规定补足0 0 0 0 3.Format函数函数第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构举例：举例：Print Format(12345.67,Print Format(12345.67,Prin
25、t Format(12345.67,Print Format(12345.67,“+#,#.#+#,#.#+#,#.#+#,#.#”)千位分隔符千位分隔符千位分隔符千位分隔符 Print Format(123.45,Print Format(123.45,Print Format(123.45,Print Format(123.45,“0.000E+00)0.000E+00)0.000E+00)0.000E+00)输出结果是：输出结果是：输出结果是：输出结果是：+12,345.7+12,345.7+12,345.7+12,345.7 1.235E+02 1.235E+02 1.235E+02
26、1.235E+02第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构窗体窗体 窗体窗体(Form)是设计是设计VB应用程序的基本平台，用应用程序的基本平台，用户界面。户界面。窗体本身是一个对象，又是其他对象的载体或窗体本身是一个对象，又是其他对象的载体或容器。容器。通常应用程序是从窗体开始执行的通常应用程序是从窗体开始执行的;一个程序一个程序可以有多个窗体可以有多个窗体第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构窗体窗体 系统菜单系统菜单系统菜单系统菜单标题栏标题栏标题栏标题栏最大化按钮最大化按钮最大化按钮最大化按钮最小化按钮最小化按钮最小化按
27、钮最小化按钮关闭按钮关闭按钮关闭按钮关闭按钮WIdthWIdth按钮按钮第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构窗体的主要属性窗体的主要属性 (1)(1)属性名属性名属性属性值值说说 明明NameName字符串字符串用于用于设设置窗体的名称，中英文均可，默置窗体的名称，中英文均可，默认认名称名称为为Form1Form1CaptionCaption字符串字符串用于用于设设置窗体置窗体标题栏标题栏中中显显示的文本，默示的文本，默认标题为认标题为Form1Form1HeightHeight数数值值用于指定窗体的高度用于指定窗体的高度WidthWidth数数值值用于指定
28、窗体的用于指定窗体的宽宽度度LeftLeft数数值值用于确定窗体左上角的坐用于确定窗体左上角的坐标标位置，即窗体左上角离位置，即窗体左上角离屏幕左屏幕左边边的距离的距离TopTop数数值值用于确定窗体左上角的坐用于确定窗体左上角的坐标标位置，即窗体左上角离位置，即窗体左上角离屏幕屏幕顶边顶边的距离的距离EnabledEnabled逻辑值逻辑值用于决定是否允用于决定是否允许许操作窗体，决定控件是否操作窗体，决定控件是否对对用用户户产产生的事件作出响生的事件作出响应应。TrueTrue：允：允许许；FalseFalse：禁止：禁止VisibleVisible逻辑值逻辑值用于决定程序运行用于决定程序
29、运行时时窗体是否可窗体是否可见见，TrueTrue：可：可见见；FalseFalse：不可：不可见见第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构窗体的主要属性窗体的主要属性 (2)(2)属性名属性名属性属性值值说说明明FontName字符串字符串用于用于设设置窗体或置窗体或对对象上文本的字体象上文本的字体FontSize整数整数用于用于设设置窗体或置窗体或对对象上文本字体的大小象上文本字体的大小,单单位位为为磅，范磅，范围围12160FontBold逻辑值逻辑值该该属性属性值为值为True时时用于用于设设置窗体或置窗体或对对象上象上显显示的文本示的文本为为粗体粗体F
30、ontItalic逻辑值逻辑值该该属性属性值为值为True时时用于用于设设置窗体或置窗体或对对象上象上显显示的文本示的文本为为斜体斜体FontStrikethru逻辑值逻辑值该该属性属性值为值为True时时用于用于给给窗体或窗体或对对象上象上显显示示的文本加一的文本加一删删除除线线FontUnderline逻辑值逻辑值该该属性属性值为值为True时时用于用于给给窗体或窗体或对对象上象上显显示示的文本加一下划的文本加一下划线线第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构窗体的主要属性窗体的主要属性 (3)(3)属性名属性名属性值属性值说说 明明MaxButton逻辑值
31、用于设置窗体右上角的最大化按钮，True：有；False：无MinButton逻辑值用于设置窗体右上角的最小化按钮，True：有；False：无ControlBox逻辑值用于设置窗口控制框的状态，True：有；False：无Icon用于设置窗体最小化时的图标ForeColor整数用于设置窗体或对象的前景颜色BackColor整数用于设置窗体或对象的背景颜色AutoRedraw逻辑值用于设置窗体内容自动重画Picture字符串用于设置窗体中要显示的图片第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构窗体的常用事件窗体的常用事件 （1 1）ClickClick事件：鼠标单击
32、窗体时被触发。事件：鼠标单击窗体时被触发。（2 2）DblClickDblClick事件：鼠标双击窗体时被触发。事件：鼠标双击窗体时被触发。（3 3）LoadLoad事件：当窗体被加载装入内存时被触发。事件：当窗体被加载装入内存时被触发。启动程序时，首先执行启动程序时，首先执行启动程序时，首先执行启动程序时，首先执行Form_LoadForm_Load事件事件事件事件（4 4）UnLoadUnLoad事件：当从内存中清除一个窗体时被触事件：当从内存中清除一个窗体时被触发发 。第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构窗体的常用方法窗体的常用方法 (1)Show(1
33、)Show(1)Show(1)Show方法：方法：方法：方法：用于快速显示一个窗体，使该窗体变成活用于快速显示一个窗体，使该窗体变成活用于快速显示一个窗体，使该窗体变成活用于快速显示一个窗体，使该窗体变成活动窗体。例如：动窗体。例如：动窗体。例如：动窗体。例如：Private Sub Private Sub Private Sub Private Sub Form_LoadForm_LoadForm_LoadForm_Load()()()()ShowShowShowShow Print Print Print Print“窗体已被窗体已被窗体已被窗体已被howhowhowhow显示出来！显示出
34、来！显示出来！显示出来！”End SubEnd SubEnd SubEnd Sub(2)Print(2)Print(2)Print(2)Print方法：方法：方法：方法：用于在窗体上输出表达式的值用于在窗体上输出表达式的值用于在窗体上输出表达式的值用于在窗体上输出表达式的值(3)Cls(3)Cls(3)Cls(3)Cls方法：方法：方法：方法：用于清除运行时在窗体中显示的文本或图形用于清除运行时在窗体中显示的文本或图形用于清除运行时在窗体中显示的文本或图形用于清除运行时在窗体中显示的文本或图形(4)Move(4)Move(4)Move(4)Move(移动移动移动移动)方法：方法：方法：方法：用
35、于移动并改变窗体或控件的位置用于移动并改变窗体或控件的位置用于移动并改变窗体或控件的位置用于移动并改变窗体或控件的位置和大小和大小和大小和大小启动程序时，系统先启动程序时，系统先自动执行本过程，但自动执行本过程，但窗体未被显示出来窗体未被显示出来通过通过Show显示窗体。显示窗体。使后续的使后续的Print输出内输出内容可见容可见第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构MoveMove方法方法 格式：格式：对象对象对象对象.Move.Move 左边距离左边距离左边距离左边距离，上边距离，宽度，高度，上边距离，宽度，高度，上边距离，宽度，高度，上边距离，宽度，高度
36、 功能：移动窗体或控件，并可改变其大小。功能：移动窗体或控件，并可改变其大小。说明：说明：对象可以是除时钟、菜单以外的所有控件，省略对象可以是除时钟、菜单以外的所有控件，省略为窗体为窗体 对象的左边距离和上边距离是以窗体的左边界和对象的左边距离和上边距离是以窗体的左边界和上边界为基准；窗体以屏幕的左上角为基准。上边界为基准；窗体以屏幕的左上角为基准。宽度和高度表示可以改变对象的大小。宽度和高度表示可以改变对象的大小。第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构例例例例 当用户运行程序，在标题栏显
37、示当用户运行程序，在标题栏显示“装入窗体装入窗体”；单击窗体，在标题栏显示单击窗体，在标题栏显示“鼠标单击鼠标单击”，在窗体，在窗体上显示上显示“单击窗体单击窗体”；当用户双击窗体，在标题栏显示当用户双击窗体，在标题栏显示“鼠标双击鼠标双击”，并在窗体上显示并在窗体上显示“双击窗体双击窗体”。LoadLoad事件事件事件事件，Caption属性属性ClickClick事件，事件，事件，事件，Caption属性，属性，PrintPrint方法方法方法方法DblClickDblClick事件，事件，事件，事件，Caption属性，属性，PrintPrint方法方法方法方法第第第第3 3章章章章 基
38、本控制结构基本控制结构基本控制结构基本控制结构例例1-31-3代码及结果代码及结果第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构 设置以下设置以下设置以下设置以下3 3 3 3个命令按钮：个命令按钮：个命令按钮：个命令按钮：“显示显示显示显示”按钮：用于显示唐诗按钮：用于显示唐诗按钮：用于显示唐诗按钮：用于显示唐诗“静夜思静夜思静夜思静夜思”“清除清除清除清除”按钮：用于清除所生成的文本按钮：用于清除所生成的文本按钮：用于清除所生成的文本按钮：用于清除所生成的文本 “结束结束结束结束”按钮：结束程序的运行按钮：结束程序的运行按钮：结束程序的运行按钮：结束程序的运行 设
39、计步骤如下：设计步骤如下：设计步骤如下：设计步骤如下：(1)(1)(1)(1)创建应用程序的用户界面和设置对象的属性创建应用程序的用户界面和设置对象的属性创建应用程序的用户界面和设置对象的属性创建应用程序的用户界面和设置对象的属性 例例3.43.4 显示唐诗显示唐诗“静夜思静夜思”第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构 (2)(2)(2)(2)编写程序代码。三个按钮的事件过程代码：编写程序代码。三个按钮的事件过程代码：编写程序代码。三个按钮的事件过程代码：编写程序代码。三个按钮的事件过程代码：Private Sub Private Sub Private Su
40、b Private Sub CmdPrt_ClickCmdPrt_ClickCmdPrt_ClickCmdPrt_Click()()()()BackColorBackColorBackColorBackColor=RGBRGBRGBRGB(255,255,255)(255,255,255)(255,255,255)(255,255,255)背景颜色，白色背景颜色，白色背景颜色，白色背景颜色，白色 ForeColorForeColorForeColorForeColor=RGB(0,0,255)=RGB(0,0,255)=RGB(0,0,255)=RGB(0,0,255)前景颜色，蓝色前景颜色，
41、蓝色前景颜色，蓝色前景颜色，蓝色 FontNameFontNameFontNameFontName=楷体楷体楷体楷体_GB2312_GB2312_GB2312_GB2312 FontSizeFontSizeFontSizeFontSize=20=20=20=20 FontBoldFontBoldFontBoldFontBold=True =True =True =True 粗体粗体粗体粗体 CurrentXCurrentXCurrentXCurrentX=1200:=1200:=1200:=1200:CurrentYCurrentYCurrentYCurrentY=350 =350 =350
42、=350 设置当前位置设置当前位置设置当前位置设置当前位置 Print Print Print Print 静夜思静夜思静夜思静夜思(唐诗唐诗唐诗唐诗)Print Print Print Print 空一行空一行空一行空一行 FontNameFontNameFontNameFontName=幼圆幼圆幼圆幼圆 FontSizeFontSizeFontSizeFontSize=13=13=13=13 Print Spc(6);Print Spc(6);Print Spc(6);Print Spc(6);床前明月光，疑是地上霜床前明月光，疑是地上霜床前明月光，疑是地上霜床前明月光，疑是地上霜 Pri
43、nt Print Print Print Print Spc(6);Print Spc(6);Print Spc(6);Print Spc(6);举头望明月，低头思故乡举头望明月，低头思故乡举头望明月，低头思故乡举头望明月，低头思故乡 End Sub End Sub End Sub End Sub第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构 Private Sub Private Sub CmdCls_ClickCmdCls_Click()()ClsCls End SubEnd Sub Private Sub Private Sub CmdEnd_ClickCmdE
44、nd_Click()()End End End SubEnd Sub 程序运行后，单击程序运行后，单击程序运行后，单击程序运行后，单击“显示显示显示显示”按钮，输出结果按钮，输出结果按钮，输出结果按钮，输出结果下一节第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构RGB()RGB()函数函数 格式：格式：RGB(Red,Green,Blue)RGB(Red,Green,Blue)说明：说明：(1)Red(1)Red：数值范围从：数值范围从 0 0 到到 255255，表示颜色的红色成份，表示颜色的红色成份(2)Green(2)Green：数值范围从：数值范围从 0 0
45、到到 255255，表示颜色的绿色成份，表示颜色的绿色成份(3)Blue(3)Blue：数值范围从：数值范围从 0 0 到到 255255，表示颜色的蓝色成份，表示颜色的蓝色成份第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构RGB()RGB()函数函数 格式：格式：RGB(Red,Green,Blue)RGB(Red,Green,Blue)说明：说明：(4)RGB(4)RGB 函数的参数值，如果超过函数的参数值，如果超过 255255，系统作为，系统作为 255255来处理。来处理。例如：将例如：将Form1Form1的背景颜色设置为洋红色。的背景颜色设置为洋红色。F
46、orm1.BackColor=RGB(255,0,255)Form1.BackColor=RGB(255,0,255)第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构常见的标准颜色常见的标准颜色 颜颜色色红红色色值值绿绿色色值值蓝蓝色色值值黑色000蓝色00255绿色02550青色0255255红色25500洋红色2550255黄色2552550白色255255255返回返回第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构基本控件 三种基本控件三种基本控件三种基本控件三种基本控件命令按钮、标签和文本框命令按钮、标签和文本框命令按钮、标签和文本框命
47、令按钮、标签和文本框 命令按钮命令按钮命令按钮命令按钮(CommandButtenCommandButten)标签标签标签标签(Label)(Label)文本框文本框文本框文本框(TextBoxTextBox)第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构控件的分类控件的分类 VBVB的控件可分为以下三类的控件可分为以下三类（课本（课本P14P14）标准控件标准控件ActiveXActiveX控件控件可插入对象可插入对象第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构1.1.标准控件标准控件 标准控件又称为内部控标准控件又称为内部控件，是件，是
48、VBVB系统本身所内嵌系统本身所内嵌的控件，这些控件总是显的控件，这些控件总是显示在工具箱中，不能从工示在工具箱中，不能从工具箱中删除。具箱中删除。启动启动VB6.0VB6.0后，在工作界后，在工作界面上，工具箱中列出的都面上，工具箱中列出的都是标准控件。是标准控件。121220357919171513114681816141210第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构2.ActiveX2.ActiveX控件控件 主要主要是由第三方厂商提供的控件，它以独立文是由第三方厂商提供的控件，它以独立文件的形式存储在磁盘上，其文件扩展名为件的形式存储在磁盘上，其文件扩展
49、名为 .OCX.OCX。添加添加ActiveXActiveX控件的步骤如下控件的步骤如下：选择选择菜单菜单“工程工程/部件部件”命令，弹出命令，弹出“部件部件”对对话框话框;在在“控件控件”选项卡中，选定要添加的选项卡中，选定要添加的ActiveXActiveX控控件名称左边的复选框件名称左边的复选框；单击单击“确定确定”按钮，关闭按钮，关闭“部件部件”对话框，所有对话框，所有选定的选定的ActiveXActiveX控件将出现在控件将出现在VBVB控件工具箱中控件工具箱中。第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构添加添加ActiveXActiveX控件的控件的“
50、部件部件”对话框对话框添加的ActiveX控件图标添加控件后的工具箱添加控件后的工具箱第第第第3 3章章章章 基本控制结构基本控制结构基本控制结构基本控制结构3.3.可插入对象可插入对象例如：将例如：将 ExcelExcel工作表对象添加到工具箱中工作表对象添加到工具箱中 ：1.鼠标右击常用工具箱，在弹出快捷菜单中选择鼠标右击常用工具箱，在弹出快捷菜单中选择 “部件部件”命令，弹出命令，弹出“部件部件”对话框；对话框；2.在在“可插入对象可插入对象”选项卡中，选中选项卡中，选中“Microsoft Microsoft Excel Excel 工作表工作表”复选框，；复选框，；3.单击单击“确定