VisualBasic - Funzione Split

ho una serie di dati quali nome, cognome e città di appartenenza, ma in una forma irregolare e teoricamente illeggibile e scorretta grammaticalmente. Il carattere cancelletto (#) presente nella stringa mi consente di avere un utile riferimento per dividere la stringa come meglio conviene.

Si crei un nuovo EXE standard, si inserisca sulla Form una Label di nome lblSplit e si acceda alla Sub Form_Load(); nella parte generale si inserisca il seguente codice:

Option Explicit
Dim stringa As String
Dim s() As String
Dim i As Integer

dove s() è una stringa di tipo Array che utilizzerò per lo Split().

Nella Sub, invece, si inserisca il seguente codice:

Private Sub Form_Load()
    i = 0
    stringa = "Giuseppe#Contino#Lecce"
    s = Split(stringa, "#")
    For i = 0 To UBound(s)
        lblSplit.Caption = lblSplit.Caption & s(i) & vbCrLf
    Next
End Sub

Utilizzando la sintassi

Split(stringa, carattere di riferimento)

otterrò in output sulla Label

Giuseppe
Contino
Lecce

Ricordo che, come un Array, il conteggio degli item parte da zero (0) fino ad N.