Monter des items dans une listbox
Soyez le premier à donner votre avis sur cette source.
Vue 5 246 fois - Téléchargée 436 fois
Description
Avec ce code vous pourrez monter les items dans une listbox,
en cliquant simplement sur un bouton.
Les erreurs sont gérées...
Première procédure = code du bouton qui servira à monter
Deuxième procédure = code de la listbox
Choisi, i, j, chaine = variables globales
N'oubliez pas les variables !
Ce code est particulièrement intéressant pour ceux qui chargent leurs items à partir d'une base de données. Ainsi ils peuvent organiser ou trier les informations et faire ensuite ce qu'ils veulent, comme enregistrer l'ordre des items.
en cliquant simplement sur un bouton.
Les erreurs sont gérées...
Source / Exemple :
Option explicit Dim choisi as Boolean Dim i as Integer Dim j as Integer Dim chaine as String Private Sub Button_Click() If choisi = True Then I = List1.ListIndex If I = 0 Then MsgBox "Aïe ! Je me suis cogné...", vbCritical, "Erreur..." Else chaine = List1.Text j = List1.ListIndex - 1 List1.RemoveItem (I) Call List1.AddItem(chaine, j) List1.Refresh List1.Selected(j) = True End If Else MsgBox "Veuillez sélectionner un item avant !", vbCritical, "Erreur..." End If End Sub Private Sub List1_Click() choisi = True End Sub
Conclusion :
Première procédure = code du bouton qui servira à monter
Deuxième procédure = code de la listbox
Choisi, i, j, chaine = variables globales
N'oubliez pas les variables !
Ce code est particulièrement intéressant pour ceux qui chargent leurs items à partir d'une base de données. Ainsi ils peuvent organiser ou trier les informations et faire ensuite ce qu'ils veulent, comme enregistrer l'ordre des items.
- Messages postés
-
48
- Date d'inscription
- mardi 3 avril 2007
- Statut
- Membre
- Dernière intervention
- 11 juin 2007
1Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.