Ho la necessità di eseguire una replace su una textbox qual'ora in essa sia digitato un carattere diverso da numerico, quindi lettere, spazi, ecc...
Ad esempio se io nel campo scrivo "R " (una lettera più uno spazio), esso deve diventare pari a "".
Come posso fare? :master:
Grazie anticipatamente.
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Hai gia' detto tutto tu ...
Se Key non e' consentito ... allora
Text1.Text = Replace(Text1.Text, Key, "")
Se Key corrisponde alla pressione di un tasto, cosa mi distingue se trattasi di numero o lettera?
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Beh ... dal codice ASCII ... mi sembra evidente ...
Ma così mi devo andare a fare una serie di if per ogni tasto premuto!?VVoVe:
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Che vuoi dire?
Posta il codice dell'evento KeyPress ...
Non ho il codice sottomano adesso, non posso postartelo.
Ti preciso che comunque si tratta di una macro VB6 applicata ad un foglio Excel.
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Beh ... e lo dici adesso ...!
Intanto non e' VB6 per Excel ma VBA per Excel ... VB6 e' una cosa e VBA e' un'altra ...
E in questo caso non vado oltre perche' di VBA non me ne occupo (e non me ne voglio occupare) ...
Grazie lo stesso per i tuoi consigli.
Puoi commutare il titolo da VB6 a VBA, grazie!
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Mi dispiace ... ma se vuoi postare il codice lo leggero' comunque ...
Permessi di invio
Rispondi quotando