chiraz51
Messages postés4Date d'inscriptionmercredi 8 octobre 2008StatutMembreDernière intervention14 décembre 2008
-
12 déc. 2008 à 17:24
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 2018
-
14 déc. 2008 à 20:38
slt tout le monde j'ai un projet vidéotheque que je commence à le préparer pouvez vous m'aider de faire la 2 EME form
je veux choisir une catégorie de film occidental ou oriental puis selon cette categorie j'affiche une liste
j'ai mis dans la form une zone texte ou je taperai la catégorie de film et j'ai mis une liste et un bouton nommé afficher la liste
j'ai mis ds ce bouton ce code source=>
Private Sub afficher_Click()
If (Text1.Text = "occidental") Then
List1.AddItem "américain"
List1.AddItem "hind"
List1.AddItem "italien"
List1.AddItem "francais"
End If
If (Text1.Text = "oriental") Then
List1.AddItem "égyptien"
List1.AddItem "tunisien"
List1.AddItem "marocain"
List1.AddItem "algérien"
End If
End Sub
la probleme ici est quand je change la catégorie (de occidental à oriental par exp) la liste ne s'efface pas ,j'ai utiliser list1.refrech mais tjs faux
je vous attends merci
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 14 déc. 2008 à 20:38
salut,
c'es bien çà, Listindex commence à 0 et removeitem pour le supprimer
reste à parcourir la liste de I 0 to .ListCount-1 pour vérifier si .Selected(I) True
++
<hr size="2" width="100%" />
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp