主题：处理 listview 选定的多行

Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
Dim vls As String = ""

'lvw.SelectedRows(0)

For i As Integer = 1 To lvw.SelectedRows.Count - 1
    Dim vr As WinForm.ListViewRow = lvw.SelectedRows(i)
Next