ComboBox

cs_noe Messages postés 38 Date d'inscription mardi 28 mai 2002 Statut Membre Dernière intervention 24 décembre 2003 - 28 juin 2003 à 09:18
ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 - 28 juin 2003 à 09:44
Bonjour à tous

voila j'utilise ce code pour faire apparaitre le premier nom d'une table dans ma combobox.

Do Until RsPerso.EOF
Nom_Debut.AddItem RsPerso!Nom & " " & RsPerso!Prenom
RsPerso.MoveNext
Loop
Nom_Debut.ListIndex = -0

quel code utiliser pour faire apparaitre le dernier nom de ma liste

merci pour vos reponses

A+

2 réponses

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
28 juin 2003 à 09:43
Je craint de ne pas saisir le sens ambigu de ta question....

si tu souhaites a jouter le dernier element, fait ceci :

tu te deplace d'enregistrements en enregistrements, en memorisant la valeur actuelle. Une fois le fin du jeu d'enregistrements, tu ajoutes la valeur memorisée : c'est la derniere de ton recordset....

Do Until RsPerso.EOF
    Item =   RsPerso!Nom & " " & RsPerso!Prenom
    RsPerso.MoveNext
Loop
Nom_Debut.Additem Item
Nom_Debut.ListIndex = -0
<table border=0 cellspacing=0 cellpadding=4 bgcolor=#E0E0E0><tr><td class=code>

et si tu souhaite ajouter les noms, normallement, et selectionner le dernier element de ton combo , 

change :

<table border=0 cellspacing=0 cellpadding=4 bgcolor=#E0E0E0><tr><td class=code>
Nom_Debut.ListIndex = -0


en

Nom_Debut.ListIndex = Nom_Debut.ListCount -1



By Renfield

[mailto:thomas_reynald@msn.com mailto:thomas_reynald@msn.com]

Aucune touche n'a été blessée lors de la saisie de ce texte.......... ;)
0
ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 26
28 juin 2003 à 09:44
salut

pour sélectionner (afficher) le premier c :
Nom_Debut.ListIndex = 0

pour afficher le dernier :
Nom_Debut.ListIndex = nom_debut.listcount - 1

pour ne rien afficher c :
Nom_Debut.ListIndex = -1

voila

ShareVB
0
Rejoignez-nous