Question

我首先使用的是Visual Basic 2010 - ＆gt; Windows窗体应用程序

我想要，当值更新时，如果超过1000，标签应指示$ 1.000，如果超过10000 =＆gt; 10.000美元等等......我怎么能这样做？

    If money > 1000 Then

        lblMoney.Text = ("$" & money.ToString.Substring(0, 1) & "." & 
        _ money.ToString.Substring(1, 3))

    ElseIf money > 10000 Then

        lblMoney.Text = ("$" & money.ToString.Substring(1, 3) & "." & 
        _ money.ToString.Substring(3, 4))

    End If

我试过这个，但它只适用于第一个if语句...我不知道如何使用这些子串，我只是稍微玩了一下它就解决了......

我该怎么做？如果可能的话，没有编码在每个新的数字之后加点，如1.000 10.000 100.000 1.000.000等等

Answer 1

非常简单

为什么你不把钱换成双倍然后用字符串格式化器给你货币？即：money.ToString（“c”） - 这将为您提供您想要的东西。不需要进行字符串解析等...

Dim money as Double = 1000
Console.WriteLine(money.ToString("c"))

这将打印（取决于您的文化）：$ 1,000

数字之后的点[VB]

1 个答案: