mit folgendem Code über einen SpinButton kann ich in ListBox auf und ab schrollen:
Private Sub SpinButton1_SpinDown()
If ListBox1.ListIndex > 0 Then
ListBox1.Selected(ListBox1.ListIndex - 1) = True
Else
ListBox1.Selected(ListBox1.ListCount - 1) = True
SpinButton1.Value = ListBox1.ListCount - 1
End If
ListBox2.ListIndex = ListBox1.ListIndex
ListBox3.ListIndex = ListBox1.ListIndex
ListBox6.ListIndex = ListBox1.ListIndex
End Sub
Private Sub SpinButton1_SpinUp()
If ListBox1.ListIndex + 1
Im ListBox können max. 15 zeilen eingetragen werden, soweit so gut, der SpinButton macht seine Arbeit, aber manchmal sind weniger Einträge evtll. nur 5 und der SpinButton geht trotzdem bis zum Schluss als es wäre der ListBox voll.Gibt es eine Möglichkeit das beim letzte Eintrag, ob 16 oder 3 oder 7 das der SpinButton von Vorne anfängt?
Vielen Dank in Voraus
Antonio