有关如何集成代码块的任何提示

时间:2018-11-15 07:16:11

标签: vb.net

这是我要发生的事情,当我输入数字时,如果该数字为1,它将显示“项目已成功寄出,数量为1”,如果我输入了字母,应该是错误的。

If IsNumeric(SendOutQuantityTxtBx.Text) Then
    If SendOutQuantityTxtBx.Text <= 1 Then
        MessageBox.Show("Item Successfully Sendout, Quantity is 1")
    Else
        MessageBox.Show("ERROR: Not a number")
        MessageBox.Show("Quantity above 1")
    End If
End If

1 个答案:

答案 0 :(得分:3)

您需要将if放在else末尾,以便管理如果文本不是数字会发生什么。

If IsNumeric(SendOutQuantityTxtBx.Text) Then
    If SendOutQuantityTxtBx.Text <= 1 Then
        MessageBox.Show("Item Successfully Sendout, Quantity is 1")
    Else        
        MessageBox.Show("Quantity above 1")
    End If
Else
    MessageBox.Show("ERROR: Not a number")
End If