Les Snippets

Connexion

Supprimer les éléménts sélectionnés d'une ListBox

Niveau requis pour utiliser/comprendre cette source : 1 ( Débutant )
Créé le 23/01/2008 13:33:25 et initié par jrivet [Liste]
Date de mise à jour : 29/01/2008 00:52:54
Vue : 20038
Catégorie(s) : Trucs & Astuces, WinForm, Control
Langages dispo pour ce code :
- VB6, VBA
- VB 2005
- C# 2.x
- Javascript
- Delphi 5



Langage : VB6 , VBA
Date ajout : 23/01/2008
Posté par jrivet [Liste]
DateMAJ : 29/01/2008
'En VBA Public Sub DeleteSelectedItem(ByRef Li As MSForms.ListBox)
Public Sub DeleteSelectedItem(ByRef Li As ListBox)
Dim i As Integer
   'on boucle à l'envers pour eviter les erreurs
   'd'index suite à une suppression
   For i = Li.ListCount - 1 To 0 Step -1
       'Si l'element est selectionner => on le supprime
       If Li.Selected(i) Then Call Li.RemoveItem(i)
   Next
End Sub 
'Exemple d'appel Call DeleteSelectedItem(List1)
Remarque :
J'ai cherché ce snippet pour une question posée sur le forum, et j'ai remarqué qu'il n'existait pas.
Alors voilà....
Langage : VB 2005
Date ajout : 23/01/2008
Posté par jrivet [Liste]
DateMAJ : 29/01/2008
'Fonction supprimant les éléments séléctionnés d'un listbox
'renvoie le nombre d'éléments supprimés
Public Function DeleteSelectedItems(ByRef Li As ListBox) As Integer
   'Initialise le résultat
   Dim resultat As Integer = Li.SelectedIndices.Count
   For i As Integer = Li.Items.Count - 1 To 0 Step -1
       If Li.SelectedIndices.Contains(i) Then Li.Items.RemoveAt (i)
   Next
   Return resultat
End Function 
'Exemple d'appel MsgBox (DeleteSelectedItems(ListBox1))
Remarque :
Version VB.NET 2005 Inspirée par http://www.codyx.org/snippet_supprimer-tous-items-coches-checklistbox_510.aspx
Langage : C# 2.x
Date ajout : 23/01/2008
Posté par jrivet [Liste]
;       private void button1_Click(object sender, EventArgs e)
        {
            MessageBox.Show(DeleteSelectedItems(listBox1).ToString() + _
              " élément(s) supprimé(s)");
        }
        /// <summary>
        /// Fonction supprimant tous les items sélectionnés dans une ListBox
        /// </summary>
        /// <param name="Li">L'objet ListBox dont on doit supprimer _
          les élements</param>
        /// <returns>Le Nombre d'items supprimés</returns>
        public int DeleteSelectedItems(ListBox Li)
        {
            //initialise le résultat
            int result = Li.SelectedIndices.Count;
            //on boucle pour chaque items
            for (int i = Li.Items.Count - 1; i >= 0; i--)
            {
                //si i est contenu dans les indices cochés
                if (Li.SelectedIndices.Contains(i))
                {
                    //on efface l'items à l'indice i
                    Li.Items.RemoveAt(i);
                }
            }
            return result;
        }
Remarque :
Tant que je suis lancé je propose aussi la version C#2005
Langage : Javascript
Date ajout : 24/01/2008
Posté par bultez [Liste]
<body>
    <script type="text/javascript">
        function supprime()
        {   var s=document.getElementById("sel");
            for( var n=s.length-1;n>=0;n--)
            {   if (s.options[n].selected) 
                { s.remove(n);    }
            }
        }
    </script>
    <select id="sel" multiple size=10>
        <option>un</option>
        <option>deux</option>
        <option>trois</option>
        <option>quatre</option>
        <option>cinq</option>
        <option>six</option>
        <option>sept</option>
        <option>huit</option>
        <option>neuf</option>
        <option>dix</option>
        <option>onze</option>
        <option>douze</option>
        <option>treize</option>
    </select>
    <input   type="button"
                onclick="supprime();"
                value="supprimer" />
</body>
Langage : Delphi 5
Date ajout : 18/08/2008
Posté par f0xi [Liste]

ListBoxN.DeleteSelected;



Snippets en rapport avec : Supprimer, Listbox, Elements, Selectionnes



Codes sources en rapport avec : Supprimer, Listbox, Elements, Selectionnes

{Visual Basic, VB6, VB.NET, VB 2005} RECETTE A PARTIR WPF
J'ai écris cette application de recette de cuisine qui non seulement permet de decrire le plat et le...

{Delphi} TRI ET PRÉSENTATION DE LISTBOX
Un exemple de tri et de présentation des listbox en utilisant les procedures Delphi. Quatre list so...

{Visual Basic, VB6, VB.NET, VB 2005} TRIEUR DE PHOTOS
Ce programme permet de sélectionner des photos et de les enregistrer dans un dossier de destination....

{C# / C#.NET} UTILISATION DU BINDING AU TRAVERS DE L'OBJET DATABINDINGSOURCE
Il s agit de la source d exemple du tutoriel se trouvant à cette adresse: http://www.csharpfr.com/t...

{Visual Basic, VB6, VB.NET, VB 2005} LIST DES IMAGES AVEC BASE DE DONNÉES ET REPERTOIR D'IMAGE
Généralement il n'est pas conseillé de stock directement des images dans la base de donnée. Il fau...

{Visual Basic, VB6, VB.NET, VB 2005} EXTRAIRE LES FRAMES D'UN GIF ANIMÉ
L'extraction des frames se fait au choix en jpg, bmp, gif, png ou tif. Un dossier est créé au nom du...

{Visual Basic, VB6, VB.NET, VB 2005} CREER UN GIF ANIMÉ
Ce programme crée un gif animé grâce à la librairie Gif.Components.DLL. Son utilisation est très si...

{Assembleur} DUMPER HEXADÉCIMAL
Explorateur 'old style' de fichiers avec affichage en Hexadécimal (dump). La partie explorer est dan...

{Visual Basic, VB6, VB.NET, VB 2005} PLANCHE CONTACT SOUS WORD
Créer une planche contact d'images sous Word. Ce programme est en vba, il utilise Excel que vous ne...

{Visual Basic, VB6, VB.NET, VB 2005} L'ÉVÉNEMENT SCROLL D'UNE LISTBOX DANS VB.NET
L'événement Scroll d(une ListBox dans Visual Basic 6.0 est utilisé conjointement avec la propriété T...