在VBA编程中，如果需要将数值转换为百分数，可以使用FormatPercent()函数，语法格式为：

FormatPercent([数值])

过程源代码：

'将输入的数值转换为百分数Sub百分数()Dim x AsDouble

x =InputBox("请输入欲转化为百分数的数值：")MsgBox x &"转化为百分数为："&FormatPercent(x),,"FormatPercent()函数"EndSub

执行过程：按F5键运行“百分数”过程，在输入对话框中输入数字。