Vider une Listbox à partir de Me.ActiveControl [Résolu]

Question

Posez votre question Signaler

Vider une Listbox à partir de Me.ActiveControl [Résolu]

Maxx04

Messages postés: 3
Date d'inscription: samedi 4 juillet 2015
Dernière intervention: 8 août 2015

- 8 août 2015 à 10:29 - Dernière réponse : Maxx04

Messages postés: 3
Date d'inscription: samedi 4 juillet 2015
Dernière intervention: 8 août 2015

- 8 août 2015 à 13:18

VB.NET Posez votre question Signaler

Bonjour,

J'ai commencé un projet il y a assez longtemps qui prend beaucoup de temps et là je bloque :
J'ai déjà réussi à vider une Textbox à partir d'un menu en récupérant le contrôle qui a le focus avec ce code :

Private Sub EffacerLeTexteToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles EffacerLeTexteToolStripMenuItem.Click
        If TypeOf Me.ActiveControl Is TextBox Then
            Me.ActiveControl.Text = ""
        End If
    End Sub

Ce code marche avec toutes les zones de texte, et j'aimerais faire la même chose avec les listes. J'ai essayé ce code :

Private Sub ViderToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles ViderToolStripMenuItem.Click
        If TypeOf Me.ActiveControl Is ListBox Then
            Me.ActiveControl.Items.Clear()
        End If
    End Sub

Mais ça ne marche pas, ça dit "'Items' n'est pas un membre de 'System.Windows.Forms.Control'"

Avez-vous une solution ?
Merci d'avance.

Afficher la suite

A voir également:

Vider listbox vba
Vba vider listbox - Meilleures réponses
Vider une listbox - Meilleures réponses
Avoir ligne sélectionnée dans une listbox VBA ✓ - Forum - Visual Basic 6
Listbox vba ✓ - Forum - Visual Basic 6
1ere ligne vide en VBA Excel (2003) ✓ - Forum - Visual Basic
Visual Basic / VB.NET : Simulation de .additem et .removeitem pour des listbox sous vba access - Cod - Guide
Visual Basic / VB.NET : Vba excel, remplissage d'un combobox ou d'une listbox - CodeS SourceS - Guide

Votre réponse

Répondre au sujet

1 réponse

Votre réponse

Répondre au sujet

Posez votre question

ucfoutu · Answer 1 · 2015-08-08T11:48:07+0200

Signaler Commenter la réponse de ucfoutu

ucfoutu

Messages postés: 18039
Date d'inscription: lundi 7 décembre 2009
Statut: Modérateur
Dernière intervention: 11 avril 2018

264 Modifié par ucfoutu le 8/08/2015 à 11:48

0

Merci

Bonjour,
ActiveControl n'a pas de propriété attitrée.
Il te faut alors passer par un tremplin (genre dim toto as listbox puis toto = activecontrol) ou (mieux) "forcer la main à la reconnaissance ===>>>

DirectCast(Me.ActiveControl, ListBox).Items.Clear()

________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.

Signaler Commenter la réponse de Maxx04

Maxx04

Messages postés: 3
Date d'inscription: samedi 4 juillet 2015
Dernière intervention: 8 août 2015

- 8 août 2015 à 13:18

D'accord merci beaucoup, j'essaierai ça chez moi :)

Vider une Listbox à partir de Me.ActiveControl [Résolu]

Votre réponse

Votre réponse

Votre réponse

Vous n'êtes pas encore membre ? inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !