可视化程序设计 VBNET 第3章.ppt

* * * * * * * * * * * * * * 函数 含 义 实 例 结 果 Abs(N) 取N的绝对值 Abs(-3.5) 3.5 Cos(N) 返回N弧度的余弦值 Cos(0) 1 Exp(N) 返回以e为底的幂，即eN Exp(3) 20.086 Log(N) 返回自然对数 Log(10) 2.3 Max(N1,N2) 求两个数中大的一个数 Max(3,5) 5 Min(N1,N2) 求两个数中小的一个数 Min(3,5) 3 Sin(N) 返回N弧度的正弦值 Sin(0) 0 Sign(N) 返回N数值的符号 Sign(-3.5) -1 Sqrt(N) 求N的平方根 Sqrt(9) 3 Tan(N) 返回N弧度的正切 Tan(0) 0 1.数学函数 * 表达式书写 sin(45*3.14/180)+(exp(10)+log(10)) /sqrt(x+y+1) * 举例 Fix(3.5) Fix(-3.5) int(3.5) int(-3.5) Math.round(3.528) Math.round(-3.528) Math.round(-3.528,1) Math.round(-3.528,2) 5.其他实用函数 （1） Rnd随机函数 形式如下：Rnd（）或Rnd（N） 作用：产生[0，1）双精度随机数。N0或缺省时,生成随机数,N≤0生成与上次相同的随机数。 产生某范围的整数值，其通用表达式为： Int(Rnd()*（上界-下界+1）+下界) 产生[1,100] 整数: Int(Rnd()*100+1) 为了每次运行时，产生不同序列的随机数，可执行Randomize()函数 随机数举例 * * 产生某范围的整数值，其通用表达式为： Int(Rnd()*（上界-下界+1）+下界) 程序 * 2.转换函数 ABC Ucase(abc) 小写字母转为大写字母 Ucase(C) 144 Oct(100) 十进制转换成八进制 Oct(N) 123.45 Str(123.45) 数值转换为字符串 Str(N) 123 Val(123AB) 数字字符串转换为数值 Val(C) abc Lcase(ABC) 大写字母转为小写字母 Lcase(C) 64 Hex(100) 十进制转换成十六进制 Hex(N) A Chr(65) ASCII码值转换成字符 Chr(N) 2003-11-13 CDate(2003/11/13) 转换成日期型 CDate 65 Asc(A) 字符转换成ASCII码值 Asc(C) 结果 实例 功能 函数名 本章目录 Fix(n) int(n) round(n) * 转换函数说明 Chr和Asc函数互为反函数。 Chr(66) → “B“ Asc (“B) → 66 Asc(Chr(66)) → 66 Chr(Asc(“K”)) → “K” (2) Str函数将非负数值转换成字符类型后，会在转换后的字符串左边增加一空格。 (3) Val将字符串最左端开始的数字字符串转换成数值。遇到不能转换的字符为止。若字符串无法被转换时，返回0。 例如表达式： Val(-123.45ty3)结果为-123.45。 本章目录 * 1.写出表达式 （1）XY都是正整数或都是负整数 2.求表达式的值 （1）str(32.345)=cstr(32.345) （2）“14” 32 X=fix(x) and y=fix(y) and x*y0 练 习 false 1432 Str(x):将数值型数据x转换成相应的字符串，保留正数符号位 CStr(x):将x转换成字符串，如X为数值型，不保留正数符号位 * Dim i As Integer, c As Char Randomize() Label1.Text = For i = 1 To 10 利用循环 Label1.Text = Chr(Int(Rnd() * 26 + 65)) Next 例3.6 随机产生10个大写字母 1 2 * 函数格式 函数功能及参数说明 例子 结果 Ucase(s) 把字符串参数转换成大写字符。 UCase(lEFt) “LEFT” Lcase(s) 把字符串参数转换成小写字符。 LCase(lEFt) “left” Lelf(s,n) 从字符串s左边第一个字符开始截取n个字符。 Left(c, 2) “中国” Right(s,n) 从字符串s右边最后一个字符开始截取n个字符。 Right(c, 4) “hong” Mid(s,n[,L]) 从字符串s的第n个字符开始截取