Aktuellen ListBox-Eintrag unter dem Mauszeiger ermitteln (.NET) Hier wird gezeigt, wie sich der aktuelle Eintrag, der sich unter dem Mauszeiger befindet, innerhalb einer ListBox ermitteln lässt.
Autor:   Dieter Otter	Bewertung:	Views:  17.664
www.tools4vb.de	System:  WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Mit nachfolgendem Code wird gezeigt, wie sich der aktuelle Eintrag, der sich unter dem Mauszeiger befindet, innerhalb einer ListBox ermitteln lässt.

Private Sub ListBox1_MouseMove(ByVal sender As Object, _
  ByVal e As System.Windows.Forms.MouseEventArgs) _
  Handles ListBox1.MouseMove
 
  With ListBox1
    ' ListIndex anhand der Mausposition ermitteln
    Dim p As Point = .PointToClient(Cursor.Position)
    Dim index As Integer = .IndexFromPoint(p)
    If index >= 0 Then
      ' Text des Eintrags unter dem Mauszeiger
      Dim sText As String = .Items(index).ToString
 
      ' Eintrag in einem Label-Control anzeigen
      Label1.Text = sText
    Else
      ' Maus befindet sich nicht auf einem Eintrag
      Label1.Text = ""
    End If
  End With
End Sub

Private Sub ListBox1_MouseLeave(ByVal sender As Object, _
  ByVal e As System.EventArgs) Handles ListBox1.MouseLeave
 
  ' Label-Inhalt löschen
  Label1.Text = ""
End Sub

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.