Ændre egenskaber på textbox hvis feltet er tomt

Kikker

Dim lngRed As Long, lngYellow As Long, lngBlack As Long, lngWhite As Long
lngRed = RGB(255, 0, 0)
lngYellow = RGB(255, 255, 0)
lngBlack = RGB(0, 0, 0)
lngWhite = RGB(255, 255, 255)
If IsNull(Me.Felt1) Then
Felt1.ForeColor = lngRed
Felt1.BackColor = lngWhite
Else
Felt1.ForeColor = lngYellow
Felt1.BackColor = lngBlack
End If
Me.Refresh

ok, men hvor og hvordan får jeg skrevet det kode? Skal jeg markere textbox'en og noget i properties?

Du kan f.eks indsætte koden i feltets BeforeUpdate event. Eller hvis feltet er afhængig af andre felter, så indsæt den der.

Åbn formularen i designvisning > højreklik på feltet > egenskaber > Fanen hændelser > Vælg f.eks Before Update > Tryk på de 3 små prikker i højre side > Du kommer nu ind i VBA-editoren > kopier koden ind der

Mugs
Har du lavet en festdb vil jeg gerne se den.
oz1bua@wanadoo.dk
Vh Henrik

Sendt

dc > Hvordan går det?

tak for hjælpen :)
sorry jeg ikke har svaret i lang tid...