In dit voorbeeld maken we een array, vullen we die door een string op te splitsen en
Dim sarray() As String
sarray = "1,2,3,4,5,6,7,8,9".Split(",")
Dim teller As Integer
For teller = 0 To UBound(sarray)
MsgBox(sarray(teller))
Next teller
Een toepassing van dit principe zijn tips. Een ander voorbeeld is Lottotrekking.