Access - VB (contrôle) Fermé

Question

Bonjour,J'ai un souci sous Access:2 tables Maisons (MaisonA, MaisonB) et Infgen (Libellé, NotesA, NotesE).J'ai fait une liste avec MaisonA, et MaisonB. Et ce que j'aimerais c'est que si je choisis MaisonA, le texte adéquat apparaisse à savoir NotesA. Et si c'est MaisonB, NotesB apparaît.Malgré mes efforts, seul NotesE apparaît.Private Sub Avertissement_GotFocus()    If IsNull(Me!Avertissement) Or Len(Me!Avertissement) = 1 Then        Me!Avertissement = DFirst("NotesA", "Infgen")    Else If        Me!Avertissement = DFirst("NotesE", "Infgen")    End IfEnd SubMerci pour votre aide,

Utilisateur anonyme · Answer

Bonjour,Tu as fait une liste, une liste de quoi ??Tes tables sont-elles liées ? Par quel champ ?

RicHamilton · Answer

Slt Laonei, En supposant que MaisonA et MaisonB sont dans un contrôe ListBox ou ComboBox, il suffira tout simplement d'écrire la requête suivante dans l'évènement Click :With rs       If ListBox1 (ou ComboBox1) = "MaisonA" Then              .Open "Select NoteA, ... from MaisonA Where LibMaison=' " &  ListBox1 (ou ComboBox1) & " ';",cnn       Else               .Open "Select NoteA, ... from MaisonB Where LibMaison=' " &  ListBox1 (ou ComboBox1) & " ';",cnn       End IfEnd WithOù rs est un objet Recordset déjà déclaré et cnn un objet Connection.J'espère que j'ai clairement repondu à ta question.Bonne chance.

Access - VB (contrôle)

2 réponses

Discussions similaires