Per quanto riguarda l'indentazione e altri tag guarda qui.
In VB c'è la funzione Split che restituisce un'array di sottostringhe estrapolate da una stringa principale e delimitate da un carattere a scelta:
codice:
Dim StrX As String
Dim VettStrX() As String
Dim Cont As Integer

StrX = "A,B,C"

VettStrX() = Split(StrX, ",", -1)
For Cont = 0 To UBound(VettStrX)
  MsgBox VettStrX(Cont)
Next Cont