Roque este ejmplo es en access 2000 y usa la biblioteca MIcrosoft DAO 3.6 Object Library, o sea que para usarlo debe de tener esa referencia marcada en accees, es un ejemplo sacado de este mismo foro.
Bien en el formulario te declaras una funcion como el ejemplo de abajo, el nombre que le des es indeferente, se lo puedes cambiar
Private Bsq as DAO.Recorset
Set Bsq = CurrentDb.OpenRecordset("Select Proveedor From Nombre _Tabla Where Proveedor Like '" & Me.Cuadro_combinado.Value & "'")
If Bsq.EOF Then
MsgBox " El Proveedor tecleado no se encuentra en la Base de Datos, Registre primero los Datos ", vbInformation, "!!! Datos Inexistentes ¡¡¡"
Me.Cuadro_combinado.Value = ""
Me.Cuadro_combinado.SetFocus
Bsq.Close: Set Bsq = Nothing
Nota las comillas que ves despues del Like es un simpli ( ' ) y una doble ( " ), y las que estan al final son una doble una simple y una doble.
espero que te sirva, saludos