タイトル : Re^6: ListBoxの高度な使い方 投稿日 : 2006/05/19(Fri) 09:29 投稿者 : なおこ(・∀・) 参照先 : http://naoko.wankuma.com/
お世話になります。 > なおこさん、どうもです。SelectionModeが違っていました。oneだとなおこさんのがいいのですが 。 > ListBox1の選択履歴を残す意味でこれがSelectionModeがMultiSimpleだと動作が違ってきます。 > ListBox1のSelectionModeがoneの場合と同じ動作をさせたいのですが、そういう場合はやはり > 違ってきますか? 以下のような感じになりますけども。 あとはご自身で考えてみてください。 Private Sub Form2_Load(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles MyBase.Load Me.ListBox1.Items.Clear() Me.ListBox1.Items.Add("aaa") Me.ListBox1.Items.Add("bbb") Me.ListBox1.Items.Add("ccc") Me.ListBox1.Items.Add("ddd") Me.ListBox1.SelectionMode = SelectionMode.MultiSimple End Sub Private Sub ListBox1_SelectedIndexChanged(ByVal sender As Object, _ ByVal e As System.EventArgs) _ Handles ListBox1.SelectedIndexChanged Me.ListBox2.Items.Clear() If Me.ListBox1.SelectedIndex < 0 Then Return If Me.ListBox1.SelectedItems.Count < 1 Then Return For Each selectedKey As String In Me.ListBox1.SelectedItems Me.ListBox2.Items.Add(selectedKey) Next End Sub |