如何使用 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")
所以基本上,我有 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")