Visual Basic - Problema al guardar con Adodc + sentencia sql

Buenas estoy trabajando desde hace tiempo en un programita, soy algo novato.

El problema es que tenia el programa y podia guardar bien en una base de datos access y mostrar con un mshflexgrid. todo funciona bien pero cuando agrego al codigo esta parte de sql para q no repita codigos al guardar me sale error en clausula FROM q la e revisado y todo esta bien escrito. ese cogido lo copie de un programa bien echo en clases.

Cadena = XXXXXXXXXXXXX esta bien no la puse porq es larga.
sqlEquipo = "Select * from Equipo"
sqlEquipo = sqlEquipo & "where trim(Codigo)= '" & Trim(Codigo.Text) & "'"
Tabla1.Open sqlEquipo, Cadena, adOpenDynamic, adLockOptimistic
If Tabla1.EOF Then
Tabla1.AddNew
End If
With Tabla1
.Fields!equipo = nombre.Text
.Fields!liga = liga.Text
.Fields!Codigo = Codigo.Text
.Fields!Imagen = Destino
.Update
Set Tablaequipos.DataSource = Tabla1
Tabla1.Close
Form_Load
End With
End Sub

Les agradezco su ayuda

Creao que el problema lo tienes en esta sentencia:

sqlEquipo = sqlEquipo & "where trim(Codigo)= '" & Trim(Codigo.Text) & "'"

creo que debería ser asi:

sqlEquipo = sqlEquipo & "where Codigo = '" & Trim(Codigo.Text) & "'"

Espero que sea la respuesta.

Saludos