modificato in questo modo funziona BENISSIMO:
DIM stringa AS String
IF InStr(Txt_Note.text, Chr(009)) > 0 THEN
stringa = Txt_Note.Text
stringa = Replace$(stringa, Chr(009), "prova")
Txt_Note.Text = stringa
Message.Info(Txt_Note.text)
ENDIF
praticamente hai dimenticato di porre il risultato del replace in una variabile
:-)
io da vero sprecone di risorse del pc ho aggiunto una variabile stringa
ma si può evitare:
IF InStr(Txt_Note.text, Chr(009)) > 0 THEN
Txt_Note.Text = Replace$(Txt_Note.text, Chr(009), "prova")
Message.Info(Txt_Note.text)
ENDIF