CCur

将表达式强制转换为 Currency。

语法：CCur( expression )

expression

必需 范围在 -922,337,203,685,477.5808 到 922,337,203,685,477.5807 之间的任何有效字符串或数值表达式。

返回类型为 Currency。如果 expression 超出该范围，将发生运行时错误。

CCur 在通常会发生单精度、双精度或整数运算的情况下强制进行货币运算。

CCur 是替代 Val 进行数据类型转换的区域感知方案。CCur 根据系统的区域设置正确识别不同的小数分隔符、千位分隔符和各种货币选项。

示例

此示例使用 CCur 函数将表达式转换为 Currency。

Dim MyDouble, MyCurr
MyDouble = 543.214588                    ' MyDouble is a Double.
MyCurr = CCur(MyDouble * 2)              ' Convert result of MyDouble * 2
                                          ' (1086.429176) to a
                                          ' Currency (1086.4292).

另请参阅

• CBool、CByte、CDbl、CDec、CSng、CStr、CVar 函数