If Weekday(Me.Montaj_Tarhi) = 7 Then
Me.Montaj_Tarhi = DateAdd("d", 2, Me.Montaj_Tarhi)
End If
Formun geçerli olduğunda olayına aşağıdaki kodu yazarak deneyiniz.