[Resolvido]Duplicação de Registos numa ListBox

Boa tarde,
Tenho uma BD que tem vários formulários para várias funções a minha dúvida é a seguinte:
1. Tenho o FRM_MENU abro o FRM_PESQUISA
2. No FRM_PESQUISA aparece um formulário de pesquisa com uma listbox de todos os clientes
3. Faço duplo click no cliente pretendido e abre outro formulário (FRM_UTENTES) com todas as informações desse utente
4. Dentro do FRM_UTENTES existe outro botão que abre o formulário (FRM_TERAPEUTICA) que vaiu buscar o nome do utente selecionado e permite efectuar através de vários botões imprimir relatórios diversos
5. Dentro deste último formulário (FRM_TERAPEUTICA) criei um botão de sair. Sai do FRM_TERAPEUTICA e abre o FRM_MENU novamente
Até aqui funciona tudo bem, mas quando abro novamente o FRM_PESQUISA o que acontece é que desaparece o primeiro nome do utente da listbox e repete o nome do cliente que foi selecionado.
Exemplo:
Nome
Ana
Carlos
Miguel
Sandra
Teresa
FRM_MENU ------ FRM_PESQUISA faço duplo click na Sandra, abre o FRM_UTENTES com toda a info da Sandra, carrego no botão "Terapêutica" que abre o FRM_TERAPÊUTICA saio através do botão sair e
vou novamente para o FRM_MENU.Ao carregar novamente no botão do FRM_PESQUISA o que acontece é que desapareceu o primeiro utente da listbox (Ana) e duplica a Sandra (Fica Carlos,Miguel,Sandra,Sandra e Teresa). Se selecionar o Miguel duplica o MIguel e apaga o Carlos que passou a ser o primeiro registo (Fica Miguel,Miguel, Sandra e Teresa).

Cantu bom dia,

Fica difícil ajudar com tanta informação sem que haja um exemplo para analisarmos.
Disponibilize uma cópia do teu sistema (somente partes envolvidas) para análise e possivel solução.

[]'s

FIM

Boa tarde,

Envio em anexo em ficheiro.
Para testar os procedimentos são os seguintes:
1. No FRM_MENU abrir o FRM_CONSULTA_UTENTES através do botão "Utentes"
2. No FRM_CONSULTA_UTENTES selecionar um utente (não pode ser o primeiro) Exº Beatriz e fazer duplo click
3. Vai abrir o FRM_UTENTES com o utente selecionado
4. Selecionar o botão "Terapêutica" e irá abrir o FRM_TERAPEUTICA com o nome do utente selecionado
5. Fazer click no botão "Sair" do FRM_TERAPEUTICA" e irá novamente para o FRM_UTENTES
6. No FRM_UTENTES clicar no botão "Sair" e irá para o FRM_CONSULTA_UTENTES e acontece que no listbox apagou o primeiro utente
e temos dois registos da "Beatriz"

Cumprimentos

Olá Alberto,

Fiz alguns ajustes no teu sistema, e também criei a variável global "vgIDU", que assume o ID do Utente para as pesquisas.
Mudei a propriedade de Dados "Entrada de Dados = Sim" dos formulários "FRM_TERAPEUTICA" e "FRM_UTENTES", que são carregados Em Branco, mas que Ao Carregar o form, são filtrados pela variável global.

OBS: O utente "CARLOS MIGUEL PIRES GUILHERME" ficou duplicado devido aos testes.

É isso.

Espero ter ajudado.

Boa sorte

Boa tarde,

A funcionar "quase" perfeitamente. Digo "quase" porque pegando no nome que estava duplicado e ao carregar em "Editar" consegui alterar o nome e quando saí a listbox não estava actualizada, tive que sair e entrar novamente para ficar actualizada.

Actualizei a variável global nos botões "Editar" e "Consultar".


Cumpimentos

Alberto,

Copie e cole a instrução abaixo no formulário "FRM_CONSULTA_UTENTES":

Código:


Public Function fncAtualizaLista()

    Me.LSTUTENTES.Requery

End Function


Em todos os formulários que fazem a chamada do formulário "FRM_CONSULTA_UTENTES", copie e cole a instrução abaixo:

Código:



Private Sub Form_Unload(Cancel As Integer)
   
   If CurrentProject.AllForms("FRM_CONSULTA_UTENTES").IsLoaded = True Then
       Form_FRM_CONSULTA_UTENTES.fncAtualizaLista
   End If
   
End Sub



Desta forma, a lista de utentes será atualizada.

É isso

Espero ter ajudado.

[]'s

FIM

Boa tarde,

Ficou óptimo. Muito obrigado pela ajuda