Visual Basic - No me deja guardar en bd access

Tengo un problema al guardar registros por medio del botón de comando me indica que hay un error de sintaxis en mi consulta quisiera ver si me pueden ayudar a encontrar la solución. pongo el código a continuación.

Dim vInsert As String

vInsert = ""
vInsert = vInsert & " insert into proceso_unitab(dpi, nombre, genero, no_asignado, telefono_casa, telefono_movil, trabajo_temporada_pasada, anio, departameto, cargo, jornadas, dia_cita, hora_cita, observaciones, user)"
vInsert = vInsert & " VALUES ('" & txtDpi.Text & "', '" & txtNombre.Text & "', '" & txtGenero.Text & "',"
vInsert = vInsert & " '" & txtNo.Text & "', '" & txtTel.Text & "', '" & txtCelular.Text & "', '" & txtSiNo.Text & "',"
vInsert = vInsert & " '" & txtAnio.Text & "', '" & txtDepto.Text & "', '" & txtCargo.Text & "', '" & txtJornada.Text & "', "
vInsert = vInsert & " '" & txtDiaCita.Text & "', '" & txtHoraCita.Text & "', '" & txtObservaciones.Text & "', '" & txtUser1.Text & "')"

cn.Execute vInsert

Que Visual Basic es???

6.0 y nunca me había pasado esto me parece muy extraño y todos los campos son texto

Al menos indica que lenguaje de programación estás usando no?, ya que no creo que por acá hayan adivinos, sino programadores.

En el catalogador que subi a la sección de códigos lo hago así

Gracias Megamind el nombre de un campo me lo estaba tomando como palabra reservada cambie el nombre del campo y funciono perfectamente igual agradezco tu valiosa ayuda