SQL - ayuda sql access

EN UN CUADRO COMBINADO EN LA OPCION AL NO ESTAR EN LA LISTA YO TENGO ESTE CODIGO: Funciona bien en una base de datos access, lo emigre a un proyecto access con SQL y no me funciona ???? Que estare haciendo mal?????

De antemano gracias por su tiempo

atentamente avacos

Private Sub PACIENTES_NotInList(NewData As String, Response As Integer)
Dim strSQL As String, X As Integer
Dim LinkCriteria As String
X = MsgBox("ESTE PACIENTE NO ESTA REGISTRADO, DESEA REGISTRARLO ?", vbYesNo)
If X = vbYes Then
strSQL = "Insert Into T_pacientes ([Pac_rut]) values ('" & NewData & "')"
'MsgBox strsql
CurrentDb.Execute strSQL
LinkCriteria = "Pac_rut = '" & Me!PACIENTES.Text & "'"
DoCmd.OpenForm "F_PACIENTES1", , , LinkCriteria

Response = acDataErrAdded
Else
Response = acDataErrContinue
End If
End Sub