Newsgroup: it.comp.appl.access
Titolo: keydown

Come posso trasformare la suddetta rouitin su un modulo in modo da poterla 
utilizzare su svariati controlli di altrettante svariate maschere
Private Sub Testo46_KeyDown(keycode As Integer, Shift As Integer)
If ((keycode = vbKeyTab) Or (keycode = vbKeyUp)) And (Shift = 1) Then
    val1 = True
    Me.Testo42 = val1
    End If
End Sub
Mi fate un esempio?

 ha scritto nel messaggio

Prima di tutto una doppia assegnazione non ha signigicato:
Me.Testo42=true
Poi devi solo copiare il codice nell'evento relativo al controllo in cui 
vuoi metterlo, basta cambiare il nome del controllo (Testo42).
Sib
-- 
http://www.gestionedati.com
 

Nemmeno la singola:
Me.Testo42=((keycode = vbKeyTab) Or (keycode = vbKeyUp)) And (Shift =
1)
Ovviamente è un pò meno leggibile...!
Certo che sei passato dall'oblio all'ossessionante presenza....!
;-) 
Ciao Davide buona domenica.
@Alex

Scusate i miei errori da neofita......
Private Sub Testo46_KeyDown(keycode As Integer, Shift As Integer)
If ((keycode = vbKeyTab) Or (keycode = vbKeyUp)) And (Shift = 1) Then
val1 = True
End If
End Sub
Volevo solo capire se era possibile intercettare tramite una funzione, la 
pressione dei tasti su un controllo n attivo.

 ha scritto nel messaggio 
news:1142754620....@z34g2000cwc.googlegroups.com...
Nemmeno la singola:
Me.Testo42=((keycode = vbKeyTab) Or (keycode = vbKeyUp)) And (Shift =
1)
Ovviamente è un pò meno leggibile...!
Certo che sei passato dall'oblio all'ossessionante presenza....!
;-)
hai paura di perdere clienti? :))
Ciao Davide buona domenica.
@Alex
Ciao ALex
ho visto il tuo ultimo demo: cambiare lo stile sul controllo attivo....però,
pare, che all'uscita non viene ripristinato il vecchio e resti il nuovo.
buona domenica a te e Sib
Daniele

Ciao Daniele.
Spiegalo meglio con parole semplici anche per me...!
Sinceramente non ho capito il Bugs..!
Grazie
@Alex

Se il controllo non è attivo non scatena l'Evento, quindi direi NO non
è possibile.
Però puoi intercettare l'Evento di Form e controllare la stessa
sequenza di tasti
condizionando quello che vuoi.
@Alex

@Alex
Ciao, buona domenica a te.
-- 
http://www.gestionedati.com

 ha scritto nel messaggio

In linea generale no.
Ma dai uno sguardo alla proprietà "Anteprima tasti" della maschera (lo trovi 
nella scheda degli eventi)
Sib
-- 
http://www.gestionedati.com
 

;-)
Addirittura!!
Per 4 messaggi che ho mandato...
Vabbè, vorrà dire che tornerò nell'oblio... forse.
Scherzo Davide ci mancherebbe.
Anzi come vedi ultimamente anche Roberto è un pò impegnato
e negli ultimi mesi la frequenza dei Post è notevolmente diminuita.
@Alex

 ha scritto nel messaggio 
news:1142763876.4...@g10g2000cwb.googlegroups.com...

Ciao Alex
il demo funziona bene con controlli che contengono testo.
con quelli numerici segnala errore run -time 2448
Impossibile assegnare un valore all'oggetto
evidenziando questa riga:
 .Value = StrConv(mC.Value, vbUpperCase)
su attivato di ogni controllo formatta il testo in grassetto, che rimane
anche all'uscita dal controllo.
però chiudendo e riaprendo la maschera il testo ritorna normale.
non so se è un bugs oppure una formattazione voluta.
Daniele 

No deriva dalla non gestione dell'errore che giustamente hai
riscontrato.
E' un Bugs, ma il demo è stato scritto in meno di 5 minuti mentre
Carlo
mi diceva che la soluzione era interessante.....!!!
Ovviamente andrebbe correlato di gestione errori, ma nello specifico
basta non usare il trucchetto in questione e non dovrebbe generare
altre anomalie.
@Alex