guys..

i really cant figure out whats wrong with my code..

an error that says "too few parameters, expected 1"

i used

Dim findit As String
findit = lblFind.Caption

Set rsProject = dbSSS.OpenRecordset("SELECT * FROM Project WHERE Status = findit ")

InitGrid
FillGrid