テキストから含まれている文字をチェックするには？ (ID:78793)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ここで言う「数字」が"0123456789"の 10キャラクタのみを意味するなら、 IsNumericで一発…というわけにはいかないので、 通常はループでまわしてMid関数で1文字ずつ切り出して、 文字コード,Like演算子,InStr関数 のいずれかでチェックすることになるでしょう。 あるいはちょっとロジックをひねって strBuf = Text1.Text For i = 0 To 9 strBuf = Replace(strBuf, CStr(i), "") Next MsgBox IIf(Len(strBuf), "あり", "なし") とか・・・。