split di un campo di tabella {VB}

[ladyBlu]

ehi, ho trovato; scrivi quello che ti posto e vedi se funziona. a me ha funzionato.

Private Sub Command1_Click()
Dim MyString

Text1.Text = "ADD,AFD,AGF"
Text2.Text = ",AFD"

MyString = Split(Text1.Text, Text2.Text)
For i = 0 To UBound(miaVar)
MsgBox MyString(i)
Next i

End Sub