Hent value fra næste item i ListBox

Hejsa

Jeg har en listbox med en række værdier. Jeg har behov for at kende value for den valgte og den efterfølgende. jeg kan nemt finde value for den valgte men hvordan finder jeg den for den efterfølgende????

Her er ligdt kode:


Dim intIndex As Integer
intIndex = lbRightPane.SelectedIndex
   
Dim intCount As Integer
intCount = lbRightPane.Items.count
   
Dim intSelectedID As Integer
intSelectedID = lbRightPane.SelectedItem.value