Listview1 - VB

Формулировка задачи:

Подскажите в коде

Private Sub ListView1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
If Button = vbRightButton Then
Start.PopupMenu mnu
End If
End Sub

что необходимо изменить чтобы контекстное меню открывалось только при нажатии правой клавишей мыши по какой нибудь строчке а не при нажатии в любом месте listview. Заранее огромное спасибо!

Решение задачи: «Listview1»

textual
                            Листинг программы 
                        
                            x > ListView1.SelectedItem.Left And x < (ListView1.SelectedItem.Left + ListView1.SelectedItem.Width) And y > ListView1.SelectedItem.Top And y < (ListView1.SelectedItem.Top + ListView1.SelectedItem.Height)