リストボックス次のアイテムに行く

Question

アイテムを読み込むことができるリストボックスがあります。

ボタンをクリックして次の項目を強調表示し、テキストボックスに貼り付けるにはどうすればよいですか？

Me.ListBox1.SelectedIndex = Me.ListBox1.SelectedIndex + 1 

Answer 1

まず、フォームにボタンコントロールを追加し、そのClickイベントにイベントハンドラメソッドを配線してください。

次に、—というコードを書いて、のに書き込もうとしていたとは思っていませんでしたか？ ListBoxのすべてのアイテムにItems propertyでアクセスできるという知識から始めてください。したがって、単にn + 1アイテムを選択することができます。nは現在選択されているアイテムのインデックスです。

「テキストボックスにコピーする」という意味がわかりません。 ListBoxアイテムはテキストボックスにコピーできません。項目のテキストをテキストボックスにコピーしますか？その場合は、個々の項目のToStringメソッドを呼び出して、Clipboard classの適切なメソッドを使用してクリップボードに追加します。

Answer 2

Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click 
    If ListBox1.SelectedIndex >= 0 AndAlso ListBox1.SelectedIndex < ListBox1.Items.Count - 1 Then 
    ListBox1.SelectedIndex += 1 
    End If 
End Sub 

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs) Handles ListBox1.SelectedIndexChanged 
    If ListBox1.SelectedIndex >= 0 AndAlso ListBox1.SelectedIndex < ListBox1.Items.Count - 1 Then 
    TextBox1.Text = ListBox1.SelectedItem.ToString() 
    End If 
End Sub