Visual Basic para Aplicaciones - Base de Datos

Tengo una Aplicacion en Visual Basic con Acceso a base de datos en Microsoft Access. Necesito Realizar una consulta con parametros intoducidos por el usuario,

Tengo una Tabla Personales con los siguientes campos:
-Expediente, Nombre, Direccion, ...

Necedito Realizar una consulta con parametros que sean introducidos
por el usuario. Lo estoy realizando con ciertos controles enlazados como textbox a un control Data, para esto estoy utilizando la propiedad Recordsource para poder realizar una Clausula Sql.

El problema es el siguiente:

dim Expe as string

Expe = inputbox ( "Expediente":)

Data1.Recordsource = "Select * " & _
"From Personales " & _
"Where Personales.Expediente = Expe "
Data1.Refresh

En la Clausula Where manda un error por que el Criterio a encontrar en este caso (Expe) esta escrito sin apostrofos. ( ' Expe ' )

Como puedo realizar esta consulta sin necesidad de poner los Apostrofos a la consulta utilizando el control Data y su Propiedad Recordsource, es Decir:

" Where Personales.Expedinte = Expe "

Prueba con esto:
Data1.Recordsource = "Select * " & _
"From Personales " & _
"Where Personales.Expediente = " & Expe
Data1.Refresh

Prueba con esto:
Data1.Recordsource = "Select * " & _
"From Personales " & _
"Where Personales.Expediente = '" & Expe & "'" (El apostrofe va antes de las comillas y al final entre comillas)