Allora..usando la funzione InStr trovi dove è l'uguale (=) del tipo pos = InStr(stringatesto, "=")+2 (il + 2 deriva dal fatto che non voglio compaiano i caratteri = e spazio), poi, per cercare la [ dopo l'uguale si fa pos2 = InStr(pos, stringatesto, "["). a questo punto, per avere la parola, usi parola = Mid( stringatesto, pos, pos2-pos) . Per iterare all'infinito, puoi, ad esempio fare:
Codice:
pos = 0
For i = 0 to N
pos = InStr(pos, stringatesto, "=")+2
pos2 = InStr(pos, stringatesto, "[")
parola = Mid( stringatesto, pos, pos2-pos)
text[i].text = parola
Next
Naturalmente in questo caso ho dovuto usare un "vettore" di textbox...spero che tu sappia come si creano
Ciao
Nicola