Private Sub Form_Current()
If Me.BitisTrh < Date Then Me.BitisTrh.BackColor = vbRed Else Me.BitisTrh.BackColor = vbWhite
End Sub
az önce denedim bu kod çalışıyoryukardaki kodda eklemeyi unutmuşum 2. "Me.BitisTrh.BackColor"
kodu nereye yazdığınız da önemli form geçerli olduğunda olayına yazılacak