Discussion :

[Eithelgul]

Bonjour,
je voudrais avoir un combobox qui affichent trois items :"choixA", "choixB", "choixC" et affecter a chacun des choix une valeur x, y , et z pour utilisé x,y ou z lors du traitment.

Je precise : il n'y a aucun moyen de deduire x,y,et z a partir de "choixA", "choixB" et "choixC"

merci

[hirochirak]

Tu veux juste un comobobx nourrit de cette maniere

un identifiant non visible | le texte a affciher

si c'est le cas voila une soluce

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
Public Class class_constructeur
    Private _id As Integer
    Private _nom As String
    Sub New(ByVal id As Integer, ByVal Nom As String)
        _id = id
        _nom = Nom
    End Sub
    Public Property id() As Integer
        Get
            Return _id
        End Get
        Set(ByVal Value As Integer)
            _id = Value
        End Set
    End Property
    Public Property nom() As String
        Get
            Return _nom
        End Get
        Set(ByVal Value As String)
            _nom = Value
        End Set
    End Property
    Overrides Function ToString() As String
        Return (_nom)
    End Function
End Class
 
'et ensuite dans le code pour alimenter le combobox : 
 
sub additem
dim CT as class_constructeur
CT.id = x
CT.nom = "blabla"
combobox.items.add(CT)
End sub
 
'et enfin pour recuperer l'identifiant 
 
sub recup
dim CT as class_constructeur
dim id as int16 
CT = combobox.items.selected
id = CT.id
end sub

bon j'espere que ca t'aidera personnelment c'est une technique ke je trouve excellente pour régler ce genre de probleme.

Grace a la surcharghe du tostring tu peux afficher ce dont tu as besoin dans le combobox

@+

Hirochirak

[Eithelgul]

Salut et merci ca marche nickel a la petite modification pres. En effet j'ai eu des probleme avec la declaration : au vu du constucteur j'ai du faire ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
dim CT as new class_constructeur (0,"")