kodu güncelledim 1 defa kontrol edip bırakıyor

Private Sub Form_Timer()

Me.txtSaat.Requery

If Me.txtSaat.Value = Format(Me.txtSaat.Value, "HH:00:00") Or Me.txtSaat.Value = Format(Me.txtSaat.Value, "HH:30:00") Then

Call LblRezerv

Me.txtTarih.Requery

End If

End Sub

 ayrıca formgirişin load olayına da aşağıdaki kodu ekleyin end sub kısmından hemen önceye

Call LblRezerv