CLng 函数示例
本示例使用 CLng 函数将一数值转换为 Long。
Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1、MyVal2 均为 Double 类型。
MyLong1 = CLng(MyVal1) ' MyLong1 的值为 25427。
MyLong2 = CLng(MyVal2) ' MyLong2 的值为 25428。
用 ACS() 函数吧。
str = Asc("汉")
取整的话,用Fix函数
Fix(25.56) = 25
四舍五入的话用Clng咯。
Clng(Val("被转换的字符串"))
Clng()函数只能转换数字类型的数据!