vba - VBA 变体 MsgBox 格式到百分比 (%)

Question

Sub PctTest()
   Dim Third As Variant
   Third = 1 / 3    
   MsgBox (Third)
End Sub

如何让 msgbox 将变量“Third”显示为 33.33%？我知道如何格式化单元格，但我环顾四周，不明白如何格式化这样的变量。在此先感谢-汤米

Answer 1

怎么样：

   Dim Third As Variant
   Third = Format(1 / 3, "##.00%")
   MsgBox (Third)

Answer 2

您可以使用内置的：FormatPercent(1 / 3, 2)