Form.RecordSource = "SELECT [GÜNLÜK GİRİŞ].[Kayıt No], [GÜNLÜK GİRİŞ].[Üye Kayıt], [GÜNLÜK GİRİŞ].[İşlem Tarihi], [GÜNLÜK GİRİŞ].[Gelmesi Gr Tarih], [GÜNLÜK GİRİŞ].[Teslim Tarihi], [GÜNLÜK GİRİŞ].Adı, [GÜNLÜK GİRİŞ].Soyadı, [GÜNLÜK GİRİŞ].Flim, [GÜNLÜK GİRİŞ].İşlemCinsi, [GÜNLÜK GİRİŞ].Türü, [GÜNLÜK GİRİŞ].Emanet, [GÜNLÜK GİRİŞ].[Alınan Ücret], [GÜNLÜK GİRİŞ].[Gecikme Ücreti], [GÜNLÜK GİRİŞ].işaret, IIf(IsNull([Teslim Tarihi]),'1','0') AS Boş FROM [GÜNLÜK GİRİŞ] WHERE (((IIf(IsNull([Teslim Tarihi]),'1','0'))='1'))"
Butonun tıklandığında olayına aşağıdaki kodu yaz.