VB数据类型转换函数VIP免费

(一)类型转换类函数 1. CType(X) [格式]： P=CBool(X) ' 将 X 转换为"布尔"(Boolean)类型 P=CByte(X) ' 将 X 转换为"字节"(Byte)类型 P=CCur(X) ' 将 X 转换为"金额"(Currency)类型 P=CDate(X) ' 将 X 转换为"日期"(Date)类型 P=CDbl(X) ' 将 X 转换为"双精度"(Double)类型 P=CInt(X) ' 将 X 转换为"整型"(Integer)类型 P=CLng(X) ' 将 X 转换为"长整型"(Long)类型 P=CSng(X) ' 将 X 转换为"单精度"(Single)类型 P=CStr(X) ' 将 X 转换为"字符串"(String)类型 P=Cvar(X) ' 将 X 转换为"变体型"(Variant)类型 P=CVErr(X) ' 将 X 转换为 Error 值 [ 范例 ]： (1). CStr(13)+CStr(23) ' 数值转换成字符串后，用"+"号连接， 结果：1323 (2). CInt("12")+12 ' 字符串转换成整型后与 12 相加， 结果：24 (3). P=CInt(True) ' 输出结果为-1 ' 布尔值与数值的转换时要注意，布尔值只有 True 和 False，其中 True 在内存中为-1,False存为 0 (4). CBool(-0.001) ' 输出结果为 True ' 将数值转换为布尔型时，等于 0 的数值将得到 False，不等于 0 的数值得到 True. 2. Int(X),Fix(X) ：取 X 的整数值 [格式]： P=Int(X) ' 取<=X 的最大整数值 P=Fix(X) ' 取 X 的整数部分，直接去掉小数 [范例]： (1) Int(-54.6) ' 结果为-55，取<=-54.6 的最大整数 (2) Fix(54.6) ' 结果为54，取整数并直接去掉小数 (二)常用数学函数 [格式]： 1. Abs(N) 取绝对值 例：Abs(-3.5) 结果：3.5 2. Cos(N) 余弦函数 例：Cos(0) 结果：1 3. Exp(N) e 为底的指数函数 例：Exp(3) 结果：20.068 4. Log(N) 以e 为底的自然对数 例：Log(10) 结果：2.3 5. Rnd[(N) 产生随机数 例：Rnd 结果：0--1 之间的数 6. Sin(N) 正弦函数 例：Sin(0) 结果：0 7. Sgn(N) 符号函数 ' 说明：取正负号。Y=Sgn(X) 既 X>0 则 Y=1；X=0 则 Y=0；X<0 则 Y= -1 8. Sqr(N) 平方根 例：Sqr(9) 结果：3 9. Tan(N) 正切函数 例：Tan(0) 结果：0 10.Atn(N) 反切函数 例：Atn(0) 结果：0 [注意]：在三角函数中，以弧度表示。 (一)字符串类函数： 1. ASC(X)，Chr(X)：转换字符字符码 [格式]： P=Asc(X) 返回字符串X 的第一个字符的字符码 P=Chr(X) 返回字符码等于X 的字符 [范例]： (1)P=Chr(65) '输...