[VBA/ACCESS] Modifica colore controlli all'acquisizione/perdita del focus

[Jashin]

Salve a tutti,

vi illustro il mio problema con VBA. Ho una maschera in Access in cui sono contenute numerose caselle di testo. Io voglio semplicemente fare in modo che quando la casella acquisisce il focus il suo sfondo diventi giallo, quando lo perde bianco. In sè la cosa è semplicissima da realizzare sfruttando gli eventi Got_Focus e Lost_Focus delle singole caselle di testo. Il problema è che sono quasi 50 caselle e non voglio perdere 2 ore a scrivere casella per casella il codice in Got_Focus e Lost_Focus...allora mi sono domandato: è possibile con poche righe di codice ovviare al problema???

Grazie mille a tutti in anticipo per l'aiuto!

Jashin

[mentos]

Potresti indicizzare le varie caselle di testo ed utilizzare un solo got_focus e un solo lost_focus.
Mi spiego meglio:
Le caselle di testo fatte così:
Testo(0)
Testo(1)
Testo(2)

Gli eventi:
Private Sub Testo_GotFocus(Index as integer)
testo(index).backcolor=vbyellow
End sub

Private Sub Testo_LostFocus(Index as integer)
testo(index).backcolor=vbwhite
End sub