vb.net - 文字列が数値かどうかのチェックが vb で機能しない

Question

文字列が数値かどうかを確認しようとしていますが、無駄です。ここに私のコードがあります:

If Val(fnumField.Text.Trim) > 0 Or fnumField.Text.Trim = "0" Or Val(phnField.Text.Trim) > 0 Or phnField.Text.Trim = "0" Or Val(ophnField.Text.Trim) > 0 Or _
        ophnField.Text.Trim = "0" Or Val(treeField.Text.Trim) > 0 Or treeField.Text.Trim = "0" Then 
    messageBox.Show("number")
Else
    messageBox.Show("not number")
EndIf

私が抱えている問題は、プログラムを実行して「abcd」のような文字列を「fnumField」のようなテキストフィールドの1つに挿入すると、「else」ではなく「if」でコードを実行することです。私は何をしていないのですか？

Answer 1

これを試して：

If (Val(fnumField.Text.Trim) > 0 Or fnumField.Text.Trim = "0") And (Val(phnField.Text.Trim) > 0 Or phnField.Text.Trim = "0") And (Val(ophnField.Text.Trim) > 0 Or
        ophnField.Text.Trim = "0") And (Val(treeField.Text.Trim) > 0 Or treeField.Text.Trim = "0") Then 
    messageBox.Show("number")
Else
    messageBox.Show("not number")
EndIf