Dados correspondentes em duas combobox


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Dados correspondentes em duas combobox

Rogério
não registrado

Postada em 23/03/2007 20:45 hs

DÚVIDA 1- Uso Visual Basic 6 e DAO 3.6. Faço buscas automáticas na combobox de Pacientes e em outra combobox cmbMatPac de matricula do paciente. Tenho 3 tabelas::

TAB_PACIENTES com CodPaciente e NomePaciente.

TAB_PROCEDIMENTOS: com o CodProcedimento e Procedimento.

TAB_ATENDIMENTOS com as chaves primária (Cod Atendimento) e com as chaves secundárias (CodPaciente e CodMatPac) da tabela Paciente.

Como faço para ao buscar o nome do paciente na combobox cmbPacientes automaticamente em tempo real aparecer a matricula (MatPac) na combobox cmbMatPac ??? e o inverso também. Eu queria buscar a matricula do paciente MatPac na combobox cbmPacientes e automaticamente aparecer o nome do paciente na combobox cmbPacientes que fica ao lado. Agradeço desde já Rogério.

Ama

UBERLÂNDIA
MG - BRASIL

Postada em 24/03/2007 01:47 hs

Private Sub Combo1_Change()
Combo2.ListIndex = Combo1.ListIndex
End Sub

Private Sub Combo1_Click()
Combo2.ListIndex = Combo1.ListIndex
End Sub
para valores digitados ou selecionados com mouse desde que ambas combos estejam com dados na posição correspondente code 1 na combo1 corresponde nome 1 na combo2

Rogério
não registrado

Postada em 24/03/2007 03:35 hs

Obrigado pela dica, mas é justamente esta minha dúvida, eu tenho uma tabela tab_pacientes com por exemplo 100 pacientes cadastrados e outra tab_atendimentos onde tem 9 atendimentos dos pacientes já cadastrados. Eu fiz assim , txtCodMun = cmbMunicipios.ListIndex, mas como os index das 2 tabelas nao correspondem saiu errado.

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR