problème de ListBox et récupération de données

Version imprimable

Bonjour,

Voici mon probleme:
j'ai une ListBox qui affiche des Classes,
Je voudrais pouvoir lors d'un clic récupérer l'objet Classe
voici mon code:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Public Sub buildListBox()

        _classeManager = New ClasseManager()

        Try
            Me.lsbClasse.Items.Clear()

           // je récupère une liste de Classe
            Dim liste As List(Of Classe) = _classeManager.getClasse() 
         
            // pour chaque Classe je l'ajoute à la liste box
            For Each classe As Classe In liste

                // le probleme est ici à chaque fois le Tag est écrasé par l'enregistrement suivant ce qui fait qu'a la fin le Tag = 4 (derniere classe)
                lsbClasse.Tag = classe
                lsbClasse.Items.Add(classe.Libelle)
            Next
        Catch ex As Exception
            Throw ex
        End Try

    End Sub

ensuite pour récupérer mes infos je fais cela:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
Private Sub lsbClasse_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lsbClasse.SelectedIndexChanged
 
        // je récupère la classe sélectionnée
        Dim selectedClasse As Classe
 
 
        Try
            If Me.lsbClasse.SelectedItem IsNot Nothing Then
 
                selectedClasse = TryCast(Me.lsbClasse.Tag, Classe)
 
                If selectedClasse IsNot Nothing Then
                    setClasse(selectedClasse, Me._classeManager)
                Else
                    Me.txtLibelle.Text = ""
                End If
            End If
 
        Catch ex As Exception
            MessageBox.Show(ex.Message, "Erreur")
 
        End Try
 
    End Sub

Voyez-vous une solution ?
Merci d'avance.

30/04/2011, 09h53
Pol63
un control ne peut avoir qu'un tag, pas un par ligne

de plus les controles .net utilisent la méthode ToString pour afficher des infos, il faut donc l'utiliser
Code:

1 2 3 4 5 6 7 8 public class maclasse public property Id as long public property Libelle as string public overrides function ToString as string return me.libelle end sub end class
Code:

1 2 3 4 for each item as maclasse in mylistof listbox1.items.add(item) ' mettre l'instance plutot que la propriété libellé next
Code:

1 2 directcast(listbox1.selecteditem,maclasse) ' contient directement l'instance de la classe
le listbox ne sachant pas afficher une classe va appeler .ToString qui dans ce cas va retourner le libellé
et selecteditem contient l'instance, pas seulement le libellé, ce qui est pratique
le but de la POO c'est de garder des instances partout plutot que des propriétés

ca marche aussi pour les combobox
et sur certains controles, on peut se débrouiller sans overrider la méthode tostring, grace à la propriété DisplayMember dans laquelle on met le nom de la propriété qu'on veut afficher
01/05/2011, 09h17
étudiant49

Merci pour cette explication claire et détaillée.

Plus de problème maintenant.