我正在尝试转换货币格式示例的数学结果:

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

08-24 13:22