Query which accept date from the form and search into the table?

[Imdabaum]

Sounds like you want a parameter query.
[VBA]
Set parameter xDate Date/Time;
Select * From Table1 Where Date = [xDate]
[/VBA]

Or if you are trying to get the date from existing data
[VBA]
Select * From Table1 Where Date = Forms![frmName].dateField
[/VBA]