VBプログラマ質問スレ（6.0以前） Part53at TECHVBプログラマ質問スレ（6.0以前） Part53 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト7:デフォルトの名無しさん 07/08/22 17:35:07 >5 なかったことにしてやりたいですｗ もしかして私は何か間違ってるでしょうか？ KeyDownとは無関係にリストボックスの上下移動をしているように思います 8:デフォルトの名無しさん 07/08/22 19:34:30 はぁ… 結構頻出なんだけどな Option Explicit Private WithEvents lstbox As ListBox Private Sub Form_Load() Dim i As Long Set lstbox = Me.Controls.Add("VB.ListBox", "lstox") With lstbox .Move 0, 0, 3000, 5000: .Visible = True For i = 1 To 100: .AddItem i: Next End With End Sub Private Sub lstbox_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyLeft Then KeyCode = 0 End Sub 9:2 07/08/22 19:44:02 >>8 申し訳ありません。 いろいろやって、自分でも結論が出ました＾＾； やはり間違っていたようで、キーイベントで拾って処理する事ができました。 おっしゃる通り、keycodeを0にすれば良かったです。 昨日から何度も目にしていたのですが、リストボックスの制御する事で 頭がいっぱいになっておりました＞＜； 本当に申し訳ありませんでした。 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch