0

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

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」でコードを実行することです。私は何をしていないのですか?

4

1 に答える 1

0

これを試して:

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
于 2012-04-17T11:13:28.430 に答える