Esquima
06-10-2007, 14:31
TEbho duas combobox uma com vens e outra com os fornecedores...queria que ao escolher um bem a segunda combo ficasse carregada so com os fornecedores que tem esse bem...alguem tem alguma sugestao????
|
View Full Version : vb.net combobox!??!? Esquima 06-10-2007, 14:31 TEbho duas combobox uma com vens e outra com os fornecedores...queria que ao escolher um bem a segunda combo ficasse carregada so com os fornecedores que tem esse bem...alguem tem alguma sugestao???? Zero_Cool_PT 06-10-2007, 14:55 if combobox1 = ao forncedor then combobox2.show lista do k tu keres. é algo nessa linha d raciocinio. ceptrus 06-10-2007, 19:30 no valuechange da primeira combobox tens k fazer uma consulta à tua base de dados de modo a fazeres um select de todos os fornecedores que tenham o artigo selecionado. lês os resultados para uma tabela, depois é so preencher a segunda combobox.. mOrSa 06-10-2007, 21:32 Podes dar aí uma ideia geral da tua base de dados? Dava jeito! Não sei como guardas os valores da relação Fornecedor<->Bem (N para N) mas suponho que tenhas uma tabela intermédia, fruto dessa mesma relação. Assim, obtens os bens através de um query -> "Select Descricao from Bens" e preenches a combobox1, por exemplo. O evento SelectedIndexChanged da combobox1 é despoletado quando alteras o índice desta combo e o valor que prentendes será o ComboBox1.SelectedItem. Aqui encontrarás o valor que deves usar na nova query. O problema, acredito eu, ser a nova query para devolver os fornecedores, pois não existe nenhuma chave primária da tabela bens. Terás de selecionar várias tabelas para obter o valor. A query será, possivelmente algo do género: SELECT DISTINCT NomeFornecedor From Fornecedor INNER JOIN FornecedorBem ' tabela que relaciona bens com fornecedores ON Fornecedor.id_fornecedor = FornecedorBem.id_bem" _ INNER JOIN Bem" _ ' tabela que dos bens On FornecedorBem.id_bem = bem.id_bem WHERE descricao_bem = '" & ComboBox1.SelectedItem & "'"Depois, com esta query, povoas a nova combobox! Este código deve estar na função que faz o "Handling" (Handles) SelectedIndexChanged da combo1 Private Sub QQCOISA (byval.. .) Handles ComboBox1.SelectedIndexChanged End SubEspero ter ajudado! 1abraço |