Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2197 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【3493】コンボボックスについて saikoro 04/9/13(月) 14:12 発言[未読]
【3495】Re:コンボボックスについて こもれび 04/9/13(月) 16:35 回答[未読]
【3502】Re:コンボボックスについて saikoro 04/9/14(火) 11:15 お礼[未読]
【3493】コンボボックスについて
発言  saikoro  - 04/9/13(月) 14:12 -
引用なし
パスワード
   毎回お世話になっております。

今回は、コンボボックスについてなのですが、
コンボボックスに直接文字入力をしないで、
コンボボックスリストに表示される物だけを、
指定するようにしたいのですが、それをコンボボックスの
プロパティでやる事は、可能でしょうか？

コンボボックスのKeypressイベント時に
以下の関数を呼べば実行可能なのですが、

'<引数>iKeyAscii
'
Public Sub NyuuryokuSeigen(ByRef iKeyAscii As Integer)　　
　　Select Case iKeyAscii
　　　　Case vbKeyReturn
　　　　Case vbKeyBack
　　　　Case vbKeyEscape
　　　　Case Else
　　　　　　iKeyAscii = 0
　　End Select
End Sub

この他にプロパティで設定できるのでしょうか？
よろしくお願いいたします。
【3495】Re:コンボボックスについて
回答  こもれび  - 04/9/13(月) 16:35 -
引用なし
パスワード
   こもれびです　こんにちは

うーん、プロパティのみですか…

私がいつも使っている手法は

IME入力モード プロパティを「使用不可」にすることと、

Private Sub コンボ0_KeyPress(KeyAscii As Integer)
　　KeyAscii = 0
End Sub

です。
（念入りにはやっていません．）
これでこれまでトラブルになってしまったことが無いので… (^^;

確かにコードを書かずに済めば楽ですけど
【3502】Re:コンボボックスについて
お礼  saikoro  - 04/9/14(火) 11:15 -
引用なし
パスワード
   こもれび様、毎回ありがとうございます。
返信が遅くなってスミマセン。

>うーん、プロパティのみですか…
>
>私がいつも使っている手法は
>
>IME入力モード プロパティを「使用不可」にすることと、
>
>Private Sub コンボ0_KeyPress(KeyAscii As Integer)
>　　KeyAscii = 0
>End Sub
>
>です。
>（念入りにはやっていません．）
>これでこれまでトラブルになってしまったことが無いので… (^^;
>
>確かにコードを書かずに済めば楽ですけど

やはり、コードを書く手段で行きたいと思います。
IME入力モード プロパティを「使用不可」にすることを忘れてました^^;
自分のだと、全角にすると入力できちゃう・・・
こもれび様ありがとうございました。m(_ _)m
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2197 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078299
(SS)C-BOARD v3.8 is Free