ListBox via Code scrollen Ein Beispiel, wie sich eine ListBox ohne Verwendung der Scrollbalken nach oben bzw. unten scrollen lässt.
Autor:   Dieter Otter	Bewertung:	Views:  17.839
www.tools4vb.de	System:  Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Nachfolgendes Beispiel zeigt, wie man den Inhalt einer ListBox via Code nach oben bzw. nach unten scrollen kann. Hierzu verwendet man einfach die TopIndex-Eigenschaft der ListBox und erhöht bzw. vermindert diese um den Wert 1.

Private Sub btnUp_Click(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles btnUp.Click
 
  ' ListBox-Inhalt nach oben scrollen
  With ListBox1
    If .TopIndex > 0 Then .TopIndex -= 1
  End With
End Sub

Private Sub btnDown_Click(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles btnDown.Click
 
  ' ListBox-Inhalt nach unten scrollen
  With List1
    .TopIndex += 1
  End With
End Sub

Auch lässt sich über die TopIndex-Eigenschaft ganz einfach an den Anfang bzw. das Ende der Liste springen:

Private Sub btnHome_Click(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles btnHome.Click
 
  ' An den Anfang springen
  ListBox1.TopIndex = 0
End Sub

Private Sub btnEnd_Click(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles btnEnd.Click
 
  ' An das Ende springen
  With List1
    .TopIndex = .Items.Count - 1
  End With
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.