VB.NET运行提示字符串转双精度类型无效错误该如何解决

你触发报错的核心原因是直接对tbAantalIslands.Text（字符串类型）执行数值大小比较，VB.NET运行时会隐式尝试把字符串转为Double类型完成比较，当输入框为空、输入内容不是合法数字时，隐式转换失败就会抛出该错误。

你可以先用Integer.TryParse（如果输入值要求是整数）或者Double.TryParse做安全转换，同时处理空输入、非法输入的场景，示例代码如下：

' 先定义变量存储转换后的数值
Dim inputNum As Integer
' 安全转换，转换失败（空值、非数字）时直接跳过逻辑，也可以按你业务需求加额外处理
If Integer.TryParse(tbAantalIslands.Text, inputNum) Then
    If iBtnClickCheck > 0 Then
        If inputNum > 2 Then
            btn3.BackColor = Color.Red
        ElseIf inputNum < 2 Then
            btn3.BackColor = Color.Green
        Else
            ' 等于2的场景可以按你需求补充逻辑，不需要的话可以删掉这个分支
            btn3.BackColor = SystemColors.Control
        End If
    End If
Else
    ' 输入为空/不是合法数字的场景，可按你的业务需求处理，比如重置btn3颜色、弹出提示等
    If iBtnClickCheck > 0 Then
        btn3.BackColor = SystemColors.Control
    End If
End If

• 如果你允许输入的是小数（比如2.5），把Integer.TryParse替换为Double.TryParse，同时把inputNum的类型改为Double即可
• 不要依赖VB的隐式类型转换，所有字符串转数值的场景都优先用TryParse做安全转换，能避免绝大多数类型转换报错

内容的提问来源于stack exchange，提问作者Martin