VB程序的设计础

1、 “ ”# # type student xh as sting xm as string xb as string nl as integer score as single end type 例如例如: 对于一个学生的对于一个学生的“学号学号”、“姓名姓名”、“性别性别”、“年龄年龄”、“入学成绩入学成绩”等数据，为等数据，为了处理数据的方便，常常需要把这些数据定义成了处理数据的方便，常常需要把这些数据定义成一个新的数据类型（如一个新的数据类型（如student类型）。类型）。 在程序运行过程中，其值在程序运行过程中，其值不能被改变不能被改变的的量称为常量。在量称为常量。在vb中有三类常量

2、：中有三类常量： 普通常量普通常量 符号常量符号常量 系统常量系统常量 l 整型常量整型常量 （1）整型（）整型（integer）：表示）：表示-32768至至32767之间之间的整数。的整数。 例如：例如：10，110，20% （2）长整型（）长整型（long）：）： 表示表示-2,147,483,648至至2,147,483,647之间的整数之间的整数 例如：例如：230000& 通常我们说的整型常量指的是十进制整数，通常我们说的整型常量指的是十进制整数，但但vb中可以使用八进制和十六进制形式的整型中可以使用八进制和十六进制形式的整型常数，因此整型常数有如下三种形式：常数，因此整型

3、常数有如下三种形式： 1）十进制整数。如）十进制整数。如125，0，-89，202）八进制整数。以）八进制整数。以&或或&o（字母（字母o）开头的整数是）开头的整数是八进制整数，如八进制整数，如&o25表示八进制整数表示八进制整数25，即，即(25)8 ，等于，等于十进制数十进制数21。 3）十六进制。以）十六进制。以&h开头的整数是十六进制整数，开头的整数是十六进制整数，如如&h25表示十六进制整数表示十六进制整数25，即，即(25)16 ，等于十进制数，等于十进制数37。vb中的颜色数据常常用十六进制整数表示。中的颜色数据常常用十六进制整数表示。 l

4、 实型常量实型常量1）单精度实型（单精度实型（single）：有效数为有效数为7位位 表示表示-3.37e+38至至3.37e+38之间的实数之间的实数 2）双精度实型（双精度实型（double）：有效数为有效数为15位位实型常量的表示：实型常量的表示：1）十进制小数形式。它是由正负号（）十进制小数形式。它是由正负号（+，-）、数字）、数字（09）和小数点（）和小数点（.）或类型符号（！、）或类型符号（！、#）组成，即）组成，即n.n，n！或！或n#，其中，其中n是是09的数字。的数字。例如：例如：0.123、.123、123.0、123！、！、123#等都是十进制等都是十进制小数形式。小数形

5、式。2）指数形式。）指数形式。nem 或或 n.nem, ndm 或或 n.ndm 例：例：1.25e+3 和和 1.25d+3相当于相当于1250.0 或者或者1.25103l 字符串常量字符串常量在在vb中字符串常量是用双引号中字符串常量是用双引号“”括起的一串括起的一串字符，例如字符，例如abc，abcdefg，123，0，vb程序设计程序设计等。等。（1）字符串中的字符可以是所有西文字符和汉）字符串中的字符可以是所有西文字符和汉字、标点符号等；字、标点符号等；（2）表示空字符串，而表示空字符串，而 表示有一个空格表示有一个空格的字符串；的字符串；（3）若字符串中有双引号，例如）若字符串

6、中有双引号，例如abdxyz，则用连续两个双引号表示，即：则用连续两个双引号表示，即： abdxyz“l 逻辑（逻辑（boolean）数据类型）数据类型只有两个值只有两个值true，或，或false。将逻辑数据转换成整型时：将逻辑数据转换成整型时：true为为-1，false为为0；其它数据转换成逻辑数据时：其它数据转换成逻辑数据时：非非0为为true, 0为为false。l日期常量日期常量 日期（日期（date）型数据按）型数据按8字节的浮点数来存字节的浮点数来存储，表示日期范围从公元储，表示日期范围从公元100年年1月月1日日9999年年12月月31日，而时间范围从日，而时间范围从0:00

7、:0023:59:59。 一种在字面上可被认作日期和时间的字符，只一种在字面上可被认作日期和时间的字符，只要用号码符要用号码符“ “#”括起来，都可以作为日期型数值括起来，都可以作为日期型数值常量。常量。 例：例：#09/02/99#、#january 4,1989#，#2002-5-4 14:30:00 pm# 都是合法的日期型常量。都是合法的日期型常量。 在程序中，某个常量多次被使用，则可以使用在程序中，某个常量多次被使用，则可以使用一个符号来代替该常量，这样不仅在书写上方便，一个符号来代替该常量，这样不仅在书写上方便，而且有效地改进了程序的可读性和可维护性。而且有效地改进了程序的可读性和

8、可维护性。 vb中使用关键字中使用关键字const 声明符号常量。声明符号常量。其格式如下：其格式如下：例如：例如： const pi#=3.1415926535 等价于：等价于： const pi as double=3.1415926535 例如：要将文本框例如：要将文本框text1的前景颜色设置为红色，可以使用的前景颜色设置为红色，可以使用下面的语句：下面的语句： text1.forecolor= 这里的这里的就是系统常量。这比直接使用就是系统常量。这比直接使用16进制数来进制数来设置要直观得多。设置要直观得多。 vb系统提供了应用程序和控件的系统定义常数。系统提供了应用程序和控件的系统

9、定义常数。它们存放于系统的对象库中，在它们存放于系统的对象库中，在“对象浏览器对象浏览器”中中的的 visual basic（vb） 和和 visual basic for applications（vba）对象库中列举了）对象库中列举了 visual basic 的常数。的常数。 称变量的称变量的。采用隐式声明的变量都是。采用隐式声明的变量都是 variant 类型（变类型（变体型）。体型）。 vb中允许不事先声明而直接使用变量，可以通过中允许不事先声明而直接使用变量，可以通过语句语句 ，来要求所使用的变量必须，来要求所使用的变量必须事先声明，否则事先声明，否则vb会发出警告信息。会发出警告

10、信息。 下面是一个很简单的程序，其使用的变量下面是一个很简单的程序，其使用的变量a, b, suma, b, sum都都没有事先定义。没有事先定义。private sub form_click()sum = 0a = 10: b = 20sum = a + bprint sum=; sumend sub强制显式声明强制显式声明option explicit语句语句 良好的编程习惯都应该是良好的编程习惯都应该是“先声明变量，后使用变量先声明变量，后使用变量”，这样做可以提高程序的效率，同时也使程序易于调试。这样做可以提高程序的效率，同时也使程序易于调试。visual basic 中可以强制显式声

11、明，可以在窗体模块、标准中可以强制显式声明，可以在窗体模块、标准模块和类模块的通用声明段中加入语句：模块和类模块的通用声明段中加入语句：option explicit。 vb提供了上百种内部函数（库函数），要求掌握这提供了上百种内部函数（库函数），要求掌握这些常用函数的功能及使用。些常用函数的功能及使用。 说明：说明： 使用库函数要注意参数的个数及其参数的数据类型使用库函数要注意参数的个数及其参数的数据类型 要注意函数的定义域（参数的取值范围）要注意函数的定义域（参数的取值范围） 例如：例如： sqr(x) 要求：要求： x=0 lfix(n)为截断取整，即去掉小数后的数。为截断取整，即去掉小

12、数后的数。lint(n)不大于不大于n的最大整数。的最大整数。 例如：例如： fix(9.59) = 9, int(9.59) =9 fix(-9.59) = -9, int(-9.59) =-10 chr(66) chr(66) asc(b) asc(b) asc(chr(99) asc(chr(99) chr(asc(k) chr(asc(k) ucase$(abcdefg) ucase$(abcdefg) lcase$ ( lcase$ (字符串字符串) ) l 值为：值为： 65 （只取首字母的（只取首字母的ascii值）值） l 值为：值为：0, val(1.2sa10) 值为值为1

13、.2 val( )函数只将最前面的数字字符转换为数值。函数只将最前面的数字字符转换为数值。 (1)字符串编码字符串编码 windows系统对字符采用了dbcs编码，中文2字节，西文1字节。vb中字符采用unicode编码，任何字符2字节。 如：len(“中国good ”)为6；lenb(“中国good ”)为12 (2)字符串函数字符串函数 ltrim$、rtrim、trim (删除空白字符函数) left$、right$、mid$ (字符串截取函数) mid$(“abcdef”,2,3) 结果为 “bcd” instr(2,“abcdefgh”,“ef”) 结果为 5 string(3,“b

14、cdef”) 结果为“bbb” replace(“abcdabcd”,“cd”,“123”) 结果为“ab123ab123” 运算符运算符含义含义 举举 例例 + +加加5 + 3.25 + 3.2的结果为的结果为8.28.2- -减减15-5.015-5.0的结果为的结果为10.010.0* *乘乘2.5 2.5 * * 3 3的结果为的结果为7.57.5/除除1 / 21 / 2的结果为的结果为0.50.5整除整除1 21 2的结果为的结果为0 0modmod求余求余6 mod 46 mod 4的结果为的结果为2 2- -负号负号-12.3-12.3 乘方乘方2323的结果为的结果为8 8

15、: : vbvb中的中的“+”+”、“-”-”、“* *”、“/”/”作用与数学作用与数学中的中的“+”+”、“-”-”、“”、“”相对应；相对应； “ “ ”与与“/ /”的区别是：的区别是：“”用于整数除法，用于整数除法，结果返回商的整数部分。在进行整除时，如果参加结果返回商的整数部分。在进行整除时，如果参加运算的数据含有小数部分，则先按四舍五入的原则运算的数据含有小数部分，则先按四舍五入的原则将它们转换成整数后，再进行整除运算；将它们转换成整数后，再进行整除运算； 运算符左右两边的操作数应是数值型数据，如果运算符左右两边的操作数应是数值型数据，如果是数字字符或逻辑型数据，需要将它们先转换

16、成数是数字字符或逻辑型数据，需要将它们先转换成数值型数据后，再进行算术运算。值型数据后，再进行算术运算。 -（负号）（负号） *、/ mod +、- 123 + 456 结果 123456 123 & 456 结果 123456 abcdef & 12345 结果为 abcdef12345 abcdef + 12345 出错 123 & 456 结果为 123456 “123” + 456 结果为 579 abcde abra 结果为 false 男男 女女 按汉字的拼音字母比较按汉字的拼音字母比较 。 变量、常量、函数、运算符和圆括号变量、常量、函数、运算符和圆括号

17、【例【例1 1】将将 数学式改写成数学式改写成vbvb的算术表达式的算术表达式ba 2【解】【解】vbvb的算术表达式为的算术表达式为: :3.14159/(a2 +sqr(b)vbvb表达式：表达式： sin(45sin(45* *3.14/180)+(exp(10)+log(10)/sqr(x+y+1)3.14/180)+(exp(10)+log(10)/sqr(x+y+1)110lne45sin10yxefgabcd例：用人单位招聘秘书：年龄小于40岁的女性，学历专科或本科， 年龄40，性别=“女”，(学历=“专科”，学历=“本科”) and and or73 x比a小，比b大 用 ora小数b大数a小数b大数比a大，比b小 用 and例：表示算术表达式： 若分别写成：年龄40 and 性别= 女 and (学历= 专科 and 学历= 本科)年龄40 or 性别= 女 or (学历= 专科 or 学历= 本科)22yx 1. 以下语句的输出结果为：以下语句的