ciao.
io ho inserito su un form: una textbox, un commandbutton e una label e poi ho scritto il codice seguente:
codice:
Private Sub Command1_Click()
        var1 = Text1.Text
        Label1.Caption = Mid(var1, 2, 3)
End Sub
se Text1.Text="camomilla" la mid restituisce "amo"

ti spiego:
Mid(var1, 2, 3) significa:
Mid(nome Variabile,posizione di partenza,numero di lettere da estrapolare)

Spero di essere stata chiara.