Индекс элемента под курсором

[Warn]

Всем привет.
На форме лежит ListView, заполненный некоторым кол-вом элементов. Форма активна, ListView-нет. Как узнать индекс элемента под курсором при наведении его на ListView без клика? Поиск в яндексе выдал только пример слова под курсором. Мне он не подходит. Либо нужно всё значение строки, чтобы через перебор найти её индекс, либо как-то проще. Есть ли более простое решение?

[EUGY]

' просто
Private Sub ListView1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
Dim li As ListItem
Set li = ListView1.HitTest(x, y)
If Not li Is Nothing Then Debug.Print li.Text
End Sub

[Warn]

Шикарно, спасибо! Респект за оперативность