知っていれば簡単ですが、知らないと苦労するものの一つです。 If IsNumeric(Text1.Text) Then MsgBox "数値です。" Else MsgBox "数値ではありません。" End If
知っていれば簡単ですが、知らないと苦労するものの一つです。
If IsNumeric(Text1.Text) Then MsgBox "数値です。" Else MsgBox "数値ではありません。" End If
If
IsNumeric(Text1.Text)
Then
MsgBox "数値です。"
Else
MsgBox "数値ではありません。"
End If