aslında buna benzer kodları "turadim" alanından gelen diğer metin kutuları için de yazmalısınız
Private Sub Report_Open(Cancel As Integer)
If Nz(DCount("*", "t_aylikGecici", "[Turadim]='Antifriz'"), 0) < 1 Then
Me.Antifriz.ControlSource = ""
me.AccessTotalsAntifriz.ControlSource = ""
End If
End Sub