如何使用 Textbox/Messagebox (VS2017) 得到总计到 2 位小数

How To Get Total To 2 Decimals With Textbox/Messagebox (VS2017)

所以基本上,我有 4 个文本框,然后用户在 4 个文本框中输入数字,然后按下计算按钮,它会弹出一个文本框 "Player has run ___ km"

没问题,然后它也显示在总计文本框中。

但如果我输入小数(例如 10、10.2、10.01、10),它只会说 40,而不是 40.21。 (甚至到小数点后一位)。

我如何编辑它以在文本框和消息框中显示 2 位小数?

谢谢 :)

将四分之一的调光更改为整数,将它们调暗为两倍。

看起来像

        Dim quarter4 As Double
        quarter4 = TextBox4.Text
        Dim quarter3 As Double
        quarter3 = TextBox3.Text
        Dim quarter2 As Double
        quarter2 = TextBox2.Text
        Dim quarter1 As Double
        quarter1 = TextBox1.Text
        TotalDis.Text = quarter1 + quarter2 + quarter3 + quarter4
        MessageBox.Show(TextBox6.Text & " has run " & TotalDis.Text & " km this season")