里面的listview,怎么样获取当前选中的行号.

Dim a,i As Integer
For i = 0 To Me.ListView1.Items.Count - 1
If Me.ListView1.Items(i).Selected = True Then
a = i + 1
MsgBox("你选中了第" + CStr(a) + "行")
End If
Next

要这么复杂啊

就一句而已了。Me.ListView1.Items(i).Selected

i怎么样才知道呢,我就是要自动货的这个i

刚好用到``  借用``

好

For Each m As Integer In ListView1.SelectedIndices
Next