BoldSignEasily embed eSignatures in your .NET applications. Free sandbox with native SDK available.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles Button1.Click
Dim txt As String = ""
Dim rangeList As GridRangeInfoList = Me.ListBox1.Grid.Selections.GetSelectedRows(True, False)
Dim range As GridRangeInfo
Dim row As Integer
For Each range In rangeList
For row = range.Top To range.Bottom
If txt.Length > 0 Then
txt = txt & ","
End If
txt = txt & Me.ListBox1.Grid(row, 1).Text
Next
Next
Console.WriteLine(txt)
End Sub