FATTO!
dotpos=InStr(me.text,".")
if dotpos <> 0 then
MsgBox "Attenzione, inserire la virgola come separatore dei
decimali!"
'me.text=""
me.text=replace(me.Text,".",",")
me.SelStart=dotpos <<<<<----------------------- la
magia sta tutta qui....
else
App.ResetResult()
end if
Il giorno 27/feb/08, alle ore 11:54, Lucio Liberi ha scritto:
Allora... modifico il contenuto dell'EditField... (sempre per il
controllo della virgola/punto come separatore di decimale...)
Ma alla fine, lui, mi mette il cursore all'inizio del testo...
mentre dovrebbe trovarsi in coda, per consentire l'aggiunta degli
altri numeri.
Esempio:
l'utente scrive
123.
appena si inserisce il punto, questo viene cambiato in virgola...
123,
pero', mi trovo il cursore prima dell' 1
I123,
in questo modo se l'utente scrive, i numeri aggiunti verranno prima
dell'1
456123.
il che non va bene...
Come posso fare?
Thanks....
L.
|