Non mi funziona...
non da nessun errore ma non mi seleziona nulla...
può essere perchè la text in questione è multiline?

Ho messo la procedura che mi hai passato in generale come ovvio...
e poi l'ho richiamata con:
"SelectText txtrisultato"

Non credo d'aver sbagliato qualcosa...Ma niente da fare...