Eu conectei um banco usando a instrução SQL, como que eu faço para ele alterar um dado no banco se ele nao me habilita o Edit?

Dim codigo as Integer

codigo = txtcodigo.text

Dim RSeditar = conexao.OpenRecordset(" SELECT Cadcli.cod, CadCli.nome, CadCli.Endereco FROM  Cadcli Where Cadcli.cod = "& codigo &"")

RSeditar.edit

   '  Supondo q o código seje autonumração

   RSeditar("nome") = txtnome

   RSeditar("ebdereco") = txtendereco

RSeditar.update