十进制

Dim Value As Variant
Value = CDec(1.234)

'Set Value to the smallest possible Decimal value
Value = CDec("0.0000000000000000000000000001")

Decimal 数据类型作为 Variant 的子类型提供,因此你必须声明任何需要包含 Decimal 作为 Variant 的变量,然后使用 CDec 函数指定 Decimal 值。关键字 Decimal 是一个保留字(表明 VBA 最终将为该类型添加一流支持),因此 Decimal 不能用作变量或过程名称。

Decimal 类型需要 14 个字节的内存(除了父 Variant 所需的字节外),并且可以存储最多 28 个小数位的数字。对于没有任何小数位的数字,允许值的范围是 -79,228,162,514,264,337,593,543,950,335 到+79,228,162,514,264,337,593,543,950,335(含)。对于最多 28 位小数的数字,允许值的范围为 -7.9228162514264337593543950335 至+7.9228162514264337593543950335(含)。