Lo so che vi sto massacrando!!!

Non riesco a capire se esite un modo di caricare valore e nome diversi in una list box con il metodo che segue o analogo

Dim values As New ArrayList()

values.Add("Item 1")
values.Add("Item 2")
values.Add("Item 3")
values.Add("Item 4")
values.Add("Item 5")
values.Add("Item 6")

ListBox1.DataSource = values
ListBox1.DataBind()