veo que te falta una comilla después de
[tit_depto] ='" & txtTit_depto.Text & "
A lo mejor es por eso.
En vez de esto:
Cita: comando.CommandText = "UPDATE td_deptos SET [nom_depto]='" & txtNom_depto.Text & "', [tit_depto] ='" & txtTit_depto.Text & " WHERE [cve_depto]=" & Integer.Parse(txtIndice.Text)
prueba:
Cita: comando.CommandText = "UPDATE td_deptos SET [nom_depto]='" & txtNom_depto.Text & "', [tit_depto] ='" & txtTit_depto.Text & "' WHERE [cve_depto]=" & Integer.Parse(txtIndice.Text)