[Resolvido]Atualizar - Listbox

Pessoal, bom dia.

Um auxílio:

1 - Possuo um formulário para o cadastro de usuários do meu sistema; por uma maior mobilidade existe uma Listbox onde consigo navegar entre os usuários cadastrados.
2 - O usuário Admin, não pode ser deletado e nem editada sua senha; a solução que consegui para impedir isso foi que ao clicar nesse usuário, na Listbox, os campos Login e Senha dele são inativados.

Porém existe uma falha nisso, quando excluo ou clico em salvar em outro usuário o Admin fica "descoberto" ou seja, fica passível de alteração, tanto o seu nome (Login) quanto sua Senha.

Repare que utilizei o código:

Código:

Me.Lista.Requery
Me.Lista.Selected(0) = True
Me.[Lista].SetFocus

Mas não funciona, até seleciona o item, porém como disse antes o usuário Admin fica "descoberto" pois os campos Login e Senha ficam ativados, propiciando assim sua edição.

Obrigada sempre!

Anexo meu BD.

Olá, cara linda
Está muito enrolado: no botão excluir, pode-se seleccionar o Admin, pode-se desactivar a palavra-passe mas não se pode desactivar o botão excluir (por se tratar dele próprio)
Como o Admin ficará sempre fora do âmbito do formulário, pode utilizar o formulário sem ele.
1 - Na origem dos dados do formulário
SELECT * FROM Tab_Usuarios WHERE Login<>'Admin'

2 - Na origem dos dados da Lista
SELECT Id_Usuario, Login FROM Tab_Usuarios WHERE Login<>'Admin' ORDER BY Login;

Espero que lhe sirva

Obrigada Alexandre.

Não tinha pensado nisso, muito bom!

Resolvido!!

Julia!

Esqueci o Resolvido...rs