Discussion :

[spring.time]

Bonjour

j'ai fait un combobox qui se rempli d'une donnée depuis la BD, je l'ai configuré de telle sorte à ce qu'il affiche la donnée selon la lettre/le chiffre saisi; l'auto-complétion.
j'aimerais que si je sélectionne la donnée, je remplie en même temps d'autres contrôles(des zones de texte, des combobox, des listview) depuis la BD, ces données sont en jointure avec la donnée selectionnée de combobox.

quel événement lié au combobox à choisir?
j'ai déjà tester keypress, cmb_textchanged, ...
mais soit on m'affiche aucune donnée dans ces contrôles, soit on m'affiche des données dupliquées.


pourriez vous m'aider svp?

[Savak]

Hi!

Je crois que l’événement que tu cherches est SelectedIndexChanged. Avec ça, à chaque fois que tu sélectionnera un nouvelle item, la procédure liée s'exécutera.

Si ce n'est pas ça que tu cherches, c'est que je t'ai mal compris.

Est-ce que tu peux nous donner le code que tu comptes mettre à l'intérieur de la procédure événementielle dont tu nous parles? On pourra y voir plus clair je pense.

Tchou!

[spring.time]

je vous remercie,
l’événement que vous m'avez mentionné, ne convient pas à un combobox de type DropDown (non DropDownList).

voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
 
req = "select t1.d1, t2.d2 from t1 left join t2 on t1.id=t2.id2 where t2.numero = " & "'" & cmb_B.Text & "'"
        consulterBD(req)
        While dr.Read
 
 
            T_date_b.Text = If(dr.IsDBNull(1), " ", CType(dr.GetDateTime(1), String))
            date_b_maj = If(dr.IsDBNull(1), Nothing, dr.GetDateTime(1))
 
            T_montant_b.Text = If(dr.IsDBNull(2), " ", CType(dr.GetValue(2), String))
            montant_maj = If(dr.IsDBNull(2), Nothing, dr.GetValue(2))
 
 
 
            'T_acheteur.Text = If(dr.IsDBNull(9), " ", dr.GetString(9))
            acheteur_maj = If(dr.IsDBNull(9), " ", dr.GetString(9))
 
 
 
 
 
        End While
        dr.Close()
 
        'MsgBox(acheteur_maj)
        'affichage des données 
 
 
        T_date_b.Text = If(date_bc_maj = Nothing, " ", CType(date_b_maj, String))
        T_montant_b.Text = If(montant_maj = Nothing, " ", CType(montant_maj, String))
 
 
        'acheteur 
        req = "select contact from Acheteur"
        consulterBD(req)
        While dr.Read
            cmb_acheteur.Items.Add(dr.GetString(0))
        End While
        dr.Close()
        cmb_acheteur.SelectedItem = acheteur_maj