cLng函数示例 Dim MyAll, MyVal2, MyLong 1, MyLong2 Myva1=2542745 My Val1是双精度值。 Myva2=2542755Myva2是双精度值。 MyLong 1=CLng(MyVal1)MyLong 1 25427. MyLong2=CLng( MyVal2) MyLong2包含25428。 东料学枝术取业学院
CLng 函数示例 – Dim MyVal1, MyVal2, MyLong1, MyLong2 – MyVal1 = 25427.45 ' MyVal1 是双精度值。 – MyVal2 = 25427.55 ‘ MyVal2 是双精度值。 – MyLong1 = CLng(MyVal1) ' MyLong1 25427。 – MyLong2 =CLng(MyVal2) ' MyLong2 包含 25428
CBoo函数示例 Dima. B. check A=5:B=5 初始化变量 Check=CBoo(A=B)'复选框设为True。 A=0 定义变量 Check CBOol(A 复选框设为 False。 广东科学技木职业学院
CBool 函数示例 – Dim A, B, Check – A = 5: B = 5 ‘ 初始化变量。 – Check = CBool(A = B) '复选框设为 True 。 – A = 0 ‘定义变量。 – Check = CBool(A) '复选框设为 False