Private Sub ListView1_DragOver(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.DragEventArgs) Handles ListView1.DragOver
        If Not Me.ListView1.GetItemAt(e.X, e.Y) Is Nothing Then
               '// wie auch immer
        End If
End Sub