《Visual Basic程序设计（第二版）-电子教案-柳青 第2章 Visual Basic语言基础》由会员分享，可在线阅读，更多相关《Visual Basic程序设计（第二版）-电子教案-柳青 第2章 Visual Basic语言基础（113页珍藏版）》请在金锄头文库上搜索。
1、Visual Basic程序设计（第二版）,主编 柳青 严健武 中国水利水电出版社,第 2章 Visual Basic语言基础,本章主要介绍Visual Basic 6.0的编程基础知识，包括常量、变量的基本概念；数据类型及定义；运算符与表达式的使用；程序结构；自定义过程、函数的基本语法和使用。本章还详细探讨了变量作用范围，介绍了VB应用程序的启动模式等，为后续学习面向对象的程序设计，打下坚实的基础。,2.1 常量、变量与数据类型,2.1.1 Visual Basic的数据类型 数据是分类型的，数据的类型表明数据可以参与的运算以及所需存储空间的大小与范围。VB6的数据类型包括标准数据类型和用户
2、自定义类型。其中，标准数据类型包括字节型（Byte）、逻辑型（Boolean）、整型（Integer）、长整型（Long）、货币型（Currency）、无符号整型（Decimal）、单精度浮点型（Single）、双精度浮点型（Double）、日期型（Date）、字符型（String）、对象型（Object）、变体型（Variant)等。,在VB6中，数据类型及所占存储空间大小和范围列表如表2-1所示。 表2-1 数值类型,续表,续表,初学者大可不必马上记住每种数据类型的存储空间大小和范围。2.1.3节将结合变量的学习对数据类型进行分类，以帮助读者掌握常用数据类型的定义和使用。,2.1.2 常量
3、,1. 常量 在整个程序执行过程中，常量的值保持不变。使用常量可增加代码的可读性和可维护性。 常量是有意义的名字，取代重复出现而难以记住的数字、不变的数值或字符串。在程序运行过程中，常量的值不能象变量那样被修改，也不能被赋以新值。 VB有许多内部常量，用户也可以建立自定义常量。 （1）内部常量：由系统定义的、可直接使用的常量，可用来在代码中的任何地方代替实际值。表2-2列出了VB的内部常量。,表2-2 VB内部常量,此外，还有表示颜色的常量，如vbRed表示红色(vb+颜色的英文单词)；表示键盘 代码的常量，如vbKey代表A键(vbKey+键名)等。需要时，可以通过MSDN查看 “Visua
4、l Basic 常数”的相关内容 例如：VbRed：颜色常量，代表红色。 VbCrLf：代表回车换行。 常量名采用大小写混合的格式，其前缀表示定义常量的对象库名。来自VB 和 VBA(Visual Basic for applications) 对象库的常量以“vb”开头，例如，vbBSNone表示 窗体无边框；来自数据访问对 象库的常量以“db”开头，等等。,（2）用户自定义常量：用Const语句声明的常量。 声明格式：Public|Private Const 常量名As Type表达式 其中：常量名是有效的符号名（规则与变量名一样），表达式由数值常数或字符 串常数以及运算符组成。 以下是正
5、确的常量声明： Const Pi = 3.14159265358979 声明了常量Pi，其值为 3.14159265358979 Public Const MaxPlanets As Integer = 9 声明了公用整型常量MaxPlanets Const CodeName= #1/1/95# Const = “Enigma“ Public Const Pi = 3.14, MaxPlanets = 9,WorldPop = 6E+09 Const Pi2 = Pi * 2 等号右边的表达式除数字或字符串外，也可以是运算结果为数字或字符串的表达 （表达式中不能包含函数调用）。,2. 用户自定
6、义常量的范围 和变量声明一样，用Const语句声明的常量也有作用范围。规则如下： （1）在过程内部声明的常量，仅存在于过程中。 （2）在模块声明段中声明的常量，对模块中所有过程都有效，但对模块外任何代码都无效。 （3）在标准模块声明段中声明的常量，在整个应用程序中有效，可在Const前面放置Public 关键字，但在窗体模块或类模块中不能声明Public常量。,2.1.3 变量,应用程序在运行期间，可以用变量临时存储数据。变量是指程序运行期间其值可以变化的量，实质是程序运行过程中保存临时数据的内存单元，内存单元的名字即变量名。 变量由名字和数据类型组成。变量的名字用于在程序中标识变量和使用变量
7、的值，通过变量名可以引用变量中存储的数据。数据类型则确定变量中能保存哪种类型的数据。 1. 变量的命名规则 （1）变量必须以字母开头，由字母、汉字、数字或下划线组成。 （2）变量的长度不得超过 255 个字符。 （3）变量名不能使用VB的关键字。 （4）在同一个范围（即可以引用变量的域，如一个过程、一个窗体等）内，变量名必须是唯一的。 （5）为了增加程序的可读性，可在变量名前加一个类型前缀，以表示该变量的数据类型。,例2-1 已知某电视机的销售价格为1500元/台，编程统计某商店销售电视机的总数量及总销售额。 分析 销售前并不知道销售电视机的数量。设计两个变量CurTVPrice和IntTVn
8、umber保存数量和销售额，根据变量设计一个表达式，不必事先知道实际的输入是多少。每次运行程序时，输入销售电视机的数量后，通过以下代码计算销售额； CurTVPrice = 1500 * IntTVnumber 从变量名中可见，CurTVPrice 的数据类型是货币类型，IntTVnumber的数据类型是整数类型。,2. 变量的声明 在C语言中，在使用变量之前必须声明变量；而在VB中，变量可以不需要声明就可以直接使用，且变量名不区分大小写。 例如，下面的语句都是正确的： X=10 Y=20 Z=X+Y 但是，声明变量可以节省编程时间，减少因键入操作引起的错误例如，将userName 写成了ue
9、seName，如果没有事先定义UserName变量，VB不会自动提示输入错误。如果要强制在VB中必须先声明变量才可以使用，可以在代码窗口的首行添加以下一行代码：Option Explicit 这行代码表示所有的变量必须先声明才可以使用，否则提示错误，如图2-1所示。,图2-1 编译错误提示,声明变量的语法格式：Dim 变量名 As 类型 说明： （1）Dim是变量定义的关键字。（还可能是变量作用范围修饰关键字Public或Private，“作用范围修饰关键字”将在变量作用范围讨论）。 （2）As 类型名是可选项。As可以解读为“为”，如果省略该语句，变量默认为Variant（变体）类型。Var
10、iant数据类型在不同场合可代表不同的数据类型。 （3）变量名：必须满足变量命名规则。 通过 Dim 语句进行变量的声明，可以事先将变量通知程序。 以下是变量类型定义语句的几个例子： Dim strName As String 定义字符串类型变量 Dim intNum As Integer 定义整型变量 Dim dblMoney As Double 定义实型变量 Dim dBirthday As Date 定义日期类型变量 Dim bolYesNo As Boolean 定义布尔类型变量,3. 变量的声明方式 （1）隐式声明。使用变量前，可以不声明该变量。这种方法虽然方便，但如果拼错了变量名，
11、将会导致一个难以查找的错误。 （2）显式声明。显式声明变量后，系统一旦遇到一个未经声明的变量名时，将发出错误警告。 显式声明变量的方法：在类模块、窗体模块或标准模块的声明段中加入Option Explicit语句；或在菜单栏上选择“工具选项”选项，在“选项”对话框的“编辑器”选项卡中选择“要求变量声明”复选框，可在任何新模块中自动插入 Option Explicit 语句（不会在已经建立的模块中自动插入）。若需要向已有模块添加 Option Explicit，只能用手工方法。 注意：Option Explicit 语句的作用范围仅限于语句所在模块，若要对每个需要强制显式声明变量的窗体模块、标准
12、模块及类模块，必须将 Option Explicit 语句放在这些模块的声明段中。,4. 变量的数据类型 （1）数值类型变量：包含整数和小数（实数）。 整数类型 关键字：Integer（整型）和Long（长整型） 当变量保存的数在整数范围-32,768 到 32,767之间时，可以定义为 Integer类型，超过该范围的整数，则定义为Long类型。 例如：Dim a As Integer, b As Long a=100 ：b=40000 a=b 该行在运行时，将产生“溢出”的运行错误 说明： 可以在一行中定义多个变量，类型说明之间用逗号分隔，后面的变量定义必须去掉Dim关键字。其中，“=”为
13、赋值符，含义是将数值保存到变量；“：”为并行符，可以将多行语句通过“：”号写在一行中，使代码更加紧凑。“”后面为代码注释内容，程序不会执行该符号后面的内容。 如果写为以下形式： Dim a, b As Long 则a为Variant类型（变体型）。根据默认的规定，如果在声明中没有说明数据类型，则变量的数据类型为 Variant。,提示：定义变量时，最好同时声明其类型，程序运行可以避免类型转换所需的时间开销，使得程序的运行效率更高。 如果变量b不是赋予整数类型的数值（如b= “ abc “ ），将产生“类型不匹配”的运行错误；如果将小数89.9 赋值给变量b，则变量b的值将是四舍五入后的整数。
14、所有Integer类型数据都可以保存到Long类型变量中，反之不成立。例如，上面代码中的第三行a=b。如果不能确定保存的整数将会有多大，应将变量a定义为Long类型。 浮点数类型 关键字：Single（单精度）和Double（双精度） 如上所述，若不能确定保存的小数有多大时，应定义为Double类型来保存。Double类型比Single类型可以分配更大的内存空间。 例如，分别定义x,y两个变量如下： Dim x As Single Dim y As Double,（2）字符类型 关键字：String 字符型变量的值包含一连串字符。字符串可以包括字母、数字、空白和标点符号。 字符串有两种：变长与
15、定长的字符串。变长字符串在定义时不指定长度，定长字符串在定义时通过“*”号指定长度。 例如：Dim 变量名 as String * 长度 例2-2 在当前窗体中添加一个Button 1按钮，如图2-2所示；在按钮的Click事件中添加以下代码： Private Sub Command1_Click() Dim s1 As String, s2 As String * 10 s1 = “hello!“ s2 = “1234567890abc“ MsgBox （s1 & vbCrLf & s2） End Sub,图2-2 使用字符串的例子,图2-3 测试长度,分析 本例在按钮事件中定义变长字符串
16、s1 和定长字符串 s2 ，当对定长字符串赋值超过其定义的长度时，超过的长度将被截取；如果数据不足定义的长度，则以空格填充。变长度字符串长度是实际保存的字符串数据长度。可以使用VB6中的Len函数进行验证，将上面代码中的最后一行改为测试长度的代码： MsgBox (Len(s1) & vbCrLf & Len(s2) 运行结果如图2-3所示。 Msgbox是VB6内部函数，作用是弹出信息对话框，信息内容为括号中的参数。本书将经常使用MsgBox函数来测试显示某个变量值。 &是连接符，可以将不同类型的数据，连接成字符串，这里连接s1和换行符以及s2的值。,（3）日期类型 关键字：Date 日期类型变量可以保存的日期数据范围从 100 年 1 月 1 日到 9999 年 12 月 31 日，时间可以从 0:00:00 到 23:59:59。任何可辨认的文本日期都可以赋值给 Date 变量。 日期类型常量必须使用定界符“#”括起来，当字符串中包含正确的日期格式时，也可以赋值给日期类
