[VB6] Estrarre una sottostringa da una stringa

[MItaly]

Assumendo che la RichTextBox si chiami rtb e che la stringa da inserire si trovi nella variabile "stringa":

rtb.SelLength=0
rtb.SelText=stringa