如何使用文本框/消息框(VS2017)将总数增加到2个小数点

Question

所以基本上，我有 4 个文本框，然后用户在 4 个文本框中输入数字，然后按下计算按钮，它会弹出一个文本框"玩家已经跑了 ___ 公里">

这一切都很好，然后它也显示在总文本框中。

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

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

谢谢:)

Answer 1

将四分之一调暗为整数，将其调暗为双倍。

所以它看起来像

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")