我正在尝试转换货币格式示例的数学结果:
Dim num1 As Integer = 2000
Dim num2 As Integer = 500
msgbox(cDbl(num1 + num2))
它只返回2500,我需要返回我的2,500.00
如果有人有任何想法,我将非常有帮助,谢谢。
最佳答案
您的MsgBox
向您显示该值,但未按照您的要求对其进行格式化。
如果再进一步将结果格式化为字符串,则将获得所需的格式,例如:
Dim num1 As Double = 2000
Dim num2 As Double = 500
Dim sum As Double = num1 + num2
MsgBox(sum.ToString("0.00")) ' Adjust format string to suit