Private Sub malist_Validating(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles malist.Validating Dim indexes As ListView.SelectedIndexCollection = Me.malist.SelectedIndices Dim index As Integer Dim myString As String = "" For Each index In indexes myString += index & vbTab Next MessageBox.Show(myString) End Sub