如何在VB中的文本框中检查负值？

Question

如何检查文本框中的负值？我只能使用TryParse文本框，以便在它是一个数值时验证它：

If Not Decimal.TryParse(txtParts.Text, decParts) Then
    If decParts <= 0 Then
        MessageBox.Show("ERROR: Value must be a positive number!")
    End If
    MessageBox.Show("ERROR: Value must be numeric!")
    Return False
End If

是否可以在TryParse方法中检查负值？

Answer 1

您的If条件基本上是说没有成功将其解析为数字。你想要这样的东西：

If Decimal.TryParse(txtParts.Text, decParts) Then
    If decParts <= 0 Then
        MessageBox.Show("ERROR: Value must be a positive number!")
        Return False
    End If
Else
    MessageBox.Show("ERROR: Value must be numeric!")
    Return False
End If

注意Else子句，Decimal.TryParse条件的反转，以及“非正”部分的return语句。