Ho provato a buttare giù del codice, ma ho dei problemi dato che non so come sviluppare sottoforma di codice dei passaggi
Allora, vediamo quello che ho fatto:

PRENDO L'INSIEME DEI MESSAGGI con la pressione del Button e li salvo in "messaggi", divisi tramite la funzione Split (e qui mi sa c'è il primo errore)
codice:
Dim messaggi As String()
messaggi = TextBox8.Text.Split(New Char() {";"})
Dopodichè non ho capito bene il discorso della funzione Scope, mi puoi aiutare su questo?