Dim zahlen As List(Of Integer) = GetLottoReihe()
 
'Umwandlung der Zahlenfolge in eine Zeichenfolge
Dim display_zahlen As New System.Text.StringBuilder
 
For i As Integer = 0 To zahlen.Count - 1
    display_zahlen.Append(zahlen(i) & ", ")
Next i
 
show_lottozahlen.Text = display_zahlen.ToString