Pessoal acho que descobri o motivo olha só a minha consulta
consulta ("SELECT * FROM TabFaturamento WHERE Data Like '" & Trim(txtDataAtual) & "' and Mes Like '" & Trim(cmbMes) & "' and Ano Like '" & Trim(cmbAno) & "' ORDER BY Mercadoria Asc")
ela esta correta só que o problema é no banco de dados, pois os campo data da minha tabela tambem tem que ser do tipo Texto e não data. Eu coloquei ele do tipo texto e funcionou certinho a consulta.