先用ListView1_MouseDown事件确定鼠标点击位置的坐标(Xpos, Ypos)
然后用If ListView1.HitTest(Xpos, Ypos) Is Nothing Then ... 判断是否点击在空白处,
再用Set Item = ListView1.HitTest(Xpos, Ypos)得到点击的处的Item
上面的如果不行的话
就用
--------------------------------------------------------------------------------
Private Sub ListView1_BeforeLabelEdit(Cancel As Integer)
MsgBox ListView1.SelectedItem.Text
End Sub
Private Sub ListView1_AfterLabelEdit(Cancel As Integer, NewString As String)
MsgBox NewString '编辑好后的 字符串
End Sub