strWhere = Me.Ara_Adi
Me.Filter = "[Adi] Like '*" & strWhere & "*'"
Me.FilterOn = True
Me.Requery
Ada göre arama yapmak için aşağıdaki kodu Ara_Adi textbox'ının Güncelleştirme Sonrasında olayında kullanarak ada göre filtreleme yapabilirsiniz. Diğer kutucuklara göre uyarlamasını yapın.