投稿者 ?-?  (その他) 投稿日時 2009/8/20 23:37:37
今から馬鹿なことを書く。

> (Len(Text1.Text) >= 4 And KeyAscii <> vbKeyBack And KeyAscii <> vbKeyDecimal)
4桁「以上」もだめ?