' Populate the list box using an array as DataSource. 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")) ListBox1.DataSource = USStates ' Set the long name as the property to be displayed and the short ' name as the value to be returned when a row is selected. Here ' these are properties; if we were binding to a database table or ' query these could be column names. ListBox1.DisplayMember = "LongName" ListBox1.ValueMember = "ShortName"