aşağıdaki çalışmada yer alan FrmYoklama formundaki butona basınca sadece ilgili yıl/ay girilince sadece girilen döneme ait kayıtlar listelenir
FrmYoklama yoklamanın gösterildiği formdur
FrmyoklamaAlma yoklamanın yapıldığı formdur
buton kodu:

Private Sub BtnGuncelle_Click()

If Len(Me.AkAy & "") = 0 Or Len(Me.TxtYil & "") = 0 Then

MsgBox "yıl yada ay belirtilmemiş"

Exit Sub

End If

Me.RecordSource = "SQLYoklama"



For xGun = 1 To 31

Controls("[" & xGun & "]").ControlSource = ""

Next xGun





Dim fld As Field

For Each fld In Me.RecordsetClone.Fields

Controls("[" & fld.Name & "]").ControlSource = fld.Name

Next fld



End Sub