每个函数都可以将表达式(表达式:算术或逻辑运算符、常数、函数和字段名称、控件和属性的任意组合,计算结果为单个值。表达式可执行计算、操作字符或测试数据。)强制转换
Linux Access函数之CBool函数
此示例使用CBool函数将表达式转换为Boolean值。如果表达式的求值结果是一个非零值,CBool将返回True;否则,它将返回False。
DimA,B,Check
A=5:B=5'Initializevariables.
Check=CBool(A=B)'CheckcontainsTrue.
A=0'Definevariable.
Check=CBool(A)'CheckcontainsFalse.
- 1.
- 2.
- 3.
- 4.
- 5.
Linux Access函数之CByte函数
此示例使用CByte函数将表达式转换为Byte值。
DimMyDouble,MyByte
MyDouble=125.5678'MyDoubleisaDouble.
MyByte=CByte(MyDouble)'MyBytecontains126.
- 1.
- 2.
- 3.
Linux Access函数之CCur函数
此示例使用CCur函数将表达式转换为Currency值。
DimMyDouble,MyCurr
MyDouble=543.214588'MyDoubleisaDouble.
MyCurr=CCur(MyDouble*2)
'ConvertresultofMyDouble*2(1086.429176)toa
'Currency(1086.4292).
- 1.
- 2.
- 3.
- 4.
- 5.
Linux Access函数之CDate函数
此示例使用CDate函数将字符串转换为Date值。通常,建议不将日期和时间硬编码为字符串(如本示例中所示)。请改用日期文本和时间文本,如#2/12/1969#和#4:45:23PM#。
DimMyDate,MyShortDate,MyTime,MyShortTime
MyDate="February12,1969"
'ConverttoDatedatatype.
MyShortDate=CDate(MyDate)
MyTime="4:35:47PM"
'ConverttoDatedatatype.
MyShortTime=CDate(MyTime)
- 1.
- 2.
- 3.
- 4.
- 5.
- 6.
- 7.
Linux Access函数之CDbl函数
此示例使用CDbl函数将表达式转换为双精度型值。
DimMyCurr,MyDouble
MyCurr=CCur(234.456784)
'ConvertresulttoaDouble.
MyDouble=CDbl(MyCurr*8.2*0.01)
- 1.
- 2.
- 3.
- 4.
Linux Access函数之CDec函数
此示例使用CDec函数将数值转换为Decimal值。
DimMyDecimal,MyCurr
MyCurr=10000000.0587'MyCurrisaCurrency.
MyDecimal=CDec(MyCurr)'MyDecimalisaDecimal.
- 1.
- 2.
- 3.
Linux Access函数之CInt函数
此示例使用CInt函数将值转换为Integer值。
DimMyDouble,MyInt
MyDouble=2345.5678'MyDoubleisaDouble.
MyInt=CInt(MyDouble)'MyIntcontains2346.
- 1.
- 2.
- 3.
Linux Access函数之CLng函数
此示例使用CLng函数将值转换为Long值。
DimMyVal1,MyVal2,MyLong1,MyLong2
MyVal1=25427.45
MyVal2=25427.55'MyVal1,MyVal2areDoubles.
MyLong1=CLng(MyVal1)
'MyLong1contains25427.
MyLong2=CLng(MyVal2)
'MyLong2contains25428.
- 1.
- 2.
- 3.
- 4.
- 5.
- 6.
- 7.
Linux Access函数之CSng函数
此示例使用CSng函数将值转换为Single值。
【编辑推荐】
- Linux 查看磁盘空间实现代码介绍
- Linux操作系统需要微软的十大帮助
- 探寻Linux到底需要多低的配置
- Linux测试工具tcpdump监视TCP/IP连接命令介绍
- Linux流量控制实例应用介绍