ACCESS 2003 CAMBIARE IL COLORE DI SFONDO DI UN CAMPO TRAMITE PULSANTE

Question

Buongiorno a tutti

Ho creato una maschera dove ho un pulsante che mi permette di abilitare o disabilitare un campo tramite questo routine di evento sul clic.

Vorrei fare in modo che quando clicco per abilitare il campo per poterlo modificare mi cambi colore e quando clicco nuovamente per bloccarlo mi ritorni al colore originale impostato "bianco". 

grazie

Private Sub ComandoModificaRuolo_Click()

With Me!DescrizioneRuoloContatto

    .Locked = Not .Locked

End With

End Sub

Answer 1

Ok, allora devi usare la proprietà BackColor ad es.:

Private Sub Nominativo_Click()

If Nominativo.BackColor = RGB(255, 255, 255) Then

   Nominativo.BackColor = RGB(255, 0, 0)

Else

   Nominativo.BackColor = RGB(255, 255, 255)

End If

End Sub

Mimmo

Answer 2

Ciao Mimmo 

ho risolto avevo dimenticato di togliere la formattazione.

Answer 3

Grazie Mimmo

Ho modificato la rountine ma quando clicco sul campo con il mause e quindi c'è il focus

da rosso ritorna bianco. Io vorrei che se clicco il pulsante modifica , posso modificare il campo e lo sfondo diventi rosso se cliicco nuovamente il pulsante il campo sia bloccato e il colore di sfondo bianco. Per tua comodita ti incollo la rountine dove ho inserito la tua parte. Probabilmente ho sbagliato qualcosa.

Private Sub ComandoModificaRuolo_Click()

With Me!DescrizioneRuoloContatto

    .Locked = Not .Locked

End With

If DescrizioneRuoloContatto.BackColor = RGB(255, 255, 255) Then

   DescrizioneRuoloContatto.BackColor = RGB(255, 0, 0)

Else

   DescrizioneRuoloContatto.BackColor = RGB(255, 255, 255)

End If

End Sub

Answer 4

Buongiorno

Forse non mi sono spiegato bene , la routine che ho riportato funziona perfettamente deve essere solo modificata per fargli cambiare anche il colore di sfondo.

Esempio:

Quando clicco sul pulsante della maschera sblocco il campo (quindi posso scrivere dentro il campo) e lo stesso cambia colore, viceversa cliccando nuovamente blocco il campo(quindi non posso scrivere) e ritorna di colore bianco. Di default il campo deve essere bloccato e lo sfondo di colore bianco.

Answer 5

Ciao,

dal tuo esempio interpreto

.Enabled =  Not .Enabled

Mimmo