如何显示多扩展的列表框项目以显示标签中的项目？

Question

我的家庭作业问题是在标签中显示列表框（多重扩展）中的选定项目。我需要在标签中显示所有选定的名称。请你能以最简单，最简洁的方式来帮助我。

谢谢！

这是我得到的，但它不起作用。

Private Sub MainForm_Load(ByVal sender As Object, ByVal e As 

System.EventArgs）把手Me.Load '填充有值

namesListBox.Items.Add("Debbie") 
    namesListBox.Items.Add("Bill") 
    namesListBox.Items.Add("Jim") 
    namesListBox.Items.Add("Ahmad") 
    namesListBox.Items.Add("Carol") 

End Sub 

Private Sub multiButton_Click(ByVal sender As 

System.Object的，BYVALË作为 System.EventArgs）把手 multiButton.Click

列表框

resultLabel.Text =“”

Dim name As String = namesListBox.SelectedItems.ToString 

    resultLabel.Text = name & ControlChars.NewLine 

End Sub 

Answer 1

ListBox的SelectedItems属性是一个集合。你需要迭代集合。

resultLabel.Text = String.Empty 
For Each si As Object In namesListBox.SelectedItems 
    resultLabel.Text += si.ToString() & ControlChars.NewLine 
Next 

Answer 2

尝试SelectionChanged事件

Private Sub listBox2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles listBox2.SelectionChanged 
    Dim stringBuilder = New StringBuilder() 
    Dim delimiter = " - " 
    For Each item As Object In listBox2.SelectedItems 

     stringBuilder.AppendFormat("{0}{1}", item, delimiter) 
    Next 
    label2.Text = stringBuilder.ToString() 
End Sub