1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

vb.net combobox!??!?

Discussão em 'Programação' iniciada por Esquima, 6 de Outubro de 2007. (Respostas: 3; Visualizações: 1546)

  1. 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????
     
  2. Zero_Cool_PT

    Zero_Cool_PT What is folding?

    if combobox1 = ao forncedor then combobox2.show lista do k tu keres. é algo nessa linha d raciocinio.
     
  3. ceptrus

    ceptrus Power Member

    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..
     
  4. mOrSa

    mOrSa Power Member

    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:

    Código:
     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

    Código:
    Private Sub QQCOISA (byval.. .) Handles ComboBox1.SelectedIndexChanged 
    End Sub
    Espero ter ajudado! 1abraço
     

Partilhar esta Página