listbox selectionRésolu

Question

Bon jour tout le monde 
J'ai 3 listbox
Je dois les remplir à partir d'une base de donne access
Dans la 1er   je met nom de fichier  qui appelé  de base de donne dans la 2eme  type de fichier   et la 3eme  code de fichier.
La 2eme  et la 3eme  intouchables .
Le  problème   est : je veux sélectionne la 1er liste  le 2autre soit sélectionne aussi .
Exemple :
Je veux sélectionne nom de fichier     « formation  vb »  
Alors  automatiquement  sélectionnés « doc » pour type de fichier  et  1000 pour  code



Merci de répondre

cs_le__prince · Accepted Answer

ok merci je suis avanc&#233; avec ce que ma dit  merci pour tout  qui me repond  
1000 Merci

JB76000 · Answer

Sois plus clair, je ne vois pas bien ce que tu veux

Jer

mortalino · Answer

Salut,

En gros dans ta 1ere ListBox, tu veux le nom de fichier,
             ta 2eme ListBox, tu veux l'extension,
mais j'ai effectivement pas compris ce que tu veux dans la 3eme ??

Mortalino

econs · Answer

Salut,



Sur le principe, &#231;a devrait faire quelque chose comme &#231;&#224; :





Private Sub List1_Click()

    If List1.List(List1.ListIndex) = "formation vb" Then

        selectionneDansList2("doc")

        selectionneDansList3("1000")

    End If

End Sub



Private Sub selectionneDansList2(s As String)

    For i=0 To List2.ListCount-1

        If List2.List(i)=s Then

           List2.ListIndex = i

            Exit For

        End If

    Next i

End Sub



Private Sub selectionneDansList3(s As String)


    For i=0 To List3.ListCount-1


        If List3.List(i)=s Then


           List3.ListIndex = i


            Exit For


        End If


    Next i


End Sub


Manu

cs_le__prince · Answer

Bonjour


J&#146;ai  d&#233;j&#224; les 3 liste remplire pour chaque ligne  pour les 3 


Dans la 1er   le nom de fichier dans 2eme  son type  dans la 3eme  son code dans la base de donne


Pour le m&#234;me ligne dans les 3 listes  sont li&#233;es 


Je veux quand je s&#233;lectionne  l&#146;&#233;l&#233;ment dans la 1er liste tout la ligne soit s&#233;lectionne  pour liste 2 et 3

Merci pour r&#233;pondre

mortalino · Answer

Aide toi de ce que Manu t'as mis, t'as plus qu'à affiner selon tes besoins.

@ ++

Mortalino

cs_le__prince · Answer

Private Sub List1_Click()


   If List1.ListIndex >= 0 Then
      List2.ListIndex = List1.ListIndex
      List3.ListIndex = List1.ListIndex
    End If
    
End Sub


Merci  pour  vous

Listbox selection

7 réponses

Discussions similaires