FormatPercent是 VB 或 VBScript 函数，返回格式化的数值型百分比字符串，末尾带有“%”。

函数形式：

FormatPercent(Expression, [NumDigitsAfterDecimal As Long = -1], [IncludeLeadingDigit As VbTriState = vbUseDefault], [UseParensForNegativeNumbers As VbTriState = vbUseDefault], [GroupDigits As VbTriState = vbUseDefault]) As String

参数说明：

▲Expression：欲格式化的表达式。

▲NumDigitsAfterDecimal：保留小数位数。默认值为 -1，表示使用计算机的区域设置。

▲IncludeLeadingDigit：是否显示小数点前面的零。默认值为 -2

▲UseParensForNegativeNumbers：是否将负值放在括号中。默认值为 -2，表示使用计算机的区域设置。

▲GroupDigits：是否用逗号进行分组。默认值为 -2，表示使用计算机的区域设置。

IncludeLeadingDigit、UseParensForNegativeNumbers 和 GroupDigits 的可选设置：

-2(vbUseDefault)：使用计算机的区域设置

-1(vbTrue) ：是

0 (vbFalse)：否

应用例子：

nStr = FormatPercent(0.003456, 2, vbTrue)

MsgBox nStr '返回：0.35%