Try putting a parenthesis in case your confused.

Code:
"SELECT Code, Tdate FROM glt WHERE (tDate BETWEEN '" & TxtDtFrom & "' AND '" & TxtDtTo & "') " & _
             "AND (Code = " & RsDrt.Fields("Code").Value & ")"