未输入值时出现项目错误

Question

If txtAge.Text < 18 Then
        MessageBox.Show("You must be over 18", "Error", MessageBoxButtons.OK, _
                    MessageBoxIcon.Error)

    Else : Me.Close()
        Form3.Show()
    End If

如果我选择不输入任何我想要通知的信息并将我的项目带回来崩溃并且说

  

发生了类型为“System.InvalidCastException”的未处理异常   在Microsoft.VisualBasic.dll

中      

其他信息：从字符串“”转换为“Double”类型   无效。'

我不知道我哪里出错可能会在初学者中转换字符串/整数，所以任何帮助都会受到赞赏。

Answer 1

您应该使用Int32.TryParse()：

Dim intAge As Int32
If Int32.TryParse(txtAge.Text, intAge) Then
   If intAge < 18 Then
      MessageBox.Show("You must be over 18", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
   End If
Else
   MessageBox.Show("Age was empty or invalid!", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End If