タイトル : Re^3: リストボックスの項目選択 投稿日 : 2010/01/09(Sat) 21:17 投稿者 : 花ちゃん
> 私は現在、スイッチ1つで操作を行うオンスクリーンキーボードを作成しています。 そのような事がしたいなら今回のような事は、基本中の基本ですから自分で考えて できないようでは、この先も他人に頼る事になるかと > そこに予測変換機能を追加したいと考えていて、オンスクリーンキーボードを使って > テキストボックスに文字を入力すると、入力した文字から始まる語句を > 語句が保存されているテキストファイルから検索して呼び出し、 > リストボックスに表示させています。 > > それからリストボックスに表示させた語句を上から1行ずつ順番にオートスキャンして、 > スイッチを押した時に選択状態であるリストボックスの内容をテキストボックスに > 表示させたいと考えています。 > 説明が不足していて申し訳ございません。 説明を聞いても良く解りませんが。 > ご教授宜しくお願い致します。申し訳ございません。 貴方のコードを活かすなら...。 Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click ListBox1.SetSelected(0, True) itemCount = 0 Timer1.Enabled = True End Sub Private itemCount As Integer Private Sub Timer1_Tick(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles Timer1.Tick SendKeys.SendInput(wVk.VK_DOWN) 'この関数が正しく動くものとして。 itemCount += 1 If itemCount = ListBox1.Items.Count Then Timer1.Enabled = False End If End Sub ※ 酒井先生のコードを流用されているようですが、あそこのSendInput 関数は、 割り込みが入るので、ここの掲載のものを使用された方がいいかも。 (他人のコードをお使いになるのならある程度理解した上で使用するようにして下さい) |