Dim strings(9) As String  ' 10 String-Elemente

strings(0) = "xxx" ' Wert setzen Element 0
Dim myvar As String = strings(0) ' Wert "lesen" Element 0

Dim liste As New List(Of String)
liste.Add("xxx")
myvar = liste(0)
liste.RemoveAt(0)

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist