货币格式数字 VB.NET

Question

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

Dim num1 As Integer = 2000
Dim num2 As Integer = 500

msgbox(cDbl(num1 + num2))

它只返回 2500，我需要返回我的 2,500.00 如果有人知道我会非常有帮助，谢谢。

Answer 1

首先，在处理货币值时，您应该使用 Decimal 而不是 Double。 Double 有一些舍入问题。

其次，您可以使用字符串格式：

Dim num1 As Integer = 2000
Dim num2 As Integer = 500
Diml value As Decimal = CDec(num1 + num2)
Dim formattedValue As String = String.Format("{0:n}", value)

msgbox(formattedValue)

Answer 2

您的 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

Answer 3

标准数字格式字符串

是通用数字格式的一个很好的资源，顶部一种是货币（考虑到文化差异）

“C”或“c”代表货币

• 支持者：所有数字类型。
• 精度说明符：小数位数。
• 默认精度说明符：由 System.Globalization.NumberFormatInfo 定义。

更多信息：货币（“C”）格式说明符。

• 123.456（“C”，en-US）-> $123.46
• 123.456（“C”，fr-FR）-> 123,46 €
• 123.456（“C”，ja-JP）-> ¥123
• -123.456（“C3”，en-US）-> ($123.456)
• -123.456 ("C3", fr-FR) -> -123,456 €
• -123.456（“C3”，ja-JP）-> -¥123.456

Answer 4

如果您希望格式为货币，则以下任一方法都可以：

    Dim num1 As Integer = 2000
    Dim num2 As Integer = 500
    MsgBox(String.Format("{0:C2}", num1 + num2))

或者

    Dim num1 As Integer = 2000
    Dim num2 As Integer = 500
    Dim sum As Integer = num1 + num2

    MsgBox(sum.ToString("C2"))

Answer 5

将货币格式化为双精度

value = 1500,20 TL

ctype(value, double)

return 1500,20

将双精度格式化为货币

示例

value = 1500,1995

formatcurrency(value,2)

return = 1500,20 TL moneysembol (TL , $ ,vs..)

Answer 6

Dim num1 As Decimal = 20
Dim num2 As Decimal = 34
Dim ans As Decimal

ans = num1 + num2
MsgBox(ans.ToString("c"))

Answer 7

查看 String.Format 文档，您会在那里找到您需要的内容。

Answer 8

您通常不使用Integer 作为货币值的数据类型。请改用Double。

我确信有很多方法可以将输出字符串格式化为货币值。

一种是我所知道的方法已经由罗兰·肖解释过。所以我会跳到另一篇。它是名为 FormatCurrency 的内置函数。它将输出字符串作为货币值加上以及系统中定义的货币符号。

Dim num1 As Double = 2000
Dim num2 As Double = 500
Dim ans As Double = num1 + num2

MessageBox.Show(FormatCurrency(ans))

有关 FormatCurrency 的更多详细信息，请参阅