У меня есть этот код в моей форме:
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
(Покрытие броска), оно говорит:
Строка ввода была не в правильном формате
ComboBox4
заполняется значениями от 40
до 50
с шагом 0.5
. Когда я использую целое число, программа запускается, но когда я использую двойное число, например 41.5
, оно взрывается.
Как я могу это исправить?