zamanlama kodunu aşağıdaki kodla değiştirip dener misiniz
gerçi bu kod da her yarım saatte bir aynı soruna sebep oluyor ama şimdilik yapabildiğim bu maalesef

Private Sub Form_Timer()

Me.txtSaat.Requery



If Format(Time(), "HH:mm") = Format(Time(), "HH:00") Or Format(Time(), "HH:mm") = Format(Time(), "HH:30") Then

Call LblRezerv

Me.txtTarih.Requery

End If

End Sub