Salve a tutti,
ho un campo e un datacombo

Ho il datacombo con questi dati Listfield: ID_esame
Rowsource: adoesami

Ho il campo descrizione Datasource: adoesami
Datafield: descrizione

Al caricamento della pagina faccio la connessione.

Ho poi inserito il seguente codice:
Private Sub DataCombo1_Change()
adoesami.RecordSource = "select * from tab_esami WHERE ID_esame ='" & DataCombo1.Text & " '"
adoesami.Refresh
End Sub

Per fare inmodo che cambiando il valore dell'id contenuto nel combo cambiasse la descrizione.
Non riesco e quando cambio il dato mi appare il seguente errore:
Tipi di dati non corrispondenti nell'espressione criterio

Cosa sbaglio?
Grazie 1000.