Visual Basic 语 言 程 序 设 计转换函数
Int(x) 求不大于自变量 x的最大整数
Fix(x) 去掉一个浮点数的小数部分,保留其整数部分
Hex$(x) 把一个十进制数转换为十六进制数
Oct$(x) 把一个十进制数转换为八进制数
Asc(x$) 返回字符串 x$中第一个字符的 ASCII码
Chr$(x) 把 x的值转换为相应的 ASCII码字符
Str$(x) 把 x的值转换为一个字符串
Cint(x) 把 x的小数部分四舍五入,转化为整数
Ccur(x) 把 x的值转换为货币类型值,小数部分保留 4位且四舍五入
CDbl(x) 把 x的值转换为双精度数
CLng(x) 把 x的小数部分四舍五入转换为长整数型数
CvSng(x) 把 x的值转换为单精度数
CVar(x) 把 x的值转换为变体类型值
Visual Basic 语 言 程 序 设 计数学函数
Sin(x) 返回自变量 x的正弦值
Cos(x) 返回自变量 x的余弦值
Tan(x) 返回自变量 x的正切值
Atn(x) 返回自变量 x的反正切值
Abs(x) 返回自变量 x的绝对值
Sgn(x) 返回自变量 x的符号
Sqr(x) 返回自变量 x 的平方根,x必须是大于或等于 0
Exp(x) 返回以 e为底、以 x为指数的值,求 e的 x次方
Visual Basic 语 言 程 序 设 计随机数函数
Rnd(x) 产生一个 0~1之间的单精度随机数
Visual Basic 语 言 程 序 设 计日期函数
Day(Now) 返回当前的日期 〖 BHDW〗
WeekDay(Now) 返回当前的星期
Month(Now) 返回当前的月份
Year(Now) 返回当前的年份 〖 BHD〗
Visual Basic 语 言 程 序 设 计时间
Hour(Now) 返回小时 (0~23)
Minute(Now) 返回分钟 (0~59)
Second(Now) 返回秒 (0~59)
说明:
– (1) 三角函数的自变量 x是一个数值表达式。其中 Sin,Cos和
Tan的自变量是以弧度为单位的角度,而 Atn函数的自变量是正切值为 x的角度,以弧度为单位。在一般情况下,自变量以角度给出,可以用下面的公式转换为弧度。
1度= π / 180= 3.14159/180(弧度 )
Visual Basic 语 言 程 序 设 计说明:
(2)日期和时间函数的自变量 Now是一个内部变量,不需要用户定义。用它作自变量,可以用日期和时间函数返回当前系统的日期和时间。
(3)符号函数 Sgn(x)的值:
– 当 x<0时,函数的返回值为- 1
– 当 x=0时,函数的返回值为 0
– 当 x>0时,函数的返回值为 1
(4)用 Rnd()函数可以产生 0~0.999999999之间的随机小数函数,
当一个应用程序不断地重复使用随机函数时,同一序列的随机数会反复出现,用 Randomize语句,重复执行程序,每次产生的随机数可以不同。 Randomize语句的格式如下:
– Randomize(x)
– 这里的 x是一整型数,它是随机数发生器的,种子数,,可以省略。
Visual Basic 语 言 程 序 设 计说明:
(5)验证这些函数的最简单的方法是,在立即窗口中输入命令行,可以立即显示出结果。
– 必须先打开立即窗口。
– 例如:在立即窗口中输入下列命令行,可以用 Print语句,也可以用,?”代替 Print语句。
Sin(3.14159/2)
Cos(3.14159)
Sgn(15)
Sgn(-9)
Sgn(0)
Rnd(0)
Day(Now)
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
VB提供了大量的字符串函数,字符串函数大都以说明符,$”结尾,表明函数的返回值为字符串。在 VB6.0中,说明符,$”可以省略,其功能相同。本书还是加上说明符,$”。
1.测字符串长 (Len)
– 格式,Len(字符串变量或常量 )
– 功能:用于求出字符串变量中所包含的字符个数。
Visual Basic 语 言 程 序 设 计说明:
(1)函数 Len 的自变量得到的是自变量中的字符个数。
(2)Len函数也可以用于测数值型变量、数组元素或用户自定义类型的字节数。
例如,为给定的 A$,B$和 C$三个字符串变量赋值,并分别测出它们的字符串长度。
– A$="ABC"
– B$="LKJHG"
– C$="TSPR"
– Print LEN(A$),LEN(B$),LEN(C$+"CD")
– End
– 运行结果:
– 3 5 6
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
2.删除空格字符函数 (LTrim$,RTrim$和 Trim$)
格式,
– (1)LTrim$(字符串 )
– (2)RTrim$(字符串 )
– (3)Trim$(字符串 )
– 功能:
LTrim$(字符串 ):去掉,字符串,左边的空格字符;
RTrim$(字符串 ):去掉,字符串,右边的空格字符;
Trim$(字符串 ):去掉,字符串,两边的空格字符。
Visual Basic 语 言 程 序 设 计例如:
Print LEN(Trim$(" BASIC ")),LEN("
BASIC ")
运行结果为,
– 5 7
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
3.左字符串函数 (Left$函数 )格式,Left$ (字符串,n)
功能:从字符的左边取 n 个字符,组成一个子字符串。
说明:
– (1)当 n 值取值大于字符串的最大字符个数时,则取整个字符串。若 n=0,取空字符串。
– (2)字符串可以是字符串常量、字符串变量、字符串函数或字符串连接表达式。
Visual Basic 语 言 程 序 设 计例如:
A$="ABCDEFGHIJ"
B$=Left$(A$,4)
C$=Left$(A$,10)
Print B$,C$
End
运行结果,
– ABCD ABCDEFGHIJ
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
4.右字符串函数 (Right$函数 )格式:
Right$(字符串,n)
功能:从字符串的右边取 n个字符,组成一个子字符串。
说明:同 Left$ 函数。
Visual Basic 语 言 程 序 设 计例如:
A$="ABCDEFG"
B$= Right$(A$,4)
Print B$
Print Right$ (A$,6)
End
运行结果,
– DEFG
– BCDEFG
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
5.中间字符串函数 (Mid$函数 )格式,Mid$(字符串,m,
n)
功能:从字符串中第 m 个字符开始,向右截取长度为
n 的字符串。
说明:
– (1)m,n 可以是个表达式,取值范围为,0~ 32 767。
– (2)当 m 值大于字符串的长度时,取一个空字符串。
– (3)当 n 省略或 n取大于字符串长度时,则得到从 m 开始的所有字符。
Visual Basic 语 言 程 序 设 计例如:
A$="THIS IS A MAIN PROGRAM"
B$=Mid$(A$,16,7)
C$=Mid$(A$,9)
Print B$
Print C$
运行结果,
– PROGRAM
– A MAIN PROGRAM
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
6.字符串生成函数 (String$函数 )格式,
String$(n,字符串 ) 或 String$(n,ASCII)
功能,产生 n个指定字符串中的第一个字符组成的字符串 ;或产生 n个由 ASCII序号对应的字符组成的字符串。
说明,n取值范围为 0~ 32 767。
Visual Basic 语 言 程 序 设 计例如:
Print String$(5,"R")
Print String$(5,"Hello")
Print String$(6,65)
运行结果为,
– RRRRR
– HHHHH
– AAAAAA
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
7.空格函数 (Space$函数 )格式,Space$ (n)
功能,产生 n个空格字符组成的字符串。
说明,此函数常用于输出语句中的格式控制。
例如:
– Print Space$(10);"PEN"
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
8.字母大写转换函数 (Ucase$函数 )格式,
Ucase$ (字符串 )
功能,把一个字符串中的所有小写字母替换成大写字母。
说明,这样的替换不影响原来的大写字母或其他非字母的字符。
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
9.字母小写转换函数 (Lcase$函数 )格式,Lcase$(字符串 )
功能,把一个字符串中的所有大写字母替换成小写字母。
说明,这样的替换不影响原来的小写字母或其他非字母的字符。
例如,
– Print Ucase$("apple"),Lcase$("Visual Basic")
– 运行结果,
APPLE visual basic
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
10.字符串匹配函数 (InStr函数 )
格式,InStr([首字符位置,]字符串 1 字符串 2 [,n] )
功能:在,字符串 1”中查找,字符串 2”,如果找到了,则返回
,字符串 2”的第一个字符在,字符串 1”中位置。,字符串 1”的第一个位置为 1。
例如:
– A$="Visual Basic"
– B=InStr(A$," Basic")
– Print B
– 运行结果:
8
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
11.Mid$语句
格式,Mid$ (字符串变量,n[,m] )=字符串
功能:在字符串变量中,从第 n个字符开始的 m个字符被赋值号右边的字符串所置换。
说明:
– (1)m,n 的取值范围为 1~ 32 767。
– (2)当 m 值大于字符串的长度或缺省时,则用整个字符串来置换。
– (3)语句执行后,字符串变量的长度保持不变,如被置换的位置不够时,则字符中多余的字符被截去。
– (4)函数中字符串变量部分不能是字符串常量。
Visual Basic 语 言 程 序 设 计例如:
A$="同学们好 !"
B$="祖国万岁 !"
Mid$(A$,1,6)="老师您 "
Mid$(B$,5,4)="母亲 "
Print A$
Print B$
End
运行结果为,
– 老师您好 !
– 祖国母亲 !
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
12.将单字符转换为 ASCII码函数 (Asc函数 )格式,Asc(字符串 )
功能:将字符串中的第一个字符转换为它所对应的十进制数表示的 ASCII码值。
例如:
– Print Asc("B"),Asc("BASIC")
– 运行结果,
66 66
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
13.将 ASCII码值转换为字符函数 (Chr$函数 )格式:
Chr$(算术表达式 )
功能:求出算术表达式的值,并将其值转换成 ASCII码对应的字符。它是 Asc函数的反函数。说明:
– (1)算术表达式运算结果,作为十进制数值使用,它对应一个字符的 ASCII码。
– (2) Chr$函数不能作为语句命令使用,它必须在 LET,Print
等语句中使用。
– (3)算术表达式的值可取 0~ 255之间的数,否则出错。
Visual Basic 语 言 程 序 设 计例如,
产生给定数值的 ASCII 码字符。
Print Chr$(65),Chr$(49)
运行结果,
– A 1
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
14.将数字字符串转换为数值函数 (Val函数 )格式,Val(字符串 )
功能:将字符串中的数字直接转换成数值。此函数是 Str$函数的反函数。
说明,如果字符的第一个字符不是数值,则函数值为 0。 Val函数忽略字符串中非数值字符串或空格,如果字符串中带有正号、负号或小数点,则只取最左边一个。例如,将数字型字符串转换成数值 。
– A$="15"
– B$="20"
– C=Val(A$)+Val(B$)+65
– Print C
– 运行结果,
100
经过转换后的 15和 20就可以进行数值运算了。计算机执行 Val函数的过程是:首先检查括号内的字符串,从这个字符串第一个字符开始检查,
如果第一个非空白字符不是数值符号,这个函数值就为零。
Visual Basic 语 言 程 序 设 计例如:
– Print Val("ABC"),Val("800"),VAL("X3")
– 0 800 0
Visual Basic 语 言 程 序 设 计
3.4.2 字符串函数
15.将数字转换为字符串函数 (Str$函数 )格式:
Str$(算术表达式 )
功能:把算术表达式的值直接换成字符串。
说明:如果为正数,则转换后的字符串前留有一个前导空格 ;如果为负数,则此位置被负号占用。如果不是数值,则返回出错信息。
例如,输出字符串。
– Print Str$(10000),Str$(-500),Str$(100+200)
– 运行结果,
10000 -500 300
Visual Basic 语 言 程 序 设 计字符串函数表
– 函数 格式 函数功能
– LTrim$ LTrim$(字符串 ) 去掉字符串左边的空白字符
– Rtrim$ Rtrim$(字符串 ) 去掉字符串右边的空白字符
– Left$ Left$(字符串,n) 取字符串左边的 n个字符
– Right$ Right$(字符串,n)取字符串右边的 n个字符
– Mid$ Mid$(字符串,m,n) 从位置 m开始取字符串的 n个字符
– Len Len(字符串 ) 测试字符串的长度
– String$ String$(n,字符串 ) 返回由 n个字符组成的字符串
– Space$(n) Space$(n) 返回 n个空格
– Ucase$ Ucase$(字符串 ) 把小写字母转换为大写字母
Visual Basic 语 言 程 序 设 计字符串函数表
– 函数 格式 函数功能
– Lcase$ Lcase$(字符串 ) 把大写字母转换为小写字母
– InStr InStr(字符串 1,字符串 2) 在字符串 1中查找字符串 2
– Asc Asc(字符串 ) 将字符串中的第一个字符转换为
ASCII码值
– Chr$ Chr$(算术表达式 ) 将数值转换成 ASCII码对应的字符
– Val Val(字符串 ) 将字符串中的数字转换成数值
– Str$ Str$ (算术表达式 ) 把算术表达式的值转换成字符串
Visual Basic 语 言 程 序 设 计
3.5 运算符和表达式
VB中运算符和表达式有以下几种:
– (1)算术运算符与算术表达式
– (2)关系符与关系表达式
– (3)逻辑运算符与逻辑表达式
Visual Basic 语 言 程 序 设 计
3.5.1 算术运算符与算术表达式
1.算术运算符
– +(加 ),-(减 ),*(乘 ),/ (除 ),\ (整除 ),Mod(求余 ),^(幂 )及
( )(括号 )
2.算术表达式
– VB中,用规定的算术运算符和括号等将常数、变量、函数连接起来的有意义的式子,称为算术表达式。
例如:
– (2*X+3*X^2)+(5*X^3)
说明:
– (1)表达式中的括号只能用圆括号。
– (2)在作整除时,当除数或被除数带有小数,首先进行四舍五入,再作整除运算。
Visual Basic 语 言 程 序 设 计
2.算术表达式
例如:
– a=9\ 5 'a的值为 1
– b=31.77\ 5.88 'b的值为 5
(3)模运算的要求与整除一样,只是结果是整除的余数 (一个整数 )。
例如:
– a=9 Mod 5 'a的值为 4
– b=31.77 Mod 5.88 'b的值为 2
Visual Basic 语 言 程 序 设 计
3.5.2 关系运算符与关系表达式
1.关系运算符
– <(小于 ),>(大于 ),=(等于 ),<=(小于等于 ),>=(大于等于 )、
<>(不等于 )
2.关系表达式
– VB中,用规定的关系运算符和括号等将常数、变量、函数连接起来的有意义的式子,称为关系表达式。其结果为真,或为假。
例如:
– 4<=6 '结果为真
– "a">"b" '结果为假
Visual Basic 语 言 程 序 设 计
3.5.3 逻辑运算符逻辑表达式
1.逻辑运算符
– Not(逻辑非 ),And(逻辑与 ),Or(逻辑或 ),Xor(逻辑异或 ),Equ(逻辑等于 ),Imp(逻辑蕴含 )。
– Not(逻辑非 ):又称为求反。真求反得假,假求反得真。
– And(逻辑与 ):两个操作数都为真时,结果才为真。
– Or(逻辑或 ):只要有一个操作数为真,结果就为真。
– Xor(逻辑异或 ):两个操作数,一个为真,另一个为假,结果才为真。
– Equ(逻辑等于 ):只有两个操作数的值相等时,结果才为真。
– Imp(逻辑蕴含 ):第一个操作数为假,或第二个操作数为真时,结果为真。
Visual Basic 语 言 程 序 设 计
2.逻辑表达式
用逻辑运算符连接两个或多个关系表达式称为逻辑表达式。
例如:
– Not(3<=9) '结果为假
– 3>4 And 8<=9 '结果为假