VB最好的教程第3章-设计顺序结构程序

1、VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 本章主要介绍本章主要介绍: VB的语法、注释、书写风格的语法、注释、书写风格 VB常用的函数和语句等常用的函数和语句等 介绍介绍VB程序的顺序结构、程序的顺序结构、 常用控件：常用控件： 命令按钮、标签、文本框、滚动条、定时命令按钮、标签、文本框、滚动条、定时 器。器。 如何调试程序，即如何发现程序中的问题并解如何调试程序，即如何发现程序中的问题并解 决这些问题。决这些问题。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 VB

2、程序设计有两个部分的工作：程序设计有两个部分的工作： 一是进行界面的设计一是进行界面的设计 二是根据程序所需要解决的问题，编写完成解决问二是根据程序所需要解决的问题，编写完成解决问 题的程序代码题的程序代码 一个程序应该具有良好的结构，以便于阅读一个程序应该具有良好的结构，以便于阅读 和理解。为了增加程序的易读性，荷兰学者和理解。为了增加程序的易读性，荷兰学者 ijkctra提出了结构化程序设计的理论，提出了结构化程序设计的理论，VB是融是融 合了面向对象和结构化编程两种思想的一个编程合了面向对象和结构化编程两种思想的一个编程 工具。工具。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序

3、 结构程序结构程序 结构化程序设计：用三种基本结构作为构成程结构化程序设计：用三种基本结构作为构成程 序的基本单元序的基本单元 顺序结构顺序结构 选择结构选择结构 循环结构循环结构 每个基本结构具有单入口单出口的特点。每个基本结构具有单入口单出口的特点。 一般一个程序由这三种结构结合而成。一般一个程序由这三种结构结合而成。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 顺序结构的主要特点是：顺序结构的主要特点是： 按自然顺序（即编写的按自然顺序（即编写的 顺序）执行程序的流程，即顺序）执行程序的流程，即 先执行第一句，再执行第二先执行第一句，再执行第二 句，一句一句执

4、行下去，直句，一句一句执行下去，直 到执行最后一句。到执行最后一句。 流程如图所示流程如图所示: VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 通过例子，了解顺序结构的程序的一般形况通过例子，了解顺序结构的程序的一般形况 【例【例3-1】求摄氏温度对应的华氏温度。如图。】求摄氏温度对应的华氏温度。如图。 计算公式：计算公式：F=9C/5+32，其中，其中C表示摄氏温度，表示摄氏温度， F表示华氏温度。表示华氏温度。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 对象：对象： 2 2个标签：作提示个标签：作提示 2 2个文本框：作输入和显示个文

5、本框：作输入和显示 3 3个命令按钮控件个命令按钮控件 单击单击“计算计算”按钮，右文本框内显按钮，右文本框内显 示出该摄氏温度对应的华氏温度。示出该摄氏温度对应的华氏温度。 单击单击“清除清除”按钮使得文本框的内按钮使得文本框的内 容被清除容被清除 单击单击“退出退出”按钮结束程序运行。按钮结束程序运行。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 本例使用四个事件过程：本例使用四个事件过程： 一个一个Form_Load()和三个是命令按钮的和三个是命令按钮的Click事件。事件。 主要属性设置主要属性设置 命令按钮命令按钮1：（名称）：（名称）：CmdCalc

6、Caption：计算：计算 命令按钮命令按钮2：（名称）：（名称）：CmdClear Caption：清除：清除 命令按钮命令按钮3：（名称）：（名称）：CmdExit Caption：退出：退出 标签标签1（Label1）：）：Caption：摄氏温度：摄氏温度 标签标签2（Label2）：）：Caption：华氏温度：华氏温度 窗体：窗体：Caption：温度转换：温度转换 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 Option Explicit 要求强制声明变量要求强制声明变量 Private Sub CmdCalc_Click() 计算计算 Dim C A

7、s Single, F As Single C = Val(Text1.Text) F = 9 * C / 5 + 32 Text2.Text = F End Sub Private Sub CmdClear_Click() 清除清除 Text1.Text = Text2.Text = “ End Sub Private Sub CmdExit_Click() 终止程序运行终止程序运行 End End Sub Private Sub Form_Load() 启动时，清除文本框内容启动时，清除文本框内容 Text1.Text = Text2.Text = “ End Sub 本例每个事件代码都依

8、本例每个事件代码都依 顺序执行。顺序执行。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 编写程序有一定的规则，这就是语法。如编写程序有一定的规则，这就是语法。如 数学中数学中x乘乘y可以写成可以写成xy，但在程序中不能。程，但在程序中不能。程 序中除了序中除了“ ”所有的内的字符串外，其它一律所有的内的字符串外，其它一律 使用西文符号。使用西文符号。如：如： 、 、= =、+ +、- -等都必须等都必须 是西文符号。是西文符号。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.3.1 语法符号语法符号 在程序设计语言中，每一条语句都有语法

9、规在程序设计语言中，每一条语句都有语法规 则。本书在语法描述中，常常使用以下符号：则。本书在语法描述中，常常使用以下符号： 1 :表示可选项。表示可选项。 2:语句中的基本单位。可以直接给出，也语句中的基本单位。可以直接给出，也 可以用可以用表示。表示。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3 及其内的及其内的 | ：表示多个项目，一般只能选：表示多个项目，一般只能选 择其中一个。择其中一个。 4 ：表示重复前面的内容。：表示重复前面的内容。 如如Print方法格式为：方法格式为： Print 输出项输出项；|，输出项输出项；|， Print ；|，；|，

10、注意：这些只是书写格式，并不是注意：这些只是书写格式，并不是VB的语言的语言 元素。元素。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.3.2 注释注释 使用注释记录编程思路或明确这段程序的目的。使用注释记录编程思路或明确这段程序的目的。 使用注释提高程序的可读性。使用注释提高程序的可读性。 注释部分不是程序代码，它不会被执行。注释部分不是程序代码，它不会被执行。 注释不是用得越多越好。注释不是用得越多越好。 一般针对主要程序段、主要变量、关键语句等。一般针对主要程序段、主要变量、关键语句等。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程

11、序 注释使用有两种方法：注释使用有两种方法： 使用西文单引号使用西文单引号“” C = Text1.Text C = Text1.Text 将文本框数据送入变量将文本框数据送入变量C C 使用关键字使用关键字Rem Rem 格式：格式：Rem Rem 注释文字注释文字 Rem Rem 计算摄氏温度对应的华氏温度值。计算摄氏温度对应的华氏温度值。 注释不是用得越多越好注释不是用得越多越好 1.1. 一般针对主要程序段、主要变量、关键语句等一般针对主要程序段、主要变量、关键语句等 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.3.3 程序代码书写规则程序代码书写规则

12、1 1续行续行 一行中字符数太多，可以分多行书写一行中字符数太多，可以分多行书写 方法：前一行的末尾要使用续行符：方法：前一行的末尾要使用续行符：“ _” _” 。 如：如： Score = Val (InputBox(请输入请输入“计算机计算机”课程课程 成绩成绩(0-100)： , _ 输入成绩输入成绩, 60) 续行符后面不能加注释续行符后面不能加注释 不要在一个字符串或关键字的中间截断行不要在一个字符串或关键字的中间截断行 当句子不长时，最好不要用续行。当句子不长时，最好不要用续行。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 2 2多条语句写在一行内多条语

13、句写在一行内 使用的方法：在各句之间用冒号使用的方法：在各句之间用冒号“:”:”分隔。分隔。 如要交换变量如要交换变量A A和和B B中的值，可以使用：中的值，可以使用： T = A: A = B: B = TT = A: A = B: B = T VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3 3使用缩进格式使用缩进格式 为了增加程序的可读性，代码应采用缩进格式。为了增加程序的可读性，代码应采用缩进格式。 它可以反映出代码的逻辑结构和嵌套关系。如：它可以反映出代码的逻辑结构和嵌套关系。如： VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 利

14、用这些语句和函数可以编写许多程序。利用这些语句和函数可以编写许多程序。 语句是语句是VB程序代码的组成部分，程序代码的组成部分， 函数是函数是VB语言组成部分的另一种形式语言组成部分的另一种形式 它把一些常用的功能预先编制好程序它把一些常用的功能预先编制好程序 以固定的格式提供给用户使用，以固定的格式提供给用户使用， 可以大大减少了编程者的代码设计工作。可以大大减少了编程者的代码设计工作。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.4.1 VB的语句的语句 语句独立于对象。语句独立于对象。 语句一般分两类：语句一般分两类： 执行语句执行语句 使计算机产生一种特

15、定的操作，如赋值、循环等。使计算机产生一种特定的操作，如赋值、循环等。 非执行语句非执行语句 非执行语句用来将某些信息通知翻译系统，让非执行语句用来将某些信息通知翻译系统，让VBVB 翻译系统按它的要求作出处理。如翻译系统按它的要求作出处理。如DimDim、ConstConst、 RemRem等。等。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 一个语句一般包含两部分：一个语句一般包含两部分： 语句定义符部分语句定义符部分 规定了要让计算机干什么。如：规定了要让计算机干什么。如：DimDim 语句体部分语句体部分 指要干的具体内容。如：指要干的具体内容。如：A As

16、 IntegerA As Integer VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.4.2 Stop语句和语句和End语句语句 1Stop 作用：暂停程序的运行。使用格式为：作用：暂停程序的运行。使用格式为：Stop 一般用于程序调试中。一般用于程序调试中。 如暂停以查看一下前面运行的结果是否正确如暂停以查看一下前面运行的结果是否正确 若要继续执行，可用工具栏的若要继续执行，可用工具栏的“继续继续”按钮。按钮。 2End 作用：终止程序的运行。使用格式为：作用：终止程序的运行。使用格式为：End 终止程序的运行终止程序的运行 将卸载所有窗体模块将卸载所有窗体模

17、块 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.4.3 什么是函数什么是函数 函数是一些量依赖于另一些量的概括函数是一些量依赖于另一些量的概括 例如数学表达式例如数学表达式y=Sin(x) y为函数值为函数值 x为自变量为自变量 计算机中，函数表示类似于数学中的这种关系计算机中，函数表示类似于数学中的这种关系 计算机中，函数由相对独立的程序代码实现的。计算机中，函数由相对独立的程序代码实现的。 VB系统提供了一部分函数，称为系统提供了一部分函数，称为VB内部函数内部函数 用户可以直接调用用户可以直接调用VB函数函数 VB最好的教程第最好的教程第3章章-设计顺序设

18、计顺序 结构程序结构程序 3.4.4 使用函数使用函数 VB的内部函数一般分为：的内部函数一般分为： 数学函数、字符串函数、日期数学函数、字符串函数、日期/时间函数、转换时间函数、转换 函数等函数等 VB内部函数调用的基本格式是：内部函数调用的基本格式是： 函数名函数名(参数参数1, 参数参数2, 参数参数n) 参数是函数的输入。参数是函数的输入。n=0 一般函数有一个返回值，类型可以是数值型或一般函数有一个返回值，类型可以是数值型或 字符型等。字符型等。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 函数可以被用于表达式中，如函数可以被用于表达式中，如X = -B

19、+ Sqr(D) 函数调用时，函数名、参数个数、排列次序函数调用时，函数名、参数个数、排列次序 和数据类型应与规定的一致和数据类型应与规定的一致 函数的运算优先级高于其它运算符，低于括函数的运算优先级高于其它运算符，低于括 号号( )。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.4.5 常用函数举例常用函数举例 （1）求平方根函数）求平方根函数Sqr。格式：。格式：Sqr(x) 对对x开平方根。开平方根。X=0 （2）取整函数）取整函数Int。格式：。格式：Int(x) 求不大于求不大于x的最大整数。的最大整数。Int不进行四舍五入。如：不进行四舍五入。如：

20、Print Int(-3.4), Int(3.8), 显示：显示：-4 3 （3）取整函数）取整函数Fix。格式：。格式：Fix(x) 求求x的整数部分。的整数部分。Fix也不进行四舍五入。如：也不进行四舍五入。如： Print Fix(-3.4), Fix(3.8) , 显示显示：-3 3 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 （4）四舍五入函数）四舍五入函数Round。 格式格式：Round(x1 ,x2) 省略省略x2(=0)时表示四舍五入取整。它将时表示四舍五入取整。它将x1四舍四舍 五入保留小数五入保留小数x2位。如：位。如： Print Round

21、(12.455, 2), Round(-12.57), Round(12.34, 1) 显示：显示：12.46 -13 12.3 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 （5）绝对值函数）绝对值函数Abs。格式：。格式：Abs(x) 该函数求出该函数求出x的绝对值。如：的绝对值。如：Abs(-25)的值为：的值为： 25。 （6）正弦函数）正弦函数Sin。格式：。格式：Sin(x) 该函数用于求该函数用于求x的正弦值。参数一律采用弧度。的正弦值。参数一律采用弧度。 如如sin90的的VB函数表达式应为函数表达式应为 Sin(3.1415926/2)。 VB最好的

22、教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 （7）随机函数）随机函数Rnd。使用格式为：。使用格式为：Rnd(x) 返回一个随机返回一个随机Single型数，范围在型数，范围在(0,1)之间。之间。 参数参数x决定了产生随机数的方法。决定了产生随机数的方法。 如果如果x0，将产生下一个随机数。例如：，将产生下一个随机数。例如： Print Rnd(-1), Rnd(-2), Rnd(0), Rnd(-1), Rnd(0) ,Rnd .224007 .7133257 .7133257 .224007 .22400 7 .7055475 例如随机给出两位数例如随机给出两位数A和和

23、B，可用，可用: A = Int(Rnd * 90 + 10):B = Int(Rnd * 90) + 10 产生随机数种的语句格式为：产生随机数种的语句格式为：Randomize VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 （8 8）转换函数）转换函数Val()Val()。格式：格式：Val(x$) 将参数对应的字符串值中的最前部的数字字符将参数对应的字符串值中的最前部的数字字符 转换为数值。如：转换为数值。如： Print Val(“ 12.3abc”), Val(“-12.367.8abc”), Val(“abc123”) 显示：显示：12.3 -12.367

24、 0 （9）颜色函数）颜色函数QBColor。格式：。格式：QBColor(x) 根据根据x的值产生一种颜色，其中的值产生一种颜色，其中0 x 15 QBColor(0)为黑色，为黑色，QBColor(15)为白色。例为白色。例 如：如：Form1.BackColor = QBColor(12) VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 （10）颜色函数）颜色函数RGB。格式：。格式：RGB(x1,x2,x3) 该函数将根据该函数将根据x1、x2和和x3的值产生一种颜色。的值产生一种颜色。 各参数范围一般应为各参数范围一般应为0255。可表示。可表示224种颜色。

25、种颜色。 x1表示红色成分表示红色成分 x2表示绿色成分表示绿色成分 x3表示蓝色成分。表示蓝色成分。 部分颜色可用颜色常量或颜色值部分颜色可用颜色常量或颜色值(3个字节个字节)，如：，如： vbBlack ”间隔符。间隔符。 （1）输出绝对定位函数）输出绝对定位函数Tab。格式：。格式：Tab(x) 该函数表示将输出位置定位到第该函数表示将输出位置定位到第x列。列。 如果位置已超过如果位置已超过x列，则定位下一行的第列，则定位下一行的第x列。列。 （2）输出相对定位函数）输出相对定位函数Spc。格式：。格式：Spc(x) 输出位置从当前位置开始，空出输出位置从当前位置开始，空出x列。列。 V

26、B最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.4.5 常用函数举例常用函数举例 【例【例3-2】在】在Form_Click内完成求平行四边形的内完成求平行四边形的 面积。面积公式：面积。面积公式：S=absin t。a、b为边长，为边长，t为为 夹角，使用角度。要求结果保留小数两位夹角，使用角度。要求结果保留小数两位 本题使用多个函数：本题使用多个函数： 用用InputBox函数输入函数输入a、b和和t， 用用Val函数把它们转换成数值类型函数把它们转换成数值类型 用用Sin函数计算面积函数计算面积 用用Round函数对面积值进行四舍五入。函数对面积值进行四舍五入。

27、 本例程序按顺序依次执行本例程序按顺序依次执行 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.4.5 常用函数举例常用函数举例- -求梯形面积求梯形面积 Private Sub Form_Click() Const PI = 3.1415926 用于设置符号常量用于设置符号常量 Dim A As Single, B As Single, T As Single, S As Single A = Val(InputBox(请输入边长请输入边长a ) B = Val(InputBox(请输入边长请输入边长b ) T = Val(InputBox(请输入角度请输入角度t

28、 ) S = Round(A * B * Sin(T * PI / 180), 2) Print a= ; A, b= ; B, t=; T, S= ; S End Sub 运行结果：当启动窗体后，单击窗体，然后分别输入运行结果：当启动窗体后，单击窗体，然后分别输入15、40、35， 窗体上显示为：窗体上显示为： VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 VB的有两类控件：的有两类控件： 工具箱中的常用控件工具箱中的常用控件 通过通过 “部件部件”的控件。的控件。“ActiveX控件控件” 本节介绍最常用的控件：本节介绍最常用的控件： 命令按钮命令按钮 标签标签

29、文本框文本框 滚动条滚动条 定时器定时器 VB控件有控件有 (名称名称)属性，大多部分有属性，大多部分有Caption、Top、 Left、Height、Width、Font、Visible、Enabled等等 属性，含义基本相同属性，含义基本相同 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.5.1 命令按钮命令按钮CommandButton 是用户与应用程序交互的最简便方法是用户与应用程序交互的最简便方法 往往使用单击命令按钮来执行指定的操作。往往使用单击命令按钮来执行指定的操作。 1创建命令按钮 方法一：方法一： 工具箱内选取命令按钮，然后在窗体工具箱内选取

30、命令按钮，然后在窗体 上拖曳鼠标就可以画出一个命令按钮上拖曳鼠标就可以画出一个命令按钮 方法二：双击工具箱内的命令按钮方法二：双击工具箱内的命令按钮 2命令按钮的事件命令按钮的事件 命令按钮的主要事件是命令按钮的主要事件是Click。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3命令按钮的属性命令按钮的属性 Caption：标题，字符型。默认值为：标题，字符型。默认值为Command1 (名称名称)：Name名称，字符型。默认值为名称，字符型。默认值为 Command1 Enabled：是否有效，布尔型。：是否有效，布尔型。 Visible：是否可见，布尔型。：是

31、否可见，布尔型。 Style：按钮显示方式，：按钮显示方式，0表示文字，表示文字，1表示图形。表示图形。 Picture：按钮显示的图形。它要求属性：按钮显示的图形。它要求属性Style值值 应为应为1。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 说明：说明： 注意（名称）和注意（名称）和Caption的区别。的区别。 （名称）是程序使用的标识符。（名称）是程序使用的标识符。 Caption 是界面显示的文字是界面显示的文字 （名称）设置后，程序中所有用到该对象（名称）设置后，程序中所有用到该对象 的地方，对象名都要用设置的名称，原默的地方，对象名都要用设置的名称

32、，原默 认名称无效。认名称无效。 设置快捷键：可在设置快捷键：可在Caption属性中加上属性中加上“&”。 例如：例如：Caption设置为设置为“E&xit”或或 “Exit&x” VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 【例【例3-3】窗体上设计】窗体上设计2个图形命令按钮，它们分别个图形命令按钮，它们分别 用于显示信息和结束程序，如图。若用户在命令用于显示信息和结束程序，如图。若用户在命令 按钮外单击，用消息框提示按钮外单击，用消息框提示“不要点错位置不要点错位置”。 主要属性设置主要属性设置 两个命令按钮：两个命令按钮： Caption：空；：空；St

33、yle：1；Picture：选择图形：选择图形 文件文件 窗体窗体Form1 Caption：显示：显示 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.5.1 命令按钮命令按钮图案按钮举例图案按钮举例 程序代码如下程序代码如下: Private Sub Command1_Click() Print Hello! End Sub Private Sub Command2_Click() End End Sub Private Sub Form_Click() 按钮外单击提示按钮外单击提示 MsgBox 不要点错位置不要点错位置, vbCritical, 警告警告 E

34、nd Sub VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.5.2 标签Label 用来显示用户不能直接改变的文本：用来显示用户不能直接改变的文本： 用作标注其他控件用作标注其他控件 用作程序代码执行时显示程序结果等信息用作程序代码执行时显示程序结果等信息 1创建标签创建标签 创建标签使用工具箱中的标签。创建标签使用工具箱中的标签。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 2标签的常用属性标签的常用属性 Caption：标题，即显示的文本。默认值为：标题，即显示的文本。默认值为Label1。 （名称）（名称）Name。设置标签名称。

35、默认值为。设置标签名称。默认值为Label1 AutoSize：设置标签是否根据显示内容自动改变：设置标签是否根据显示内容自动改变 大小大小 Backstyle：设置标签透明背景：设置标签透明背景 Borderstyle：设置标签边框：设置标签边框 WordWrap：设置标签内的文字自动换行，布尔：设置标签内的文字自动换行，布尔 型。型。 Alignment：设置标签显示的对齐方式：设置标签显示的对齐方式 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 说明：说明： Label1中，第中，第5个是小写字母个是小写字母l，最后一个是，最后一个是 数字数字1 设置设置Wor

36、dWrap为为True时，此时应把时，此时应把 AutoSize设为设为True，否则除非标签有足够的，否则除非标签有足够的 高度。高度。 标签也有一些事件，但不常用。标签也有一些事件，但不常用。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.5.3 文本框文本框TextBox 处理字符类型数据处理字符类型数据 文本框控件的功能非常强大，在控件中可以：文本框控件的功能非常强大，在控件中可以： 输入文本、编辑文本和输出文本输入文本、编辑文本和输出文本 被程序用来读取和显示信息被程序用来读取和显示信息 1创建文本框创建文本框 在工具箱内选取文本框工具在工具箱内选取文本

37、框工具 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 2文本框的主要属性文本框的主要属性 （名称）：（名称）：Name。字符型。默认值为。字符型。默认值为Text1 Text：文本框显示的内容，字符型。默认值：文本框显示的内容，字符型。默认值 Text1。 它是文本框最重要的属性它是文本框最重要的属性 Locked：选择文本框是否允许编辑，布尔型。：选择文本框是否允许编辑，布尔型。 SelStart：选中文本的起始位置，或插入点位：选中文本的起始位置，或插入点位 置置 如：如：Text1. SelStart=0 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结

38、构程序结构程序 SelLength：文本框内被选中文本的长度，：文本框内被选中文本的长度， 数值类型。数值类型。 SelText：文本框内被选中的文本，字符型：文本框内被选中的文本，字符型 MaxLength：设置文本框中能输入的最大字：设置文本框中能输入的最大字 符数符数 MultiLine：是否能多行显示：是否能多行显示 Scrollbars：设置文本框加滚动条。与：设置文本框加滚动条。与 MultiLine有关有关 PasswordChar：设置输入文本的特殊显示：设置输入文本的特殊显示 字符。如字符。如* VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 说明：说

39、明： 文本框没有文本框没有Caption属性。属性。 SelStart、SelLength、SelText属于文本编辑属于文本编辑 属性，只能在程序中设置。属性，只能在程序中设置。 3文本框的方法文本框的方法 主要方法是设置焦点的主要方法是设置焦点的SetFocus方法。方法。 格式：文本框名称格式：文本框名称.SetFocus VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 4文本框的事件文本框的事件 有有Click、DblClick等鼠标事件等鼠标事件 还常用：还常用： Change事件：在文本框内容发生改变时触事件：在文本框内容发生改变时触 发。发。 KeyPre

40、ss事件：它在用户按任意键时触发事件：它在用户按任意键时触发 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 【例【例3-4】改写例】改写例3-1，启动窗体后，用户在，启动窗体后，用户在Text1内内 输入摄氏温度的同时，输入摄氏温度的同时，Text2立即自动显示对应的立即自动显示对应的 华氏温度。要求华氏温度。要求Text2不能输入数据。不能输入数据。 说明：说明： Text2不能输入数据，可设置不能输入数据，可设置Enabled或或Locked属性。属性。 边输入边计算显示，应编写边输入边计算显示，应编写Text1的的Change事件过程事件过程 Form_Load

41、同例同例3-1，其它程序代码如下：，其它程序代码如下： Private Sub Text1_Change() Dim C As Single, F As Single C = Val(Text1.Text) F = 9 * C / 5 + 32 Text2.Text = F End Sub VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 剪贴板对象的使用剪贴板对象的使用 剪贴板不是剪贴板不是VB的控件，它是的控件，它是Windows部件部件 它能够和文本框合用，制作简单的文本编辑器。它能够和文本框合用，制作简单的文本编辑器。 剪贴板对象的名称是剪贴板对象的名称是Clip

42、board，常用方法有：，常用方法有： （1）Clear：清除剪贴板中的内容。：清除剪贴板中的内容。 （2）GetText：返回剪贴板上的所有字符。：返回剪贴板上的所有字符。 （3）SetText：将字符串送入剪贴板：将字符串送入剪贴板 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 Clipboard.Clear 清除剪贴板原有的内容；清除剪贴板原有的内容； Clipboard.SetText Text1.SelText 将文本框将文本框Text1中选择的内容送入剪贴板；中选择的内容送入剪贴板； Text1.SelText = Clipboard.GetText 将剪

43、贴板的内容放入文本框将剪贴板的内容放入文本框Text1中插入点中插入点 所在位置，所在位置， 或替换文本框中当前已选中的文字。或替换文本框中当前已选中的文字。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.5.4 滚动条滚动条 (VscrollBar和和HscrollBar) 滚动条可用于滚动显示窗口内容。滚动条可用于滚动显示窗口内容。 滚动条还可作为模糊输入数值的输入装置。滚动条还可作为模糊输入数值的输入装置。 VB工具箱内提供了垂直和水平两种滚动条。工具箱内提供了垂直和水平两种滚动条。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 1

44、创建滚动条创建滚动条 在工具箱内选取滚动条工具按钮。在工具箱内选取滚动条工具按钮。 2滚动条控件的滚动条控件的常用常用属性属性 （名称）：（名称）：Name名称。垂直名称。垂直VScroll1，水平，水平HScroll1 Value：滚动条当前值。位于属性：滚动条当前值。位于属性Min和和Max的值之间的值之间 Min：滚动条最小值。应大于等于：滚动条最小值。应大于等于-32768 Max：滚动条最大值。应小于等于：滚动条最大值。应小于等于32767 SmallChange：单击滚动箭头时的改变量：单击滚动箭头时的改变量 LargeChange：单击滚动块与滚动箭头间的任意位置，：单击滚动块与

45、滚动箭头间的任意位置， 滚动条值的改变量滚动条值的改变量 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3滚动条控件的事件滚动条控件的事件 主要是主要是Change事件和事件和Scroll事件。事件。 （1）Change事件。事件。 当滚动块在滚动条上移动时，其当滚动块在滚动条上移动时，其Value值值 发生变化，出现发生变化，出现Change事件。事件。 （2）Scroll事件。事件。 当鼠标拖动滚动块时发生。当鼠标拖动滚动块时发生。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 【例【例3-5】编写一个利用滚动条来显示颜色的程序，】编写一

46、个利用滚动条来显示颜色的程序， 如图。说明：如图。说明： 颜色使用颜色使用RGB函数函数 用用3个滚动条分别表示个滚动条分别表示RGB红、绿、蓝颜色成份红、绿、蓝颜色成份 （3个参数）的变化。个参数）的变化。 滚动条的滚动条的Change事件：将滚动块变化时的相应事件：将滚动块变化时的相应 的颜色将反映在文本框中的颜色将反映在文本框中 6个标签：表示各滚动条的颜色和值个标签：表示各滚动条的颜色和值 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 属性设置：属性设置： 滚动条的滚动条的Max：255，SmallChange：10； LargeChange：20 其它对象的

47、其它对象的Caption属性值如图。属性值如图。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 程序代码如下：程序代码如下： Private Sub HScroll1_Change() 红红 Text1.BackColor = RGB(HScroll1.Value, HScroll2.Value, _ HScroll3.Value) Label4.Caption = HScroll1.Value End Sub Private Sub HScroll2_Change() 绿绿 Text1.BackColor = RGB(HScroll1.Value, HScroll2

48、.Value, _ HScroll3.Value) Label5.Caption = HScroll2.Value End Sub Private Sub HScroll3_Change() 蓝蓝 Text1.BackColor = RGB(HScroll1.Value, HScroll2.Value, _ HScroll3.Value) Label6.Caption = HScroll3.Value End Sub VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 专门用于时间控制的控件，又称计时器控件。专门用于时间控制的控件，又称计时器控件。 可以有规律地间隔一段时间

49、触发一次定时事件，可以有规律地间隔一段时间触发一次定时事件， 从而执行一次代码以实现某种有时间规律的操从而执行一次代码以实现某种有时间规律的操 作。作。 时间间隔由时间间隔由Interval属性决定属性决定 例如可以显示时间，可以控制打字速度，可例如可以显示时间，可以控制打字速度，可 以制作有动态效果的程序等。以制作有动态效果的程序等。 每个定时器必须依附在窗体上每个定时器必须依附在窗体上 用户可以在窗体上建立多个定时器。用户可以在窗体上建立多个定时器。 定时器控件在程序运行时是不可见的定时器控件在程序运行时是不可见的 定时器没有大小。定时器没有大小。 VB最好的教程第最好的教程第3章章-设计

50、顺序设计顺序 结构程序结构程序 1创建定时器创建定时器 在工具箱内选取定时器控件在工具箱内选取定时器控件 2定时器的定时器的常用常用属性属性 （名称）：（名称）：Name。定时器的名称。默认值为。定时器的名称。默认值为 Timer1 Interval：设定定时器的时间间隔，单位毫秒，：设定定时器的时间间隔，单位毫秒， 即即1/1000秒，最大秒，最大65536。 它是定时器控件最主要的属性。默认为它是定时器控件最主要的属性。默认为0， 定时器不工作定时器不工作 Enabled：是否让定时器工作。默认值为：是否让定时器工作。默认值为True。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序

51、 结构程序结构程序 3定时器的事件定时器的事件 定时器事件只有一个，即定时器事件只有一个，即Timer事件：事件： Timer事件有规律地隔一段时间（由事件有规律地隔一段时间（由 Interval决定）触发一次决定）触发一次1 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 【例【例3-6】设计一个显示当前时钟的程序，如图。】设计一个显示当前时钟的程序，如图。 因文本框只显示信息，因文本框只显示信息，Enabled属性可为属性可为False； 时钟时钟1秒钟变化一次，定时器秒钟变化一次，定时器Interval值为值为1000。 程序非常简单，代码如下。程序非常简单，代码

52、如下。 Private Sub Timer1_Timer() 每隔每隔1秒钟运行秒钟运行1次次 Text1.Text = Time Time是是VB内部函数，内部函数， End Sub 赋值时，赋值时，VB自动将日期型数据转换成与赋值左自动将日期型数据转换成与赋值左 边变量或属性类型一致的数据边变量或属性类型一致的数据 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.7.1 程序错误的种类和产生的原因程序错误的种类和产生的原因 调试过程就是一个发现错误并纠正错误的过程。调试过程就是一个发现错误并纠正错误的过程。 VB程序错误分三类程序错误分三类 编译错误编译错误 代

53、码不符合语法格式要求，如语句不完整，代码不符合语法格式要求，如语句不完整， 参数个数不符等参数个数不符等 1. 可根据错误信息纠正编译错误可根据错误信息纠正编译错误 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 逻辑错误逻辑错误 一般是指程序能运行，但运行结果不正确。一般是指程序能运行，但运行结果不正确。 这类错误只有通过分析程序，才能发现问这类错误只有通过分析程序，才能发现问 题所在，如公式错。题所在，如公式错。 运行错误运行错误 一般是执行了不能执行的操作而引起的。一般是执行了不能执行的操作而引起的。 如分母为零如分母为零 可根据提示错误信息，进入调试，找出错可根

54、据提示错误信息，进入调试，找出错 误所在处。误所在处。 为减少错误，编程时可采用一定的措施，如使用为减少错误，编程时可采用一定的措施，如使用 Option Explicit语句语句 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3.7.2 调试程序调试程序 VB中常用的调试方法有：设置断点、单步执行、中常用的调试方法有：设置断点、单步执行、 查看中间运行结果等。查看中间运行结果等。 1设置断点设置断点 设置断点方式：在代码窗口左侧的设置断点方式：在代码窗口左侧的“边界标识条边界标识条” 中该行对应的位置处单击；中该行对应的位置处单击； 程序运行设置了断点程序运行设置了

55、断点(Break Point)的代码行时，的代码行时， 在执行该代码之前停止运行，进入中断模式。在执行该代码之前停止运行，进入中断模式。 进入中断模式后，当前行指示器指示程序暂停在进入中断模式后，当前行指示器指示程序暂停在 该行。这时可以在代码窗口或该行。这时可以在代码窗口或“立即窗口立即窗口”检查检查 程序状态。程序状态。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 2单步执行单步执行 单步单步(Step)执行可以功能键执行可以功能键F8。 每按一次每按一次F8，程序就执行一行，执行指示器就，程序就执行一行，执行指示器就 指向下一行。指向下一行。 单步执行，可以监

56、视变量，还可以跟踪程序流单步执行，可以监视变量，还可以跟踪程序流 程。特别是分支和循环程序。程。特别是分支和循环程序。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 3查看中间运行结果查看中间运行结果 中断和单步方式都可以在程序暂停状态下查看中中断和单步方式都可以在程序暂停状态下查看中 间运行结果：间运行结果： 使用立即窗口使用立即窗口 程序中添加程序中添加Print语句语句 使用使用VB的的Tip显示当前变量的值。显示当前变量的值。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 另一种查看程序中间结果的方法是使用监视窗口另一种查看程序中间结果的方法是使用监视窗口 在程序运行过程中，监视窗口中的表达式值随在程序运行过程中，监视窗口中的表达式值随 之变化。之变化。 添加监视的方法：添加监视的方法： 在代码编辑器中使用快捷菜单在代码编辑器中使用快捷菜单 “添加监视添加监视” 命令命令 选择调试代码所在的模块和过程选择调试代码所在的模块和过程 输入要监视值的表达式。输入要监视值的表达式。 VB最好的教程第最好的教程第3章章-设计顺序设计顺序 结构程序结构程序 【例【例3-73-7】已知三角形的三条边长】已知三角形的三条边长 a a、b b、c c，求面积