悠悠博客 关注Ajax技术与web开发

CCur 函数
返回表达式，此表达式已被转换为 Currency 子类型的 Variant。

CCur(expression)
expression 参数是任意有效的表达式。

说明
通常，您可以使用子类型数据转换函数书写代码，以显示某些操作的结果应当被表达为特定的数据类型，而非默认的数据类型。例如在整数运算的情况下，使用 CCur 函数强制进行货币计算。

CCur 函数用于进行从其他数据类型到 Currency 子类型的国际公认的格式转换。例如，对十进制分隔符和千位分隔符的识别取决于系统的区域设置。

下面的示例使用 CCur 函数将一个表达式转换成 Currency 类型:

Dim MyDouble, MyCurr
MyDouble = 543.214588          '''' MyDouble 是双精度的。
MyCurr = CCur(MyDouble * 2)    '''' 把 MyDouble * 2 (1086.429176) 的结果转换为 Currency (1086.4292)。