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 : 4004
Catégorie(s) : Trucs & Astuces, WinForm, Control
Langages dispo pour ce code :
- VB6, VBA
- VB 2005
- C# 2.x
- Javascript



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>

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



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

{JAVA / J2EE} SUPPRIMER/AJOUTER UNE LIGNE
cette application me permet d'ajouter une nouvelle ligne dont le contenu est copier d'un autre tabl...

{C / C++ / C++.NET} HMEDIAV2 LECTEUR (WIN32)
C'est un Lecteur Audio-Video qui utilise l'API "vfw" pour lire et controler le video et l'API FM...

{Visual Basic, VB6, VB.NET, VB 2005} EXTRAIRE LE TEXTE DES FENETRES D'APPLICATIONS TIERCES (LISTBOX, LISTVIEW, TEXTBOXES, ...)
une mini source mais assez utile, dans certains cas... cas concrêt: j'ai une appli au boulot qui...

{Visual Basic, VB6, VB.NET, VB 2005} RECHERCHER FICHIERS
Comme avec Windows on recherche les fichiers. Mais j'ai fait l'expérience avec les fichiers images c...

{Visual Basic, VB6, VB.NET, VB 2005} PICTURE DRAG DROP
Comment déplacer ou copier une image d'une PictureBox à une autre,ainsi que les Treeview ,les ListBo...

{Delphi} DEPLACER LES ITEMS D'UNE LISTBOX VERS UNE AUTRE PAR DRAG AND DROP
- Les items sont insérés ou ajoutés, selon l'emplacement choisi dans la ListBox de destination. - L...

{Delphi} TRI DANS LISTBOX/COMBOBOX (TSTRINGS)
D' après une question sur le forum : http://www.delphifr.com/infomsg_TRI-NUMERIQUE-SUR-LISTBOX_1050...

{C# / C#.NET} CUSTOMLISTBOX -> METTEZ CE QUE VOUS VOULEZ (PROGRESSBAR, GROUPBOX, USERCONTROL,...) DANS VOS LISTBOX
Ce contrôle dérivant de la ListBox vous permet d'ajouter des contrôles classiques à sa collection d'...

{Visual Basic, VB6, VB.NET, VB 2005} HORLOGE DIAPORAMA
Horloge qui fait diaporama: On peut changer la police et la couleur du texte.Transparence.Charger le...

{Python} REPERT V1.4 (REPERTOIRE D'ADRESSES, TÉLÉPHONES ET MAILS)
Il s'agit d'un gestionnaire de répertoire d'adresse en Python + Tkinter sous base SQL (SQLite) avec ...