- ベストアンサー
テキストボックスの入力制限
ＶＢ６の画面入力でテキストボックスにフォーカスが移った際、半角カナや全角漢字、半角アルファベット大文字と云ったキーボードからの入力を制御したい（ＯＳはＷｉｎＸｐ/ＦＥＰはＩＭＥ２００２を使用）のですが、良い方法が有れば教えてください。
- Adenau
- お礼率69% (30/43)
- Visual Basic
- 回答数3
- ありがとう数2
- みんなの回答 （3）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (2)
- ducati
- ベストアンサー率29% (308/1062)
＃１です。 私の方法で行くならば、KeyAsciiのコードを変えれば他にも対応できるでしょう。 半角のカナだけとか、全角とか漢字だけ等。 それぞれのコードはご自分で調べてください。
お礼
入力内容についてのチェックが範囲指定でいろんな幅で設定出来ますね。 有難うございます。応用させていただきます。
- ducati
- ベストアンサー率29% (308/1062)
ということは、半角の数字だけ入力可にしたいということでいいのでしょうか？ 下記参考になりますか？ 半角数字とバックスペースのみ効きます。 フォーカスが移る際に下記関数を呼んであげればよいはずです。 見当違いでしたら、ごめんなさい。 '##################################################### '# 半角の数字とBackSpaceしか入力できないようにする # '##################################################### Public Sub HankakuCHK(KeyAscii) If KeyAscii < 48 Or KeyAscii > 57 Then If KeyAscii <> 8 Then KeyAscii = 0 End If End If End Sub
補足
有難うございます。 質問の趣旨としてはフォーカスが来た際(Got_Focus)に、文字種類を制御したいって事です。 例えば”CapsOnの半角アルファベットを打たせたい”とか”２バイト文字のカナを打たせたい”とかをコントロールしたいです。 と云う訳で"半角数字とバックスペースのみ"のテキストボックスにはこれを使うという事ですね。早速試してみます。
お礼
今回は入力制御の要求の方がが高いので、利用させて頂きます。 IMEMode・・・見つけられなかった(恥)