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 önceyeCall LblRezerv