Formun geçerli olduğunda olayına
If IsNull(Me.Metin4) Or Me.Metin4 = "" Then
Me.Metin4.Format = "@;[Red]""(Zorunlu Alan)""" & ""
Else
Me.Metin4.Format = "Short Date"
End IfMetin4'ün odaklanıldığında olayına
Me.Metin4.Format = "Short Date"Metin4'ün odaklanma sonlandığında olayına
If IsNull(Me.Metin4) Or Me.Metin4 = "" Then
Me.Metin4.Format = "@;[Red]""(Zorunlu Alan)""" & ""
Else
Me.Metin4.Format = "Short Date"
End Ifkodu ekleyerek deneyiniz.


