Remplisage d'une ComboBox

Version imprimable

29/01/2010, 15h32
Marc_27

Remplisage d'une ComboBox
Bonjour à tous,

voilà une question simple qui je n'arrive pas à le faire, est-ce que quelque bonne alme peut m'aider, svp?

J'ai besoin de remplir une ComboBox avec des mois de l'année (Janvier, Février, ...) et qu'ils ayent les valeurs (1, 2, ...)

J'ai déjà essayé par array:
Code:

1 2 3 Dim arrMois(11,1) as String arrMois(0,0)="Janvier" arrMois(0,1)=1
Avec deux arrays:
Code:

1 2 3 4 Dim arrMois(11) as String Dim arrId(11) as Integer arrMois(0)="Janvier" arrId(0)=1
par DataTable:
Code:

1 2 3 4 5 Dim dtMois As New DataTable dtMois.Columns.Add("Mois") dtMois.Columns.Add("Value") dtMois.Rows.Add("Janvier", 1) dtMois.Rows.Add("Février", 2)
Mais je n'arrive pas à faire le Binding...
:arf:

Est-ce que quelqu'un peut m'aider, svp?
Merci d'avance...
:ccool:
29/01/2010, 15h54
leeloo95

Il me semble que tu ne peux pas mettre deux valeurs distinctes sur la même ligne.
Le mieux est de créer ta ligne en entier, et lorque tu cherches quelque chose en particulier de prendre cette ligne et de rechercher dans cette ligne la valeur que souhaite annalyser

Code:

ComboBox1.Items().Add("Fevrier" & " " & "1")

Sinon, ce que je te propose c'est que si tu cherches le mois de janvier avec la valeur 1, dans ta combobox tu n'as cas récupérer l'index de l'item de janvier qui sera placé en premier dans ta combobox.

(Indexcb= 1) Janvier 1
(Indexcb= 2) Fevrier 2
(Indexcb= 3) Mars 3
...

C'est un sytem D...
Attends de voir si il y a vraiment une possiblité de rajouter deux valeurs sur la même ligne dans un combobox...

Binding

Bonjour,
Je te propose la démarche suivante pour réaliser un beau binding de ta combo

1. crée une classe spécifique pour tes mois de l'année

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
26
27
28
29
 
Public Class MoisAnnee
    Private _moisString As String
    Private _moisInteger As Integer
 
    Property MoisString() As String
        Get
            Return _moisString
        End Get
        Set(ByVal value As String)
            _moisString = value
        End Set
    End Property
 
    Property MoisInteger() As Integer
        Get
            Return _moisInteger
        End Get
        Set(ByVal value As Integer)
            _moisInteger = value
        End Set
    End Property
 
    Public Sub New(ByVal i As Integer, ByVal s As String)
        _moisString = s
        _moisInteger = i
    End Sub
 
End Class

Puis tu initialise une liste d'objets moisAnnee (dans le load de la form par exemple) que tu lies (Binding...) à ton contrôle

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim listeMoisAnnee As New List(Of MoisAnnee)
        listeMoisAnnee.Add(New MoisAnnee(1, "janvier"))
        listeMoisAnnee.Add(New MoisAnnee(2, "fevrier"))
        listeMoisAnnee.Add(New MoisAnnee(3, "mars"))
        listeMoisAnnee.Add(New MoisAnnee(4, "avril"))
 
        'Initialisation du binding du contrôle
        Me.ComboBox1.DataSource = listeMoisAnnee
        Me.ComboBox1.DisplayMember = "MoisString"
        Me.ComboBox1.ValueMember = "MoisInteger"
End Sub

Et tu termines par récupérer la valeur lorsque la séléction change dans la combobox

Code:

1
2
3
4
 
Private Sub ComboBox1_SelectionChangeCommitted(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectionChangeCommitted
        Dim i As Integer = ComboBox1.SelectedValue
End Sub

29/01/2010, 16h08
Marc_27

Merci leeloo95.

En fait, c'est pas mettre les deux valeurs dans la même ligne, mais utiliser les proprietes ValueMember et DisplayMember.

Je voudrais que "Janvier" soit le DisplayMember avec un ValueMember 1
"Février" de DisplayMember avec un ValueMember 2...
29/01/2010, 16h12
Marc_27

Merci à toi aussi BoBoCom1.

C'est bien ça...
Mais c'est pas evident. J'ai pensé qu'il serait beaucoup plus simple...
29/01/2010, 16h20
BoBoCom1

IList ...

Bonjour Marc27,

C'est vrai que ce n'est pas forcément le plus simple, ou le plus direct.

Néanmoins la combobox n'autorise que le binding avec des composants qui implémentent l'interface 'IList'....tu es donc limité dans le choix de la collection utilisable.
D'autre part l'emploi de l'objet "MoisAnnee" est un choix de développement...tu peux surement faire plus simple ;)
A plus
29/01/2010, 16h23
Marc_27

Alors,
on y va. Je vais donc l'essayer

Merci encore une fois BoBoCom1 et leeloo95.
:ccool::ccool: