将指数值转换为十进制

Question

知道如何将指数值转换为十进制值。我有下面的代码，返回为1.00000000000051E-02，但我想显示为0.01（100-99.99）

Dim total
Dim pct

total = 99.99

pct=(100-total)

msgbox pct

Answer 1

使用Round功能：

Dim total
Dim pct

total = 99.99
pct = Round(100-total, 2)

MsgBox pct