VisualBasic语言基础.ppt

1、第2章 Visual Basic语言基础,掌握各种常用数据类型的数据在内存中的存放形式，了解自定义数据类型。 理解变量和常量的概念、掌握其定义和使用。 掌握VB的 运算符和表达式的使用； 掌握常用内部函数的使用。,本章内容及要求：,2.1 Visual Basic语言字符集及编码规则,2.1.1 Visual Basic的字符集,大小写英文字母AZ和az； 数字0一9和27个专用字符,2.1.2 编码规则与约定,（一）编码规则 1VB代码中不区分字母的大小写。 2.语句书写比较自由。 在同一行上可以书写多条语句，语句间要用冒号“:”分隔。 若一个语句行不能写下全部语句，或在特别需要时，可以换行

2、。换行时需在本行后加入续行符，即1个空格加下划线“_”。 一行最多允许255个字符。 3注释以Rem开头，也可以使用单引号“”，注释内容可直接出现在语句的后面。,2.1 Visual Basic语言字符集及编码规则,例如： This is a VB REM This is a VB 4.在程序转向时需用到标号，标号是以字母开始而以冒号结束的字符串。 （二） 约定 1为了提高程序的可读性，对于VB中的关键字其首字母大写，其余字母小写 2. 注释有利于程序的维护和调试 3. 通常不使用行号 4对象名命名约定：每个对象的名字由3个小写字母组成的前缀（指明对象的类型）和表示该对象作用的缩写字母组成 。

3、,2.2 数据类型,2.2.1 Visual Basic的标准数据类型,1. 整型数是不带小数点和E指数的数。 例如：123，0，-24，19800等。 整型(Integer) 整数分为 长整型(Long) 2. 实数是带小数点和E指数的数。常用于表示数值较大或较小的数字。 例如：12.3，-24.，1.98E04，等。 单精度浮点数(Single) 实数分为 双精度浮点数(Double) 3. 货币型(Currency)数据以8个字节来存放，它支持小数点后面4位和小数点前面15位，是一个精确的定点数据类型，适用于货币运算。 4. 字节型（ Byte ）的数据类型表示（0255）无符号的数，常

4、用于访问二进制文件、图形和声音文件等。 5. 字符型（ String ）的数据类型只存放文本，是用双引号括起来的一串字符。 6. 布尔型（ Boolean ）数据。其值只有两个：真(True)和假(False),经常被用来表示逻辑判断的结果。任何时候只有两种状态的数据，如“True/False”、“Yes/No”、“On/Off”等，都可以表示为Boolean型，在Visual Basic中0表示False，非0表示True。,基本数据类型介绍,7. 日期型（Date ）数据用来表示日期和时间，用8个字节存放。可以表示多种格式的日期和时间。在程序使用时，日期类型必需用“#”括起来。 8.对象（

5、Object）型数据用来表示应用程序中或其他某些应用程序中的对象。可以用Set语句指定一个被声明为Object的变量去引用应用程序所识别的任何实际对象。例如： Dim objDb As Object Set objDb=OpenDatabase(“d:VbBiblio.mdb”) 9.Variant类型的数据能够表示所有系统定义的数据类型，当把它们赋予Variant型时，不必在这些数据的类型间进行转换，Visual Basic会自动完成任何必要的转换。Variant数据类型还包含三种特定值：Empty、Null、Error。 Empty值用于确定是否已将一个值赋予所创建的变量。赋值之前，Var

6、iant变量具有空值（Empty）。用IsEmpty函数可以测定一个变量建立后是否被赋过值。 Null值常用于数据库应用程序，表示求未知或丢失为空的数据。用IsNull函数可以判断一个Variant变量的值是否为Null。 Error值是指已发生过程中的错误状态。,说明： 对VB中的数据的学习，需要掌握以下几点 1、数据的类型 2、数据在内存中能够的存储形式及占用的字节数 3、数据的取值范围 4、数据能参与的运算 5、数据的有效范围及生成周期。,例题,实例2-1： 数据类型举例 Private Sub Form_Click() Dim smallno As Long Dim bigno As

7、Long smallno = 1000 * 1000第一行 bigno = 1000 * 100000第二行 Print smallno Print bigno End Sub,Smallno和bigno都是长整型，且bigno大于Smallno，但结果第一行溢出了，为什么了？答案是VB作运算时，先运算再转换类型，1000 * 1000为整型整型，结果还是整型，将Smallno转换为整型，结果1000000超出了整型的范围（3276832767），而第二行1000 * 100000为整型长整型，结果为长整数，所以没有问题。 修改方法：smallno = 1000 * 1000改成smallno

8、 = CLng(1000) * 1000或smallno = 1000 * 1000 world End Sub,字符串中有双引号则用连续 的2个双引号来表示。,2.2.2 用户自定义类型,可以把不同类型的变量组合起来创建用户定义的类型 。在模块级别中使用，用于定义包含一个或多个元素的用户自定义的数据类型。 使用形式： Type 自定义类型名 元素名 (下标) As 类型名 元素名 (下标) As 类型名 . . . End Type 说明 元素名：表示自定义数据类型中的一个成员。 类型名：为标准类型。,2.2 数据类型,Type Student Xh As String Xm As Stri

9、ng Xb As String Nl As Integer Score As Single End Type,例如: 对于一个学生的“学号”、“姓名”、“性别”、“年龄”、“入学成绩”等数据，为了处理数据的方便，常常需要把这些数据定义成一个新的数据类型（如Student类型）。,2.2 数据类型,对于定义好的类型， 就可以在变量声明时 使用该类型。 如Dim s1 as Student,补充：枚举类型 1、枚举的概念 所谓枚举是指将变量的值一一列举出来，变量的值只限于列举出来的值的范围。 2、声明枚举型的格式如下： Private | Public Enum 类型名称 成员名 = 常量表达式

10、成员名 = 常量表达式 End Enum 在缺省的情况下，在枚举中的第一个常数被初始化为0，其后的常数为比其前面的常数加1的数值。,Public Enum Days Sun Mon Tue Wed Thu Fri Sat End Enum,Private Sub Form_Click() Print Sat=; Days.Sat Dim day As Days 定义枚举类型的变量 day = Fri 枚举类型的赋值 Print Fri=; day Print Sun=; Days.Sun End Sub,2.3 常量和变量,2.3.1 常 量 在程序运行过程中，其值不能被改变的量称为常量。在V

11、B中有三类常量： 普通常量 符号常量 系统常量。 常量的定义格式为： private/public const 常量名 AS 类型名表达式或值 private/public涉及到有效范围，类型名就是前面一节的数据类型。如：,一、普通常量 1 整型常量 （1）整型（Integer）：表示-32768至32767之间的整数 例如：10 110 20 （2）长整型（Long）： 表示-2,147,483,648至2,147,483,647之间的整数 例如：长整型常数的书写： 23 Next i Print End Sub,2.5 常用内部函数,实例2-5 随机函数rnd的使用，单击命令按钮1生成10

12、个1-100之间的随机数，在文本框1中显示它们的平均数。结果如图所示。,Private Sub Command1_Click() Dim x As Integer Dim i As Integer Dim sum As Integer Dim pj As Double sum = 0 Print 计算它们的平均分; For i = 1 To 10 Print Int(Rnd * 100 + 1); x = Int(Rnd * 100 + 1) sum = sum + x Next I Print pj = sum / 10 Text1.Text = pj End Sub,Private Sub Form_Load() Form1.Caption = 成绩计算器 Command1.Caption = 生成随机成绩 End Sub,使用随机数函数产生三位正整数，使用Mid函数取其中间的数。 【案例说明】： 本实例希望随机产生三位正整数，三位正整数的取值范围介于111到999之间；当得到一个三位正整数以后，要取出中间的数，例如546，中间的数就是4。 【案例技术】： 可以使用语句Int(n -m + 1)* Rnd +m)得