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:     [ Jetzt bewerten ]	Views:  18.597
https://www.tools4vb.com	System:  Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 2 Bewertung insgesamt: sehr gut Durchschnittliche Bewertung: 5.0 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

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