' erstmal eine Liste definieren, die Elemente der Liste sind Objekte
' der Klasse USState mit der Property LongName und ShortName
Dim USStates As New ArrayList()
USStates.Add(New USState("Alabama", "AL"))
USStates.Add(New USState("Washington", "WA"))
USStates.Add(New USState("West Virginia", "WV"))
USStates.Add(New USState("Wisconsin", "WI"))
USStates.Add(New USState("Wyoming", "WY"))
' Quelle ist das Array USStates
ListBox1.DataSource = USStates
' angezeigter Wert sind Werte aus der Spalte "LongName"
ListBox1.DisplayMember = "LongName"
' Schlüsselspalte ist der "ShortName"
ListBox1.ValueMember = "ShortName"
' Zugriff auf die Schlüsselspalte
ListBox1.SelectedValue = "Wert" ' String oder Interger, je nach Typ
oder
Dim sWert As String = ListBox1.SelectedValue