1、第第1章章 VB概述概述主要内容主要内容 Visual Basic语言简介 Visual Basic语言集成环境 VB可视化编程的步骤 面向对象编程的基本概念 使用联机帮助1.1 中文中文Visual Basic简介简介Visual Basic是基于是基于BASIC的可视化程序设计语的可视化程序设计语言言 BASIC语言是英文语言是英文Beginners All-Purpose Symbolic Code（初学者通用符号指令代码）（初学者通用符号指令代码）的缩写，是一种在计算机技术发展历史上的缩写，是一种在计算机技术发展历史上应用最为广泛的语言应用最为广泛的语言 1.2 中文中文Visual
2、Basic语言的特点语言的特点1.可视化可视化:使用预先建立的控件，把需要的控件使用预先建立的控件，把需要的控件“画画”在屏幕的相应位置，即可方便地设计出在屏幕的相应位置，即可方便地设计出图形用户界面图形用户界面 2.面向对象面向对象:把程序和数据封装起来作为一个对把程序和数据封装起来作为一个对象，并为每个对象赋予相应的属性象，并为每个对象赋予相应的属性 3.事件驱动事件驱动:在设计应用程序的时候，编写若干在设计应用程序的时候，编写若干个子程序，由用户操作引发某个事件来驱动完个子程序，由用户操作引发某个事件来驱动完成某种特定的功能，或由事件驱动程序调用通成某种特定的功能，或由事件驱动程序调用通
3、用过程来执行指定的操作用过程来执行指定的操作 1.3 中文中文Visual Basic 的版本的版本1.学习版学习版:学习版主要是为初学者了解基于学习版主要是为初学者了解基于Windows的应用程序开发而设计的，它包括全的应用程序开发而设计的，它包括全部内部控件、网格控件、选项卡以及数据绑定部内部控件、网格控件、选项卡以及数据绑定控件。控件。2.专业版专业版:专业版主要是为计算机专业编程人员专业版主要是为计算机专业编程人员而设计的，提供了功能完备的开发工具。而设计的，提供了功能完备的开发工具。3.企业版企业版:企业版是为创建高级的分布式、高性企业版是为创建高级的分布式、高性能的客户能的客户/服
4、务器或服务器或Internet/Intranet上的应用上的应用程序而设计的。程序而设计的。返回返回2.1 VB6.0的启动和退出的启动和退出1.启动启动2.退出退出不用多说了不用多说了2.2 Visual Basic的集成工作环境的集成工作环境 1.标题栏和菜单栏标题栏和菜单栏 2.工具栏工具栏3.工具箱工具箱4.工程管理器窗口工程管理器窗口 5.属性窗口属性窗口6.其他窗口其他窗口返回返回3.1 简单程序入门简单程序入门 一个简单的应用程序。界面由一个简单的应用程序。界面由1个窗体、个窗体、1个文个文本框和本框和2个命令按钮组成。当用户单击个命令按钮组成。当用户单击“确定确定”按钮时，文本
5、框中出现按钮时，文本框中出现“欢迎大家！欢迎大家！”字样，字样，当单击当单击“退出退出”按钮时，程序结束。按钮时，程序结束。步骤：步骤：1.新建工程、新建工程、2.添加文本框、添加文本框、3.添加命令按钮、添加命令按钮、4.设置属性、设置属性、5.编写事件代码、编写事件代码、6.运行应用程运行应用程序序、7.保存应用程序、保存应用程序、8.生成可执行文件生成可执行文件3.2 VB编程的一般步骤编程的一般步骤 1.设计用户界面：设计用户界面：添加控件、调整控件的位置和大小添加控件、调整控件的位置和大小 2.设置属性设置属性3.编写代码编写代码4.保存、运行及调试程序：保存、运行及调试程序：保存保
6、存VB应用程序、运行工程应用程序、运行工程 5.生成生成EXE文件文件 返回返回几个基本概念几个基本概念 对象：对象：系统中的基本运行实体，封装了数据和系统中的基本运行实体，封装了数据和操作。操作。对象的属性：对象的属性：对象的性质和状态特征。对象的性质和状态特征。对象的方法：对象的方法：对象的动作，是对象的动作，是VB提供的一种特提供的一种特殊的子程序。殊的子程序。对象的事件：对象的事件：请求对象执行某一操作或回答某请求对象执行某一操作或回答某些信息的要求称为对象的响应。些信息的要求称为对象的响应。事件过程：事件过程：对象在发生某对象在发生某“事件事件”后所执行的后所执行的程序称为事件驱动程
7、序。程序称为事件驱动程序。返回返回5 使用联机帮助使用联机帮助 1.使用在线帮助使用在线帮助 2.使用上下文相关帮助使用上下文相关帮助返回返回第第2 2章章 VBVB程序设计基础程序设计基础基本字符和词汇 基本数据类型 常量与变量 运算符和表达式 常用内部函数 VB中的控件 主要内容主要内容1.1 字符集字符集 字符字符:构成程序设计语言的最小语法单位，所有合法构成程序设计语言的最小语法单位，所有合法的语法单位都是由这个字符集中的元素构成的集合。的语法单位都是由这个字符集中的元素构成的集合。VB的基本字符集包括如下内容：的基本字符集包括如下内容：（1）数字：）数字：0、1、2、3、4、5、6、
8、7、8、9；（2）英文字母：包括大写字母）英文字母：包括大写字母AZ和小写字母和小写字母az；（3）特殊字符：）特殊字符：!#$%&*()-+=:；?/,.|空格等；空格等；（4）汉字。）汉字。1.2 标识符标识符 编程人员为变量、常量、数据类型、过程、函编程人员为变量、常量、数据类型、过程、函数等定义的名字，程序员可以对一些数据对象、数等定义的名字，程序员可以对一些数据对象、控件对象命名控件对象命名,必须符合如下规则：必须符合如下规则：（1）标识符必须以字母（）标识符必须以字母（AZ、az）开头，）开头，后面可跟字母、数字或下划线；后面可跟字母、数字或下划线；（2）标识符长度不能超过）标识符
9、长度不能超过255个字符；个字符；（3）自定义的标识符不能和）自定义的标识符不能和Visual Basic系统中系统中的运算符、语句、函数和过程名等关键字同名，的运算符、语句、函数和过程名等关键字同名，同时也不能与系统已有的方法和属性同名。同时也不能与系统已有的方法和属性同名。1.3 关键字关键字是是Visual Basic系统中保留下来的作为程序中具有系统中保留下来的作为程序中具有固定含义的标识符，关键字主要包括命令名、固定含义的标识符，关键字主要包括命令名、函数名、数据类型名、运算符、标准过程名等，函数名、数据类型名、运算符、标准过程名等，是不能被重新定义的。是不能被重新定义的。VB中约定
10、关键字的首中约定关键字的首字母为大写字母。字母为大写字母。返回返回2.1 数值型（数值型（Numeric）数据类型）数据类型 表示数量的多少和极性，分为整型和实型两大类：表示数量的多少和极性，分为整型和实型两大类：1.整型：没有小数点和指数符号的数。可以分为：整型：没有小数点和指数符号的数。可以分为：（1）整型（）整型（Integer，%）：两个字节存储。）：两个字节存储。（2）长整型（）长整型（Long，&）：四个字节存储。）：四个字节存储。（3）字节型（）字节型（Byte）：一个字节存储二进制数。）：一个字节存储二进制数。2.实型：实型数是有小数部分的数。可以分为实型：实型数是有小数部分的
11、数。可以分为（1）单精度型（）单精度型（Single，！）：，！）：4个字节，指数用个字节，指数用“E”表示。表示。（2）双精度型（）双精度型（Double，#）：）：8个字节，指数用个字节，指数用“D”表示。表示。（3）货币型（）货币型（Currency，类型符，类型符）：用）：用8个字节存储。个字节存储。3.日期型：日期型：8个字节，日期范围从公元个字节，日期范围从公元100年年1月月1日到日到9999年年12月月31日，时间范围从日，时间范围从0 00 00到到23 59 59。日期和时间。日期和时间数据用定界符数据用定界符“#”括起来，括起来，2.2 字符串型数据类型字符串型数据类型字
12、符串型数据类型用于存放字符型数据，有字符串型数据类型用于存放字符型数据，有变长和定长两种字符串，用双引号作为定变长和定长两种字符串，用双引号作为定界符号，双引号内字符的个数叫做字符串界符号，双引号内字符的个数叫做字符串的长度。的长度。在在Visual Basic中，字符串型数据采用国际标中，字符串型数据采用国际标准化组织（准化组织（ISO）字符标准，）字符标准，ASCII码字符和码字符和汉字一样都采用双字节存储。汉字一样都采用双字节存储。2.3 逻辑型数据类型逻辑型数据类型 用于逻辑判断，这种类型的数据只有用于逻辑判断，这种类型的数据只有True（逻辑真）和（逻辑真）和False（逻辑假）两个
13、值，用（逻辑假）两个值，用2个字节存储。当逻辑数据转换成整型数据个字节存储。当逻辑数据转换成整型数据时，时，True转换为转换为1，False转换为转换为0；当其；当其他数据类型转换成逻辑型数据时，非他数据类型转换成逻辑型数据时，非0转换转换为为True，0转换为转换为False。2.4 变体型数据类型变体型数据类型 一种特殊的数据类型，在程序中没有被一种特殊的数据类型，在程序中没有被“显式显式”声声明为某种类型变量的数据类型。明为某种类型变量的数据类型。包含除定长字符串型数据和自定义型数据外的任何包含除定长字符串型数据和自定义型数据外的任何数据类型，还可包含如下四种：数据类型，还可包含如下四
14、种：（1）Empty（空）：表示未指定确定的数据。（空）：表示未指定确定的数据。（2）Null（无效）：表示数据不合法。（无效）：表示数据不合法。（3）Error（出错）：指出过程中出现了一个错误（出错）：指出过程中出现了一个错误条件。条件。（4）Nothing（无指向）：表示数据还没有指向一（无指向）：表示数据还没有指向一个具体的对象。个具体的对象。2.5 自定义型数据类型自定义型数据类型 允许用户利用允许用户利用Type语句定义自己的数据类型，语句定义自己的数据类型，它是由若干个标准数据类型组成，类似于它是由若干个标准数据类型组成，类似于C语言中的结构体类型。格式为：语言中的结构体类型。格
15、式为：Type As As As End Type2.6 不同类型数据的混合运算不同类型数据的混合运算 对不同类型数据的运算结果，对不同类型数据的运算结果，VB规定：规定：（1）同类型的数据互相运算，结果值的类型不）同类型的数据互相运算，结果值的类型不变。变。（2）整型数据与实型数据互相运算，其结果为）整型数据与实型数据互相运算，其结果为实型。实型。（3）整型数据与长整型数据运算的结果为长整）整型数据与长整型数据运算的结果为长整型。型。（4）单精度数据与双精度数据运算的结果为双）单精度数据与双精度数据运算的结果为双精度型。精度型。返回返回3.1常量常量在程序运行期间始终保持不变的数据。在程序运
16、行期间始终保持不变的数据。VB中的常量分为：是文字常量和符号常量。符号常量中的常量分为：是文字常量和符号常量。符号常量又分为系统定义的符号常量和用户自定义的符号常量。又分为系统定义的符号常量和用户自定义的符号常量。1.文字常量：直接出现在程序代码中，类型和值由它本文字常量：直接出现在程序代码中，类型和值由它本身的表示形式决定身的表示形式决定。2.符号常量：采用常量定义的方法，定义一个符号来表符号常量：采用常量定义的方法，定义一个符号来表示一个常数。以提高程序的可读性和可维护性。在示一个常数。以提高程序的可读性和可维护性。在VB中有两种符号常量，一个是系统定义的，一是用中有两种符号常量，一个是系
17、统定义的，一是用户自定义的户自定义的 3.2 变量变量在程序执行过程中，其值可以发生变化的量称为在程序执行过程中，其值可以发生变化的量称为“变变量量”。几个概念：。几个概念：1.变量名：执行应用程序时使用变量临时存储数据，变变量名：执行应用程序时使用变量临时存储数据，变量代表内存中指定的存储单元，这个存储单元的名量代表内存中指定的存储单元，这个存储单元的名字称为变量名字称为变量名。命名规则。命名规则。2.变量的说明：使用变量前，应首先定义所用到的变量变量的说明：使用变量前，应首先定义所用到的变量（包括变量名和类型），使系统分配相应的内存空（包括变量名和类型），使系统分配相应的内存空间，并确定该
18、空间可存储的数据类型。间，并确定该空间可存储的数据类型。3.静态变量：程序模块运行结束后，静态变量：程序模块运行结束后，VB收回静态变量，收回静态变量，并且保留它们的值。并且保留它们的值。返回返回4.1 运算符运算符运算符就是用来对运算对象进行各种运算的运算符就是用来对运算对象进行各种运算的操作符，运算对象通常包括常量、变量和操作符，运算对象通常包括常量、变量和函数等。函数等。Visual Basic中的运算符分为四类：中的运算符分为四类：算数运算符、字符串运算符、关系运算符、算数运算符、字符串运算符、关系运算符、逻辑运算符。逻辑运算符。4.2 表达式表达式 由常量、变量、函数、运算符以及括号
19、按照一定由常量、变量、函数、运算符以及括号按照一定的规则组成，经过计算都会有一个结果，结果的类型的规则组成，经过计算都会有一个结果，结果的类型由参与运算的数据和运算符决定。分为算术表达式、由参与运算的数据和运算符决定。分为算术表达式、关系表达式和逻辑表达式。关系表达式和逻辑表达式。应遵循一定的书写规则应遵循一定的书写规则：（1）行编辑，表达式从左到右都写在同一行上，比）行编辑，表达式从左到右都写在同一行上，比如没有上标、下标、开根号等。如没有上标、下标、开根号等。（2）乘法运算符）乘法运算符“*”不能省略。不能省略。（3）只能使用圆括号，且必须成对出现，可以嵌套。）只能使用圆括号，且必须成对出
20、现，可以嵌套。4.2 表达式表达式 运算符的优先级：从左到右，从上到下优先级依次降低当表达运算符的优先级：从左到右，从上到下优先级依次降低当表达式中的运算符优先级相同时，按从左到右的顺序进行运算。另式中的运算符优先级相同时，按从左到右的顺序进行运算。另外，可以用圆括号来改变优先顺序。外，可以用圆括号来改变优先顺序。返回返回算数运算符算数运算符关系运算符关系运算符逻辑运算符逻辑运算符幂运算（幂运算（）相等（相等（=）NotNot负数（）负数（）不等（不等（）AndAnd乘、除（乘、除（*、/）小于（小于（）XorXor求模运算（求模运算（ModMod）小于等于（小于等于（=）ImpImp字符串连
21、接（字符串连接（&）VB的内部函数大体上可以分为的内部函数大体上可以分为4类：数学函数、类：数学函数、转换函数、字符串函数、时间函数。这些函数转换函数、字符串函数、时间函数。这些函数都带有一个或几个自变量，在程序设计语言中都带有一个或几个自变量，在程序设计语言中称为函数的称为函数的“参数参数”，函数对这些参数进行运，函数对这些参数进行运算，返回一个结果值。算，返回一个结果值。函数调用的一般格式为：（）5.1 数学函数数学函数用来完成数学运算，有三角函数、算术平方根函数、用来完成数学运算，有三角函数、算术平方根函数、对数函数、指数函数、绝对值函数和随机函数对数函数、指数函数、绝对值函数和随机函数
22、 函数名函数名功能功能示例示例SinSin（N N）求求N N的正弦值，的正弦值，N N为弧度为弧度SinSin（0 0）=0=0CosCos（N N）求求N N的余弦值，的余弦值，N N为弧度为弧度CosCos（0 0）=1=1TanTan（N N）求求N N的正切值，的正切值，N N为弧度为弧度TanTan（1 1）=1.55740772=1.55740772AtnAtn（N N）求求N N的反正切值，的反正切值，N N为弧度为弧度AtnAtn（2 2）=1.10714871=1.10714871SgnSgn（N N）求求N N的符号的符号SgnSgn（3 3）=1=1，SgnSgn（0
23、0）=0=0，SgnSgn（-4.54.5）=1 1AbsAbs（N N）求求N N的绝对值的绝对值AbsAbs（6 6）=6=6，AbsAbs（5 5）=5=5SqrSqr（N N）求求N N的平方根的平方根SqrSqr（9 9）=3=3ExpExp（N N）求求e e的的N N次幂次幂ExpExp（2 2）=7.389=7.389LogLog（N N）求求N N的自然对数的自然对数LogLog（1010）=2.3=2.3RndRnd（N N）产生产生0 01 1之间的随机小数之间的随机小数5.2 转换函数转换函数用来实现不同类型数据之间的转换。用来实现不同类型数据之间的转换。函数名函数名功
24、能功能示例示例IntInt（N N）取得一个不大于取得一个不大于N N的最大整数的最大整数IntInt（4.54.5）=4=4IntInt（4.54.5）=5 5CintCint（N N）把把N N的小数部分进行四舍五入的小数部分进行四舍五入CintCint（4.54.5）=5=5FixFix（N N）取得取得N N的整数部分，截去小数部分的整数部分，截去小数部分FixFix（4.54.5）=4=4FixFix（4.54.5）=4 4RoundRound（x,Nx,N）保留保留N N位小数，四舍五入位小数，四舍五入RoundRound（3.141593.14159，2 2）=3.14=3.14
25、AscAsc（C C）求得字符串求得字符串C C的首字符的的首字符的ASCIIASCII码值码值AscAsc（B B）=66=66AscAsc（bitbit）=98=98ChrChr（N N）ASCIIASCII码值转换成字符码值转换成字符ChrChr（6666）=B BValVal（C C）把字符串把字符串C C中的数值转换成数值。中的数值转换成数值。ValVal（3.14r3.14r）=3.14=3.14StrStr（N N）把数值型数据转换字符型把数值型数据转换字符型StrStr（3.143.14）=3.143.14CstrCstr（N N）数值型数据转换成字符串型数值型数据转换成字符串
26、型CStrCStr（2121）=21215.3字符串函数字符串函数 函数名函数名功能功能示例示例LenLen（C C）求字符串求字符串C C的字符个数的字符个数Len(Len(“欢迎欢迎VBVB”)=4)=4LenBLenB（C C）求字符串求字符串C C的字节数的字节数LenB(LenB(“欢迎欢迎VBVB”)=8)=8LeftLeft（C C，N N）从字符串左边取从字符串左边取N N个字符个字符Left(Left(“欢迎欢迎VBVB”,2,2）=“欢迎欢迎”RightRight（C,NC,N）从字符串右边取从字符串右边取N N个字符个字符Right(Right(“欢迎欢迎VBVB”,2,
27、2）=“VBVB”Mid(C,N1,N2)Mid(C,N1,N2)从从C C左边第左边第N1N1个位置向右取个位置向右取N2N2个字符个字符Mid(Mid(“欢迎欢迎VBVB”,2,2)=,2,2)=“迎迎V V”UcaseUcase（C C）把字符串中的字符全部改为大写把字符串中的字符全部改为大写Ucase(Ucase(“HelloHello”)=)=“HELLOHELLO”LcaseLcase（C C）把字符串中的字符全部改为小写把字符串中的字符全部改为小写Lcase(Lcase(“HelloHello”)=)=“hellohello”LtrimLtrim（C C）截去字符串左边的空格截去
28、字符串左边的空格Ltrim(Ltrim(“Hello Hello”)=)=“HelloHello”RtrimRtrim（C C）截去字符串右边的空格截去字符串右边的空格Rtrim(Rtrim(“Hello Hello“)=)=“HelloHello”TrimTrim（C C）截去字符串两端的空格截去字符串两端的空格Trim(Trim(“Hello Hello“)=)=“HelloHello”String(N,CString(N,C）返回由返回由C C中首字符组成的中首字符组成的N N个字符串个字符串String(2,String(2,”catcat”)=)=“cccc”SpaceSpace（N
29、 N）取得取得N N个空格个空格5.4日期与时间函数日期与时间函数 函数名函数名功能功能示例示例TimeTime（）（）返回系统当前时间返回系统当前时间1717：3030：1616DateDate（）（）返回系统当前日期返回系统当前日期2008-3-212008-3-21NowNow（）（）返回系统当前日期和时间返回系统当前日期和时间2008-3-21 172008-3-21 17：3030：1616DayDay（C/NC/N）返回当月的第几天返回当月的第几天DayDay（0808，3 3，2121）=21=21MonthMonth（C/NC/N）返回当年的月份返回当年的月份MonthMont
30、h（0808，3 3，2121）=3=3YearYear（C/NC/N）返回当年的年份返回当年的年份YearYear（08-3-2108-3-21）=2008=2008WeekDay(C/N)WeekDay(C/N)返回日期中的星期几返回日期中的星期几WeekDayWeekDay（08-3-2108-3-21）=6=6即星期五即星期五返回返回6.1 控件的分类控件的分类 VB中的控件一般分为三大类：内部控件、中的控件一般分为三大类：内部控件、ActiveX控件控件和可插入的对象。和可插入的对象。1.内部控件：称为标准控件，包含在内部控件：称为标准控件，包含在Visual Basic中的中的“E
31、XE”文件中，可直接使用。在文件中，可直接使用。在“工具箱工具箱”中显中显示。示。2.ActiveX控件：是扩展名如控件：是扩展名如“.OCX”文件的可执行代文件的可执行代码单元，是工具箱的扩充，默认状态不出现在工具码单元，是工具箱的扩充，默认状态不出现在工具箱中。箱中。3.可插入对象：是指能够添加到工具箱中的对象。用可插入对象：是指能够添加到工具箱中的对象。用户可将符合标准的文件添加到工具箱中，在编程时，户可将符合标准的文件添加到工具箱中，在编程时，可以象操作控件一样操作这些插入对象。可以象操作控件一样操作这些插入对象。返回返回6.2 内部控件的命名内部控件的命名 微软公司建议命名规则为：微
32、软公司建议命名规则为：“前缀前缀”“标识标识”“前缀前缀”由控件类型的三个简称字母组成，由控件类型的三个简称字母组成，“标识标识”是该控件所标识的含是该控件所标识的含义。义。控件类型控件类型前缀前缀控件类型控件类型前缀前缀FormForm（窗体）（窗体）frmfrmVScrollBarVScrollBar（垂直滚动条）（垂直滚动条）vsbvsbPictureBoxPictureBox（图片框）（图片框）picpicTimerTimer（计时器）（计时器）tmrtmrLabelLabel（标签）（标签）lbllblDrivelListBox(DrivelListBox(驱动器列表框驱动器列表框)
33、drvdrvFrameFrame（框架）（框架）frafraDirListBoxDirListBox（目录列表框）（目录列表框）dirdirCommandButton(CommandButton(命令按钮命令按钮)cmdcmdFielListBox(FielListBox(文件列表框文件列表框)filfilCheckBoxCheckBox（复选框）（复选框）chkchkShapeShape（形状）（形状）shpshpOptionButton(OptionButton(单选按钮单选按钮)optoptLineLine（直线）（直线）linlinComboBoxComboBox（组合框）（组合框）c
34、bocboImageImage（图像）（图像）imgimgListBoxListBox（列表框）（列表框）lstlstDataData（数据）（数据）datdatHScrollBar(HScrollBar(水平滚动条水平滚动条)hsbhsbTextBoxTextBox（文本框）（文本框）txttxt第第3 3章章 基本语句和结构基本语句和结构 基本语句 选择结构 多路分支结构 循环结构 主要内容主要内容案例案例3-1打印输出打印输出 通过这个简单的程序，可以掌握通过这个简单的程序，可以掌握Visual Basic中常用的几种基本语句，包括赋值中常用的几种基本语句，包括赋值语句、打印语句、注释语
35、句、结束语句语句、打印语句、注释语句、结束语句等。等。1.1 案例说明案例说明程序执行时，单击窗体的任何一个位置，程序执行时，单击窗体的任何一个位置，顺序执行顺序执行“窗体单击窗体单击”事件中相应的语事件中相应的语句，执行后在窗体上会显示数字的不同句，执行后在窗体上会显示数字的不同排列以及不同的符号组合。这些不同数排列以及不同的符号组合。这些不同数字和符号，是通过赋值语来取得数据，字和符号，是通过赋值语来取得数据，按照语句的先后顺序执行这些赋值语句，按照语句的先后顺序执行这些赋值语句，通过打印语句以及打印控制语句来完成通过打印语句以及打印控制语句来完成输出，在指定的位置显示相应的符号。输出，在
36、指定的位置显示相应的符号。1.2 程序实现程序实现 1.界面设计界面设计新建一个工程，系统默认产生了一个新窗新建一个工程，系统默认产生了一个新窗体，无需添加其它控件。窗体的属性采用体，无需添加其它控件。窗体的属性采用系统的默认值。系统的默认值。2.代码设计代码设计Private Sub Form_Click()a=12345b=54321a=bb=12345Print aPrint bPrinta=:b=#:c=$Print a;b;cPrintPrint a,b,cPrintPrint Tab(2);a;Space(4);b;Space(8);cEnd Sub1.3 相关知识相关知识 1.赋
37、值语句：为变量提供数据，设置对象的属性。赋值语句：为变量提供数据，设置对象的属性。变量名变量名=表达式表达式（为变量提供数据）。（为变量提供数据）。对象名对象名属性名属性名=表达式表达式（为对象设置属性）（为对象设置属性）2.输出语句：可以把运算结果传送到窗体、图片框等对象显示，输出语句：可以把运算结果传送到窗体、图片框等对象显示，也可传送到打印机用于打印。也可传送到打印机用于打印。Print的格式为：的格式为：Print，|；几点说明：几点说明：3.Cls方法：清除窗体或图片框上的文本或图形。格式如下：方法：清除窗体或图片框上的文本或图形。格式如下：Cls4.注释语句：注释语句：在在VB中用
38、中用“”“”或或Rem标识。标识。5.结束语句：结束语句：End1.4 拓展知识拓展知识 1.赋值相容问题：赋值相容问题：2.与与Print语句有关的函数：语句有关的函数：1.5 案例案例1-2 这个程序可以观察这个程序可以观察“重叠显示重叠显示”和和“覆盖显示覆盖显示”两种输出方式。两种输出方式。相关知识：相关知识：1.如需要保留原来显示的内容，或者需要部分覆盖原来的图案。可如需要保留原来显示的内容，或者需要部分覆盖原来的图案。可设置窗体对象的设置窗体对象的FontTransParent属性来实现。格式为：属性来实现。格式为：FontTransParent=True|False2.Curre
39、ntX和和CurrentY属性的作用是设置下一次显示或打印的水平属性的作用是设置下一次显示或打印的水平和垂直坐标。格式为：和垂直坐标。格式为：CurrentX=X CurrentY=Y返回返回2.1 求解一元二次方程案例说明求解一元二次方程案例说明一元二次方程一元二次方程ax2+bx+c=0的根取决于它的三个系数的根取决于它的三个系数a、b、c。根据三个系数的具体值，判断出该一元二次方程的。根据三个系数的具体值，判断出该一元二次方程的根的情况。根的情况。当当a=0时不构成一元二次方程，只有一个根；时不构成一元二次方程，只有一个根；当当a0时，根的情况要计算时，根的情况要计算b2-4ac的值。的
40、值。b2-4ac0时，方程有两个不相等的实根，时，方程有两个不相等的实根，b2-4ac=0时，该方程有两个相等的实根，时，该方程有两个相等的实根，b2-4ac0时则没有实根。时则没有实根。该程序要求从键盘输入该程序要求从键盘输入a、b、c三个系数，根据上述的三个系数，根据上述的几种情况做出不同的判断和处理，然后把这个方程的几种情况做出不同的判断和处理，然后把这个方程的根显示出来。根显示出来。2.2 程序实现程序实现 1.界面设计：单击窗体后，显示一个输入框，从键盘输界面设计：单击窗体后，显示一个输入框，从键盘输入所需要的入所需要的3个系数个系数a、b和和c，然后进行计算。，然后进行计算。2.代
41、码设计：代码设计：2.3 相关知识相关知识 选择结构就是根据给定的选择结构就是根据给定的“条件条件”是否满足，从两种或是否满足，从两种或多种可能的操作方案中选择一种操作执行。包括：多种可能的操作方案中选择一种操作执行。包括：1.行行If：If Then Else 2.块块If语句：语句：If ThenElseEnd If 块块If语句的几点说明：语句的几点说明：条件满足？语句块1语句块2End If语句TF2.3 相关知识相关知识 3.ElseIf结构：可以解决多层嵌套问题。格式为：结构：可以解决多层嵌套问题。格式为：If ThenElseIf ThenElseIf ThenElseEnd I
42、fFT条件2语句块2FT条件n语句块n+1语句块nEnd If条件1语句块1FT小结：两种结构的对比。小结：两种结构的对比。本案例中求解一元二次方程的根的算法中，前本案例中求解一元二次方程的根的算法中，前述的块述的块If嵌套的代码可以改为如下嵌套的代码可以改为如下ElseIf结构，结构，对比一下可以看出，用对比一下可以看出，用ElseIf结构取代块结构取代块If嵌嵌套结构可以使得代码的层次变得简单了。套结构可以使得代码的层次变得简单了。返回返回3.1 判定成绩案例说明判定成绩案例说明从键盘输入一个学生的成绩，按照不同的分数区从键盘输入一个学生的成绩，按照不同的分数区域，给出不同的等级。例如分数
43、域，给出不同的等级。例如分数90时，给出时，给出的等级是的等级是“优秀优秀”，80分数分数90时等级为时等级为“良好良好”，70分数分数80时等级为时等级为“中等中等”，60分数分数70给出的等级为给出的等级为“及格及格”，而当分，而当分数数60时，则为时，则为“不及格不及格”。也就是说根据给。也就是说根据给定的条件不同，有定的条件不同，有5种选择，采用多路分支结种选择，采用多路分支结构语句。构语句。3.2 程序实现程序实现1.界面设计：添加界面设计：添加2个命令按钮和个命令按钮和1个标签。设置个标签。设置2个命个命令按钮的令按钮的Caption属性。标签属性。标签Lable1的的Captio
44、n属性设属性设置为空。单击置为空。单击“单击输入分数单击输入分数”按钮，显示一个输按钮，显示一个输入框。等待输入成绩，在输入框中输入成绩后，单入框。等待输入成绩，在输入框中输入成绩后，单击输入框中的击输入框中的“确定确定”按钮，则在窗体的标签上显按钮，则在窗体的标签上显示这个分数所在的档次，单击另一个示这个分数所在的档次，单击另一个“退出退出”按钮，按钮，则退出程序的执行。则退出程序的执行。2.代码设计：对两个命令按钮的单击事件进行编程。代码设计：对两个命令按钮的单击事件进行编程。3.3 相关知识相关知识1.Select Case语句：又称为情况语句。一般格式为：语句：又称为情况语句。一般格式
45、为：Select Case Case Case Case Case ElseEnd Select测试表达式测试表达式=？语语句句块块1语语句句块块2语语句句块块i语语句句块块n+1语语句句块块n3.3 相关知识相关知识“测试表达式测试表达式”可以是字符串表达式，也可以是数值表达式，而且可以是字符串表达式，也可以是数值表达式，而且在进入在进入Select Case结构时必须具有确定的值。结构时必须具有确定的值。“表达式列表表达式列表”形式有形式有3种情况：种情况：（1）可以是一个表达式，也可以是多个表达式，但必须用逗号隔）可以是一个表达式，也可以是多个表达式，但必须用逗号隔开。例如：开。例如：C
46、ase 2，4，6，8表示测试表达式的值等于表示测试表达式的值等于2，4，6，8之一，就算满足。之一，就算满足。（2）表达式）表达式1 To 表达式表达式2。一般情况下，表达式。一般情况下，表达式1的值小于表达式的值小于表达式2的值。例如：的值。例如：Case-20 To 20表示表示“20测试表达式测试表达式20”。（3）Is 关系运算符关系运算符 表达式。例如：表达式。例如：Case Is ab表示测试表达式的值大于等于表示测试表达式的值大于等于ab。3.3 相关知识相关知识Select Case情况语句可以应用于要处理的问题需情况语句可以应用于要处理的问题需要从多个可能的方案中选择，虽然
47、用嵌套的要从多个可能的方案中选择，虽然用嵌套的If语语句以及句以及ElseIf语句也可以实现多路选择的结构，语句也可以实现多路选择的结构，但书写和阅读起来会显得比较杂乱，而使用但书写和阅读起来会显得比较杂乱，而使用Select Case语句将使得程序的结构更为清晰。语句将使得程序的结构更为清晰。比如在上一节介绍的求解一元二次方程根的程序，比如在上一节介绍的求解一元二次方程根的程序，当当a、b、c确定且确定且a0时，构成一元二次方程，时，构成一元二次方程，根的值取决于根的值取决于b24ac的值。的值。b24ac有三种可有三种可能，等于能，等于0、大于、大于0和小于和小于0。如果用。如果用Sele
48、ct Case语句实现，可以编写代码如下：语句实现，可以编写代码如下：3.4 拓展知识拓展知识在使用在使用Select Case语句处理多路分支问题时，应避免不语句处理多路分支问题时，应避免不同的同的Case子句中的条件和相应的操作出现矛盾。子句中的条件和相应的操作出现矛盾。VB系统是按照系统是按照Case出现的次序，从上往下依次检查测试出现的次序，从上往下依次检查测试表达式的值是否与某个表达式的值是否与某个Case子句指定的条件匹配，当子句指定的条件匹配，当发现一个发现一个Case子句具备匹配的条件后，其他的子句具备匹配的条件后，其他的Case子子句都不起作用。而这种逻辑上的错误系统是不会去
49、检句都不起作用。而这种逻辑上的错误系统是不会去检查的，因此，在使用查的，因此，在使用Select Case语句时就要避免类似语句时就要避免类似情况的出现。情况的出现。返回返回4.1 验证歌德巴赫猜想案例说明验证歌德巴赫猜想案例说明素数的特征是只能被素数的特征是只能被1和它本身整除。验证和它本身整除。验证p是否是素数，是否是素数，我们只需在我们只需在2到到p1之间能否找到一个能整除之间能否找到一个能整除p的数，的数，如果有，则如果有，则p不是素数，如果没有，则不是素数，如果没有，则p就是一个素数，就是一个素数，然后设置一个然后设置一个p是素数的标志是素数的标志fp=True。也就是说用。也就是说
50、用2到到p-1的各整数去除的各整数去除p，判断余数是否为零，如果余数为，判断余数是否为零，如果余数为零，则肯定能被整除。零，则肯定能被整除。在寻找在寻找2到到p-1之间的一个能被之间的一个能被p整除的数，就是要把整除的数，就是要把2到到p-1的所有的数都作为被除数的所有的数都作为被除数p的除数，进行除法运算。的除数，进行除法运算。这是一个重复循环的过程，需要循环结构进行程序的这是一个重复循环的过程，需要循环结构进行程序的流程。而且这样的过程也是循环的，因为流程。而且这样的过程也是循环的，因为6到到100之间之间的偶数都需要寻找这样的两个素数，因此需要使用循的偶数都需要寻找这样的两个素数，因此需
