计算机语言vb教程.ppt

1、,第四章 VB程序设计基础,Visual Basic 语言程序设计,4.1数据类型 4.1.1基本数据类型 字符串，数值型，字节，货币，对象，日期，布尔型和变体类型。 1、字符串（String） 用双引号括起来的字符序列，其中长度为0的字符串为空串。 例： 计算机 ，AFFFDS1231 ， 。 2、数值型数据 分为整型和浮点型。整型分为整数和长整数，浮点型分为单精度和双精度。 （1）整型数,第四章VB程序设计基础,整型数是不带小数点和指数符号的数。 整数：Integer，整数占2个字节，范围为3276832767。 长整数：Long，占4个字节 （2）浮点数 实数，由三部分组成：符号，指数及

2、尾数，单精度(single)和双精度(double)的指数形式分别用“E”,”e”和“D”,”e”表示。如： 123.45e3相当于123.45103 单精度型(Single)：占4个字节，符号位占1位，指数占8位，尾数23位，一个附加的隐含位，精度7位，如：2.123456e12。 双精度(Double)：占8个字节，精度1516位。 3、货币（Currency） 用来表示货币，占8个字节，小数点后4位，小数点固定。,4、变体（Variant） 可变，可以表示任何值。 5、其他数据类型 （1）字节（Byte） 占一个字节，值0255。 （2）布尔型（Boolean） 逻辑值，占2个字节，只取

3、两个值true或false。 （3）日期型（Date） 占8个字节，格式mm/dd/yy或mm-dd-yy，日期文字必须用括起来，如：october 1,2002#。 Print #10/20/1998 1:20:30 PM# （4）对象型（Object） 占4个字节，表示图形或其他对象。,（5）Decimal数据类型 占12个字节，无符号整型，只能给变体类型赋值，不能定义成此类型的变量。 4.1.2用户定义的数据类型 格式： Type数据类型名 数据类型元素As类型名 . End Type 数据类型名是要定义的数据类型的名字，定义后可用此类型定义变量。 此方法是定义含多个元素的一种类型。,例

4、： TypeDate_Rec rYearAsInteger rMonthAsString*3字符型，由3个字符组成。 rDayAsInteger EndType 说明： (1)记录类型中的元素可以是变长字符串，也可是定长字符串。 在随机文件中使用定长字符串，格式为：String*常数 (2)记录类型的定义必须放在模块（包括标准模块和窗体模块）的声明部分，当在标准模块中定义时，关键字前可以有Public(默认)（全局）或Private（局部），如果在窗体模块中定义，则必须在前面加关键字Private。,标准模块：扩展名为BAS的文件，从工程菜单的添加模块中添加。 （3）记录类型中不能含有动态数组

5、。 （4）在随机文件操作中，记录类型数据有着重要的作用。 记录变量的应用：编一个过程，输入和显示一个学生的学习情况。 1、定义一个记录变量 记录类型的定义必须放在模块的声名部分。 Private Type rec no As Integer mane As String * 8 chinese As Integer maths As Integer physics As Integer total As Integer End Type,Private Sub Form_Click() Dim student As rec student.no = InputBox(学号) student.n

6、ame = InputBox(姓名) student.chinese = InputBox(语文成绩) student.maths = InputBox(数学成绩) student.physics = InputBox(物理成绩) student.total = student.chinese + student.maths + student.physics Print 学号; student.no Print 姓名; Print 语文成绩; student.chinese Print 数学成绩; student.maths Print 物理成绩; student.

7、physics Print 总成绩; student.total End Sub,调用记录变量：,4.1.3枚举类型 处理有关常数，将变量值一一列举出来，变量值只限于列举出来的范围内。 格式： Public|PrivateEnum 类型名称 成员名=常数表达式 成员名=常数表达式 . End Enum,说明： （1）Public和Private可选，用Public定义的在整个工程中都可见，默认。用Private定义的只在模块中可见。 （2）Enum语句格式中的常数表达式可以省略，常数初始化为0，其后依次加1。 在文件菜单中选择“新建”一个新工程，然后执行“工程”菜单中的“添加模块”命令，在代码

8、窗口中添加如下代码。 例：Public Enum Days Sunday Monday Tuesday Wednesday Thursday Friday Saturday End Enum,定义了一个枚举类型days，有7个成员，Sunday的值为0，依次加1。 （3）可以用赋值语句改变值。如： public enum days Saturday Sunday=0 Monday Tuesday Wednesday Thursday Friday invalid=-1 End enum,(4)VB中的常数数值看成长整数如果将一个浮点数给一个枚举中的常数，VB会将该数值取整为最接近的长整数。如：

9、 public enum days Sunday Monday Tuesday=3.8 则为4 Wednesday End enum (5)可用一个枚举类型中的常数给另一个常数赋值 如public enum weeks Sunday Monday=days.Monday end enum,(6)声明枚举类型后，就可以声明变量，变量取值可用枚举类型中的元素值(也可赋其它值)，如： Private Enum DA RYEAR RMONTH 字符型，由3个字符组成。 RDAY End Enum 下面是声明变量 Dim mm As DA mm = RMONTH 4.2.1常量 分文字常量和符号常量。,

10、参看P57页例题，枚举类型举例,1、文字常量 （1）字符串常量 由字符组成，可以是除双引号和回车符之外的任何ASCII字符，如： AS34 ， 65.765 。 （2）数值常量 4种形式，即整型，长整型，货币型，浮点型。 整型：有3种形式，即十进制，八进制，十六进制。 A：十进制，范围：3276832767。 B：十六进制整型，以H或b$ 结果为AAA和dd 5、空格函数 格式：space(n)产生n个空格。 6、字符串匹配函数 格式：instr(n1,字符串1，字符串2,n2） 功能：查找字符串2在字符串1中的起始位置，找到返回起始位置，找不到返回0。N1表示从第几个位置开始查，省略从开始位

11、置，n2可以是0，1，2，为0以二进制比较，为1忽略字母大小写，为2在数据库中比较。默认0,有n2时不能省略n1。,a$ = asdfghsd Print InStr(3, a, sd) 返回值为7。 7、字母大小写转换 格式：ucase$(字符串)小写变大写 lcase$(字符串)大写变小写 8、插入字符串语句 格式：mid$(字符串，p,L)=子字符串 用右边的子字符串换字符串中的内容，p是起始位置，l是换几个，若l省略则有几个换几个。如： a$ = asdfghsd“：Mid(a, 3) = 11“：Print a 结果为as11ghsd。,a$ = asdfghsd Mid(a, 3,

12、 2) = 12345 Print a 结果为as12ghsd。 4.6运算符与表达式 4.6.1算术运算符 幂，乘，/浮点除，整除，MOD取模，&字符连接 1、幂运算 23表示2的3次方。 2、浮点数除法与整数除法 浮点数除法结果为浮点数，整数除法结果为整数。,32为1，3/2为1.5。 3、取模运算 用来求余，计算时先把两个数按四舍五入变成整数在运算。 如20.56mod5结果为1。正负由第1个数决定。 4、优先级 除比取模高。 5、字符串连接 A$=“123”:b$=“456” C$=a$+b$ Print c$结果为123456 也可用&进行连接。其中+也可用于加法，而&专门用于字符串连接。,4.6.2关系运算符与逻辑运算符 1、关系运算符 关系运算：比较，结果为真（true)或假(false)。 ，或不等于，like比较样式，is比较对象变量。 如：23结果为false。 Like和is在后面讲。 注意： 字符串按ascii码比较，若第1个一样，则比较第2个，依次后推。 2、逻辑运算符 （1）not 取反，如not 78结果为true 。 not false 结果为true。,（2）and与 如74 and 84 and 84 xor 86 两边都为真或都为假结果为假，两边结果不一样结