選定的列表框值顯示togethar

Question

我有一個列表框...我的列表框有多個項目..如果我選擇多個項目我想顯示多個項目同時在消息框..我的代碼是這樣的：

cnt = LSTlocations.SelectedItems.Count 
Dim list As New List(Of Integer) 
Dim locid As Integer 
If cnt > 0 Then 
     For i = 0 To cnt - 1 
      Dim locationanme As String = LSTlocations.SelectedItems(i).ToString 
      locid = RecordID("Locid", "Location_tbl", "LocName", locationanme) 
      list.Add(locid) 
     Next 

     For Each num In list 
      MessageBox.Show("LocID:" & num) 

     Next 

現在每次我在消息框中獲得每個值..我想同時獲得所有的價值..我可以做到這一點？

Answer 1

您可以使用String.Join()方法而不是使用循環來加入列表元素。

一個例子：

Dim list As New List(Of Integer) From {0, 1, 2, 3, 4, 5} 

MessageBox.Show(String.Format("LocID: {0}", String.Join(", ", list)), _ 
       Nothing, MessageBoxButtons.OK, MessageBoxIcon.Information)