dimanche 21 octobre 2012

Comment utiliser une combobox

Comment utiliser une combobox


Ajouter le combobox dans un formulaire et redimensionner-le.

ComboxBox dans Visual Basic
Ensuite, dans le code, on ajuste les propriétés. Je choisis de le faire au démarrage du formulaire. Vous pouvez aussi faire la même chose.



    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        ComboBox1.BackColor = Color.Ivory
        ComboBox1.Enabled = True
        ComboBox1.Visible = True
        ComboBox1.FlatStyle = FlatStyle.Standard

    End Sub


Lorsque le combobox est initialisé lorsque les propriétés de départ sont satisfaisantes, nous pouvons ajouter des mots dans le combobox. Restons dans la même fonction de démarrage et ajoutons du texte après avoir ajusté ses propriétés.



    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        ComboBox1.BackColor = Color.Ivory
        ComboBox1.Enabled = True
        ComboBox1.Visible = True
        ComboBox1.FlatStyle = FlatStyle.Standard


        ComboBox1.Items.Add("John")
        ComboBox1.Items.Add("Peter")
        ComboBox1.Items.Add("Kevin")


    End Sub



Maintenant que vous avez mis des renseignements dans le combobox, il est bon qu’au démarrage du formulaire, un choix de texte soit déjà pré-sélectionné.





    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        ComboBox1.BackColor = Color.Ivory
        ComboBox1.Enabled = True
        ComboBox1.Visible = True
        ComboBox1.FlatStyle = FlatStyle.Standard


        ComboBox1.Items.Add("John")
        ComboBox1.Items.Add("Peter")
        ComboBox1.Items.Add("Kevin")

        ComboBox1.SelectedIndex = 2 'will display Peter
    End Sub


Vous pouvez aussi agrémenter l’utilisation du combobox en le triant alphabétiquement avec la commande shorted.





    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        ComboBox1.BackColor = Color.Ivory
        ComboBox1.Enabled = True
        ComboBox1.Visible = True
        ComboBox1.FlatStyle = FlatStyle.Standard


        ComboBox1.Items.Add("John")
        ComboBox1.Items.Add("Peter")
        ComboBox1.Items.Add("Kevin")

        ComboBox1.SelectedIndex = 2 'will display Peter

        ComboBox1.Sorted = True

    End Sub



Notez qu’après avoir trié la liste dans la combobox, l’index SelectedIndex est reinitialisé.


        ComboBox1.Sorted = True
        ComboBox1.SelectedIndex = 1 'will display Kevin




Pour accéder au texte sélectionné dans le combobox, on utilise la propriété Text.


        MsgBox(ComboBox1. Text)


Si vous êtes tenté de faire quelques manipulations avec les items dans la combobox, ayez en tête que c’est une collection bien ordinaire. Cette collection possède les éléments les plus normaux qu’on retrouve dans toutes les collections d’objets.

Pour ajouter :
Combobox1.items.add = “Obama”

Pour obtenir le nombre d’items:
Combobox1.items.count

Pour retirer in item selon son index:
Combobox1.items.Remove(2) ‘ pour retirer par exemple le 2e élément de la collection




Référence :

Aucun commentaire:

Enregistrer un commentaire