[VB.net 2005] Valeur par defaut Deroulante

Résolu
afrodje Messages postés 759 Date d'inscription   Statut Membre Dernière intervention   -  
 Chuppas -
Bonjour,

J'ai une liste déroulante et j'aimerai avoir au demarrage une valeur par defaut.

Voila mon code
Public Sub liste_deroulante_mois(ByVal nom_liste As ComboBox)

        nom_liste.Items.Add("Janvier")
        nom_liste.Items.Add("Fevrier")
        nom_liste.Items.Add("Mars")
        nom_liste.Items.Add("Avril")
        nom_liste.Items.Add("Mai")
        nom_liste.Items.Add("Juin")
        nom_liste.Items.Add("Juillet")
        nom_liste.Items.Add("Aout")
        nom_liste.Items.Add("Septembre")
        nom_liste.Items.Add("Octobre")
        nom_liste.Items.Add("Novembre")
        nom_liste.Items.Add("Decembre")
    End Sub

A voir également:

3 réponses

afrodje Messages postés 759 Date d'inscription   Statut Membre Dernière intervention   168
 
je dirais meme mieux :

  Dim mois_en_cour As Date
        ComboBox_mois.Text = ComboBox_mois.Items(mois_en_cour.Month + 1)


Merci à toi.
0
Chuppas
 
ComboBox1.SelectedIndex = 0 te mettra la première ligne de ton comboxbox1
0
afrodje Messages postés 759 Date d'inscription   Statut Membre Dernière intervention   168
 
Personne sait comment faire?
-1
PaPy36 Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
Salutafrodj,
Voilà une proposition de solution: tu insères le code qui suit, soit dans ta sub d'initialisation soit dans ta sub de routine

ComboBox1.Text=ComboBox.list(MoisNum-1)

MoisNum correspond au rang du mois dans l'année; c'est un entier
Voilà ça devrait fonctionner!
à+
PaPy50
-1