第44讲 基本数据类型常量和变量及常用标准函数

1、第44讲 P69基本数据类型、常量和变量及常用标准函数在应用程序中，要用到数据(各种类型的常量和变量)、基本运算、标准函数、表达式，以及各种类型的语句。一、基本数据类型、常量和变量 数据是信息的一种记录形式。应用程序中的数据种类是多种多样的，有的数据用来记录数值信息，例如一本书的页数(一个整数)，或某个时刻的温度(一个实数)，而有的数据用来记录一封来信的内容(一段文字)。等等。在程序中使用的数据可以划分成若干种不同的类型，不同类型的数据，它们的用途、书写规则、在计算机内部的存储格式都是不相同的。数据总是以如下两种形式出现在程序中：常量和变量。常量是在程序运行过程中值不变的存储单元或数据；而变量

2、则用来表示数据的存储区，在程序运行过程中，这些存储区中的值是可以改变的。1、基本数据类型 （先对照数据库中的数据表：，看看字段数据类型） VB中常用的基本数据类型见P69表411：2个字节(16个1)=65535à(-32768032767)整数型Integer范围；4个字节(32个1)=4294967295à(-214748364802147483647)长整数型Long范围；2、常量 常量是指在程序执行过程中其值不能改变的存储单元或数据，它与变量的不同之处在于，程序运行的过程中不能被修改，也不能对常量赋以新值。 例1 下面是各种不同类型的常量。 整数常量： 12 102

3、4 有整数型、长整数型； 实数常量： 3.1416 -0.25 有单精度实数型、双精度实数型； 字符串常量： “请输入n值” 、“A+B=？”、“+5”、“Good”、“morning” “0618” 字符串常量实际上是一段内容固定不变的文字，由一对双引号之间的若干个字符的序列组成。 逻辑常量： True False 逻辑类型只有两个常量，其值为真(True)和假(False)。上面这些直接用数字或字符书写的常量叫直接常量。 另一种是用一个符号(通常是一个有意义的名字)来代表一个常量，这样的常量也被称为“符号常量”。使用符号常量的好处之一是可以使程序具有更好的可阅读性，其次也使程序的修改和调试

4、变得更为方便。 VB系统定义的符号常量: vbBlue VB系统定义的一个符号常量，代表蓝颜色的编码值程序设计者使用Const语句定义的符号常量: Const PI=3.14159 VB中的符号常量有两种来源:构造一个符号常量PI，来代表圆周率的近似值(即实数3.14159)，这样，写在程序中的所有符号PI都会被VB自动地转换成实数3.14159，例如： Const PI=3.14159 R=5 设圆半径为5，D为直径，L为圆周长，S为圆面积； D=2* R L=PI*DS=PI*R*R注意：PI3.14159=1100 错误！因为不允许给符号常量PI赋值！因此，Const PI=3.1415

5、9后，PI是符号常量，不能再作为其它变量名了。3、变量 A_9 B=9, i=9 程序执行期间，变量用来存储数据，变量是数据的一个存储区。程序需要的原始数据、计算产生的中间结果或最终的计算结果，都可以存储在适当的变量中。 如：A_B，i, Ai，A9，X，count，Name 在同一个程序中，不同的变量要用不同的名称。变量名由字母、数字和下划线等字符组成，但必须以字母开头，在变量名中对大小写字母是不加区分的。一般情况下，需要指定变量的类型，因此，在使用变量前要对变量的数据类型进行说明。在程序中，变量名可以用来引用该变量中所存储的值，而数据类型用来规定变量能存储哪一种类型的数据。 变量说明用Di

6、m语句，其常用形式为： Dim 变量名 As 变量的类型 数据类型见表411 例3变量说明。 Dim count As Integer count是整数类型的变量 Dim x,y As Double x和y都是双精度实数类型的变量 Dim Name As String Name是字符串类型的变量 提问：当i=9时，变量Ai 和A9是不是同一个变量？用立即方法验证：Ai=10；i=9； A9=?；如果用50个变量保存50个同学的成绩后，当你输入学号i=9时，不能希望Ai变成A9,这是两个不同的变量！而下面介绍的数组变量A(i)，i=9时，A(i)就是A(9)了，这里的i=1,2,3,50。4、数

7、组变量 A(1), A(2), A(3), A(50) 数组变量主要用来存储一批同类型的数据。在实际问题应用中，经常需要成批地处理同一类型的数据。例如，学校要处理全校学生的成绩、展览会组织者需要对成百上千个公司分类、排序等。 数组是由一批同类型的变量构成的一个序列，组成数组的每一个变量被称为数组的元素，或称为下标变量，下标是一个整数，用来指出某个元素在数组中的位置，数组中每个元素的位置由它的下标唯一地确定。 在实际应用中，一维数组用来存储数据的一个线性序列，二维数组可以用来存储一个二维数表(即表格)。 说明一维数组变量常用形式如下： Dim 数组变量名(A1 To A2) As 元素的类型这里

8、，A1是下标的下界，A2是下标的上界，A1和A2都是常量。例如：Dim A(1 To 50) As Single一维数组变量说明：A是由50个整数变量构成的一个一维数组变量，即，它有50个数组元素(数组变量):I A(1)、A(2)、A(49)、A(50)。 A(i)中的i是下标（i=1-50）每一个元素都是一个整数类型的变量。例4 为了进一步理解数组变量的作用，我举个实例给大家：比如：老师要统计班级一次计算机考试成绩，统计以10分为间隔的分数段人数A0-A10：在一个程序中，如输入一个成绩x,则对每个x，对应选择下面一个语句：0-9： A0=A0+1 其中A0、A1、A2、A10是11个非数

9、组变量名；10-19: A1=A1+1 A1=A1+1是计数器，表示该档成绩个数加1，下面雷同；20-29：A2=A2+190-99: A9=A9+1100: A10=A10+1 上面用了 A0、A1、A2、A10是11个非数组变量名，来分别统计以10分为间隔的分数段人数，显得含这些变量名程序太长（如果在程序中要写这样的成千上万个这样变量名就惨啦！），因此我们用一维数组变量就轻松了： Dim A(0 to 10000) As Integer x=InputBox(“请输入一个成绩x”) 86.7 -àA(8)=A(8)+1i=Fix(x/10)=8 把x值转换成对应的某个数组变量的下

10、标i，例如：Fix(86.7/10)=Fix(8.67)=8 A(i)=A(i)+1 i=8时，A(i)=A(i)+1就变成 A(8)=A(8)+1了；n=InputBox(“请输入学号n”) 查询分数段人数，例如：n=8时，查询80-89段的人数； Print A(n) 这时n=8，即打印输出A(8)的值；演示： 上面的程序让大家应该明白用数组变量的好处了吧？！ 除了一维数组变量外，我们有时还需要二维数组变量，比如：学号可以一维确定每个同学，但电影院的座位号必须要用二维才能确定，二维数组变量常用形式如下：Dim 数组变量名(A1 T0 A2，B1 To B2) As 元素的类型这里，A1和A

11、2分别是第一个下标的下界和上界，第一个下标指出数组元素所在行的行号；B1和B2分别是第二个下标的下界和上界，第二个下标指出数组元素所在列的列号；A1、A2、B1和B2都是常量。 例5二维数组变量说明。 语句 Dim price(1 t0 20，1 to 8) As Double说明：price是一个二维数组变量，可以用来存储20行数据，每行中包含8个双精度实数数据。price(1,1) price(1,2) . price(1,8)price(2,1) price(2,2) . price(2,8). . price(i，j).price(20,1) price(20,2) . price(2

12、0,8)price(1，1)是该二维数组中，是第1行第1列上的数组元素，price(20，8)是该二维数组中最后一行最后一列上的数组元素。 一般地，price(i，j)是数组price第i行第j列上的元素。 (见上图所示：)二、常用的标准函数的复习P71 VB提供了大量的标准函数，可供用户编写程序时直接使用。下面是一些常用的标准数学函数： P71表412常用数学函数演示：用立即方式验证 3个常用的标准数学函数Abs(x)、Int(x)、Sqr(x) ，如Int()=-3 -5-4-3-2-1-0-1-2-3-4-à请注意Int(x)和Fix(x)的区别： Int(2.1)=2 Int

13、(2.7)=2 Int()= -3 Int()= -3Fix(2.1)=2 Fix(2.7)=2 Fix()= -2 Fix(-)= -2当x是整数时：Fix(2)=2 Int(2)=2 Fix(-2)= -2 Int(-2)= -2 总结：当x>=0或整数时，Int(x)=Fix(x)，当x<0且不是整数时，Int(x)=Fix(x)-1除了上面的常用的标准数学函数外，Str(x)函数（数值转换成字符串）、Val(x) 函数（数字字符串转换成数值），这些是常用类型转换函数，还有字符串函数，具体见下面的表：P71表413常用类型转换函数和字符串函数演示：用立即方式验证上常用类型转换

14、函数和字符串函数.，例如：字符的ASCII码函数：ASC(字符)=ASCII码 Chr(ASCII码)= 字符例： ASC(“A”)=65 Chr(65)= “A” ASC(“a”)=97 Chr(97)= “a” ASC(“*”)=42 Chr(42)= “a” ASC(“空格”)=32 Chr(32)= “空格” Len(“n83f=_&%GOOD! +f4fY”)=20个字符 计算字符串的字符个数 Mid(“n83f=_&%GOOD! +f4fY”,10,5)=“GOOD!” 提取第10个字符开始的5个字符 三、练习：1、下面是运行统计以10分为间隔的分数段人数的程序清单： Dim A(0 to 10) As IntegerFor n =1 to 12 假定有15个同学成绩，也可用文本输入框输入15; x=InputBox(“请输入一个成绩x”) i=Fix(x/10) 把x值转换成对应的某个数组变量的下标i; A(i)=A(i)+1 例如：Fix(86.7/10)=Fix(8.67)=8， A(8)=A(8)+1了； Next n List1.AddItem “分数段人数统