Eventhough When I select multiple rows, the count always equals to 1 and only the last row selected is in my string, can you please help me figure out the problem.<BR><BR>Thanks<BR><BR>Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click<BR> Dim s As String<BR> Dim objitem As CheckedListBox.SelectedObjectCollection<BR> objitem = checklistbox1.SelectedItems<BR> Dim count As Integer = objitem.Count<BR> Dim i As Integer<BR> For i = 0 To count - 1<BR> s = s & objitem(i) & ", "<BR> Next<BR> MessageBox.Show(s)<BR> MessageBox.Show(count)<BR> End Sub