Like this
"SELECT TblComplianceLine.ComplianceNo, TblComplianceLine.Description, TblComplianceLine.Comments, TblComplianceLine.AuditDate, TblComplianceLine.PointsLost
FROM TblComplianceLine
WHERE (((TblComplianceLine.AuditDate)="
& "#" &
selectdate()
& "#" &
") AND...