我的表单中有这样的代码。
Private Sub Calculate()
Dim Len, Wid, Height, Roll As Double
Dim Ans, fans As Double
Len = Convert.ToDouble(ComboBox1.Text)
Wid = Convert.ToDouble(ComboBox2.Text)
Height = Convert.ToDouble(ComboBox3.Text)
Roll = Convert.ToDouble(ComboBox4.Text)
Ans = Wid * Height * 2 + Len * Height * 2
fans = Ans / Roll
MessageBox.Show(Ans)
MessageBox.Show(Roll)
MessageBox.Show(fans)
End Sub
每当我尝试将一个双数添加到 ComboBox4
(Roll Coverage)它说。
输入字符串的格式不正确
ComboBox4
填充的数值范围为 40
到 50
递增 0.5
. 当我使用整数时,程序会运行,但当我使用双数时,如 41.5
它爆炸了。
我怎样才能解决这个问题?
小数点分隔符取决于语言设置,所以,根据我们的评论,解决方案是使用逗号。只是为了记录解决方法,供以后的读者参考。