第3章VB程序设计的基础(二)

1、沈 阳 工 程 学 院信息管理系 转换函数转换函数 lInt(x) 求不大于自变量x的最大整数 lFix(x) 去掉一个浮点数的小数部分，保留其整数部分 lHex$(x) 把一个十进制数转换为十六进制数 lOct$(x) 把一个十进制数转换为八进制数 lAsc(x$) 返回字符串x$中第一个字符的ASCII码 lChr$(x) 把x的值转换为相应的ASCII码字符 lStr$(x) 把x的值转换为一个字符串 lCint(x) 把x的小数部分四舍五入，转化为整数 lCcur(x) 把x的值转换为货币类型值，小数部分保留4位且四舍 五入 lCDbl(x) 把x的值转换为双精度数 lCLng(x)

2、把x的小数部分四舍五入转换为长整数型数 lCvSng(x) 把x的值转换为单精度数 lCVar(x) 把x的值转换为变体类型值 沈 阳 工 程 学 院信息管理系 数学函数数学函数 lSin(x) 返回自变量x的正弦值 lCos(x) 返回自变量x的余弦值 lTan(x) 返回自变量x的正切值 lAtn(x) 返回自变量x的反正切值 lAbs(x) 返回自变量x的绝对值 lSgn(x) 返回自变量x的符号 lSqr(x) 返回自变量x 的平方根，x必须是大于或等于0 lExp(x) 返回以e为底、以x为指数的值，求e的x次方 沈 阳 工 程 学 院信息管理系 随机数函数随机数函数 lRnd(x)

3、 产生一个01之间的单精度随机数 沈 阳 工 程 学 院信息管理系 日期函数日期函数 lDay(Now) 返回当前的日期 lWeekDay(Now) 返回当前的星期 lMonth(Now) 返回当前的月份 lYear(Now) 返回当前的年份 沈 阳 工 程 学 院信息管理系 时间时间 l Hour(Now) 返回小时(023) l Minute(Now) 返回分钟(059) l Second(Now) 返回秒(059) l说明： (1) 三角函数的自变量x是一个数值表达式。其中Sin、Cos和 Tan的自变量是以弧度为单位的角度，而Atn函数的自变量是 正切值为x的角度，以弧度为单位。在一般

4、情况下，自变量以 角度给出，可以用下面的公式转换为弧度。 l 1度1803.14159/180(弧度) 沈 阳 工 程 学 院信息管理系 说明：说明： l(2)日期和时间函数的自变量Now是一个内部变量，不需要用户定义。 用它作自变量，可以用日期和时间函数返回当前系统的日期和时间。 l(3)符号函数Sgn(x)的值： 当x0时，函数的返回值为1 l(4)用Rnd()函数可以产生00.999999999之间的随机小数函数，当 一个应用程序不断地重复使用随机函数时，同一序列的随机数会反 复出现，用Randomize语句，重复执行程序，每次产生的随机数可 以不同。Randomize语句的格式如下：

5、Randomize(x) 这里的x是一整型数，它是随机数发生器的“种子数”，可以省略。 沈 阳 工 程 学 院信息管理系 说明：说明： l(5)验证这些函数的最简单的方法是，在立即窗口中输 入命令行，可以立即显示出结果。 必须先打开立即窗口。 例如：在立即窗口中输入下列命令行，可以用Print语句，也 可以用“?”代替Print语句。 l ? Sin(3.14159/2) l ? Cos(3.14159) l ? Sgn(15) l ? Sgn(-9) l ? Sgn(0) l ? Rnd(0) l ? Day(Now) 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符

6、串函数 lVB提供了大量的字符串函数，字符串函数大都 以说明符“$”结尾，表明函数的返回值为字 符串。在VB6.0中，说明符“$”可以省略,其 功能相同。本书还是加上说明符“$”。 l1.测字符串长(Len) 格式：Len(字符串变量或常量) 功能：用于求出字符串变量中所包含的字符个数。 沈 阳 工 程 学 院信息管理系 说明：说明： l(1)函数 Len 的自变量得到的是自变量中的字符个数。 l(2)Len函数也可以用于测数值型变量、数组元素或用户自定义类型 的字节数。 l例如:为给定的A$，B$和C$三个字符串变量赋值，并分别测出它们的 字符串长度。 A$=ABC B$=LKJHG C$=

7、TSPR Print LEN(A$)，LEN(B$)，LEN(C$+CD) End 运行结果： 3 5 6 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l2.删除空格字符函数(LTrim$、RTrim$和Trim$) 格式： (1)LTrim$(字符串) (2)RTrim$(字符串) (3)Trim$(字符串) 功能： lLTrim$(字符串)：去掉“字符串”左边的空格字符； lRTrim$(字符串)：去掉“字符串”右边的空格字符； lTrim$(字符串)：去掉“字符串”两边的空格字符。 沈 阳 工 程 学 院信息管理系 例如：例如： l Print LEN

8、(Trim$( BASIC ),LEN( BASIC ) l运行结果为: 5 7 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l3.左字符串函数(Left$函数)格式：Left$ (字 符串， n) l功能：从字符的左边取 n 个字符，组成一个 子字符串。 l说明： (1)当 n 值取值大于字符串的最大字符个数时，则 取整个字符串。若n=0，取空字符串。 (2)字符串可以是字符串常量、字符串变量、字符 串函数或字符串连接表达式。 沈 阳 工 程 学 院信息管理系 例如：例如： l A$=ABCDEFGHIJ l B$=Left$(A$，4) l C$=Lef

9、t$(A$，10) l Print B$，C$ l End l运行结果: ABCD ABCDEFGHIJ 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l4.右字符串函数(Right$函数)格式： Right$(字符串， n) l功能：从字符串的右边取 n个字符，组成一个 子字符串。 l说明：同 Left$ 函数。 沈 阳 工 程 学 院信息管理系 例如：例如： l A$=ABCDEFG l B$= Right$(A$，4) l Print B$ l Print Right$ (A$，6) l End l运行结果: DEFG BCDEFG 沈 阳 工 程 学

10、院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l5.中间字符串函数(Mid$函数)格式：Mid$(字符串，m， n) l功能：从字符串中第 m 个字符开始，向右截取长度为 n 的字符串。 l说明： (1)m、n 可以是个表达式，取值范围为 ： 032 767。 (2)当 m 值大于字符串的长度时，取一个空字符串。 (3)当 n 省略或 n取大于字符串长度时，则得到从 m 开始的 所有字符。 沈 阳 工 程 学 院信息管理系 例如：例如： l A$=THIS IS A MAIN PROGRAM l B$=Mid$(A$，16，7) l C$=Mid$(A$，9) l Print B

11、$ l Print C$ l运行结果: PROGRAM A MAIN PROGRAM 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l6.字符串生成函数(String$函数)格式: String$(n,字符串) 或 String$(n,ASCII) l功能:产生n个指定字符串中的第一个字符组成 的字符串;或产生n个由ASCII序号对应的字符 组成的字符串。 l说明: n取值范围为 032 767。 沈 阳 工 程 学 院信息管理系 例如：例如： l Print String$(5,R) l Print String$(5,Hello) l Print Stri

12、ng$(6,65) l运行结果为: RRRRR HHHHH AAAAAA 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l7.空格函数(Space$函数)格式: Space$ (n) l功能:产生n个空格字符组成的字符串。 l说明:此函数常用于输出语句中的格式控制。 l例如： Print Space$(10);PEN 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l8.字母大写转换函数(Ucase$函数)格式: Ucase$ (字符串) l功能:把一个字符串中的所有小写字母替换成 大写字母。 l说明:这样的替换不影响原来的大写

13、字母或其 他非字母的字符。 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l9.字母小写转换函数(Lcase$函数)格式: Lcase$(字符串) l功能:把一个字符串中的所有大写字母替换成小写字母。 l说明:这样的替换不影响原来的小写字母或其他非字母的 字符。 l例如: Print Ucase$(apple), Lcase$(Visual Basic) 运行结果: l APPLE visual basic 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l10.字符串匹配函数(InStr函数) l格式：InStr(首字符位置，

14、字符串1 字符串2 ,n) l功能：在“字符串1”中查找“字符串2”，如果找到了， 则返回“字符串2”的第一个字符在“字符串1”中位置。 “字符串1”的第一个位置为1。 l例如： A$=Visual Basic B=InStr(A$, Basic) Print B 运行结果： l 8 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l11.Mid$语句 l格式：Mid$ (字符串变量， n,m)=字符串 l功能：在字符串变量中,从第n个字符开始的m个字符被 赋值号右边的字符串所置换。 l说明： (1)m、n 的取值范围为132 767。 (2)当 m 值大于字符

15、串的长度或缺省时，则用整个字符串来 置换。 (3)语句执行后,字符串变量的长度保持不变,如被置换的位置 不够时,则字符中多余的字符被截去。 (4)函数中字符串变量部分不能是字符串常量。 沈 阳 工 程 学 院信息管理系 例如：例如： l A$=同学们好! l B$=祖国万岁! l Mid$(A$,1,6)=老师您 l Mid$(B$,5,4)=母亲 l Print A$ l Print B$ l End l运行结果为: 老师您好! 祖国母亲! 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l12.将单字符转换为ASCII码函数(Asc函数)格 式：Asc(字符

16、串) l功能：将字符串中的第一个字符转换为它所对 应的十进制数表示的ASCII码值。 l例如： Print Asc(B),Asc(BASIC) 运行结果: l 66 66 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l13.将ASCII码值转换为字符函数(Chr$函数)格式： Chr$(算术表达式) l功能：求出算术表达式的值，并将其值转换成ASCII码 对应的字符。它是Asc函数的反函数。说明： (1)算术表达式运算结果 ，作为十进制数值使用，它对应一 个字符的ASCII码。 (2) Chr$函数不能作为语句命令使用，它必须在 LET、Print 等语句中

17、使用。 (3)算术表达式的值可取 0255之间的数，否则出错。 沈 阳 工 程 学 院信息管理系 例如例如: : l产生给定数值的 ASCII 码字符。 l Print Chr$(65), Chr$(49) l运行结果: A 1 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l14.将数字字符串转换为数值函数(Val函数)格式：Val(字符串) l功能：将字符串中的数字直接转换成数值。此函数是Str$函数的反 函数。 l说明:如果字符的第一个字符不是数值,则函数值为0。Val函数忽略 字符串中非数值字符串或空格,如果字符串中带有正号、负号或小 数点,则只取最左

18、边一个。例如:将数字型字符串转换成数值 。 A$=15 B$=20 C=Val(A$)+Val(B$)+65 Print C 运行结果: l 100 l经过转换后的15和20就可以进行数值运算了。计算机执行Val函数 的过程是：首先检查括号内的字符串，从这个字符串第一个字符开 始检查，如果第一个非空白字符不是数值符号，这个函数值就为零。 沈 阳 工 程 学 院信息管理系 例如：例如： Print Val(ABC)， Val(800), VAL(X3) 0 800 0 沈 阳 工 程 学 院信息管理系 3.4.2 3.4.2 字符串函数字符串函数 l15.将数字转换为字符串函数(Str$函数)格

19、式： Str$(算术表达式) l功能：把算术表达式的值直接换成字符串。 l说明：如果为正数,则转换后的字符串前留有一个前导 空格;如果为负数,则此位置被负号占用。如果不是数 值，则返回出错信息。 l例如:输出字符串。 Print Str$(10000), Str$(-500)， Str$(100+200) 运行结果: l 10000 -500 300 沈 阳 工 程 学 院信息管理系 字符串函数表字符串函数表 函数 格式 函数功能 LTrim$ LTrim$(字符串) 去掉字符串左边的空白字符 Rtrim$ Rtrim$(字符串) 去掉字符串右边的空白字符 Left$ Left$(字符串,n)

20、 取字符串左边的n个字符 Right$ Right$(字符串,n) 取字符串右边的n个字符 Mid$ Mid$(字符串,m,n) 从位置m开始取字符串的n个字符 Len Len(字符串) 测试字符串的长度 String$ String$(n,字符串) 返回由n个字符组成的字符串 Space$(n) Space$(n) 返回n个空格 Ucase$ Ucase$(字符串) 把小写字母转换为大写字母 沈 阳 工 程 学 院信息管理系 字符串函数表字符串函数表 函数函数 格式格式 函数功能函数功能 Lcase$ Lcase$(字符串) 把大写字母转换为小写字母 InStr InStr(字符串1，字符串

21、2) 在字符串1中查找字符串2 Asc Asc(字符串) 将字符串中的第一个字符转换为ASCII码 值 Chr$ Chr$(算术表达式) 将数值转换成ASCII码对应的字符 Val Val(字符串) 将字符串中的数字转换成数值 Str$ Str$ (算术表达式) 把算术表达式的值转换成字符串 沈 阳 工 程 学 院信息管理系 3.5 3.5 运算符和表达式运算符和表达式 lVB中运算符和表达式有以下几种： (1)算术运算符与算术表达式 (2)关系符与关系表达式 (3)逻辑运算符与逻辑表达式 沈 阳 工 程 学 院信息管理系 3.5.1 3.5.1 算术运算符与算术表达式算术运算符与算术表达式 l1.算术运算符 +(加)、 -(减)、 *(乘) 、(除)、 (整除)、 Mod(求余)、 (幂)及 ( )(括号) l2.算术表达式 VB中，用规定的算术运算符和括号等将常数、变量、函数连接起来的有 意义的式子，称为算术表达式。 l例如： (2*X+3*X2)+(5*X3) l说明： (1)表达式中的括号只能用圆括号。 (2)在作整除时，当除数或被除数带有小数，首先