saludos, pues mira... yo no sé si sea el efecto del foro pero aqui:
'Actualiza la información
gs_Consulta = "Update Datos se
t" & _
"Codigo = " & CStr(Me.txt_codigo.Text) & _
donde señalo en negrita; quizá te falte un espacio pero no sé si te marque error o q onda... para mi; la instruccion queda asi: "Update datos se
tCodigo = '<tucodigo>'..."
Espero haberte ayudado, saludos...
Aparte, como consejo; ¿porque no utilizas un Commandbiulder y una sola conexion parra que automatizes tus operaciones SQL? Te dejo un enlace para que lo cheques...
Generar Comandos con SQLCommandBuilder