Discussion :

[sandball22]

bonjour,

je souhaite utilisé une comboBox via visual studio 2008 en VB.
J'ai un soucis car je voudrais mettre par défaut une valeur dans cette comboBox.
J'arrive bien à créer le menu déroulant avec mes possibilités de choix mais je voudrais mettre par défaut une valeur avant que l'utilisateur ne puisse choisir.

Pouvez vous m'aider?

Merci.

[mactwist69]

Bonjour,

Et bien j'imagine que tu souhaites a l'ouverture de ta forme que la valeur par défaut soit sélectionnée. (Valeur comprise dans la liste).

Utilise par exemple l'évènement de load de la form pour mettre le code:

Code :

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

1
2
3
4
5
Private Sub Form1_Load()
 
      me.Combobox1.SelectedItem = "Ma Valeur par défaut"
 
End Sub

PS: Ne marche que si la valeur "Valeur par Défaut" est dans la liste.

[alex61]

ou alors quand tu enregistre cette valeur tu fait

Code :

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

1
2
3
if macombobox.text = "" then
      macombobox.text = "valeur" 
end if

cette solution n'affiche pas la valeur par défaut a l'utilisateur
cordialement

[sandball22]

J'ai un petit soucis.
En fait j'ai un formulaire avec un choix de menu (2 boutons pour cela).
Si je sélectionne le bouton de droite j'ai le formulaires avec ma combobox qui apparait.
Ce que j'ai fait c'est que sur l'évènement de clic sur le bouton de droite j'affiche le 2eme formulaire (avec .show()).

A quel endroit je mets ton code?

Private Sub Form1_Load()

me.Combobox1.SelectedItem = "Ma Valeur par défaut"

End Sub

[alex61]

si tu le cache au formload
tu peut le placer au formload

[sandball22]

Je n'ai pas compris ta dernière réponse.
tu peux me clarifier ?
Merci

[alex61]

tes formulaire pour les afficher en cliquant sur un bouton
tu les cache bien au chargement ( formload) avec .hide ou visible = false

non ?

[sandball22]

Au démarrage j'ai mon formulaire d'accueil.
lorsque je clique sur des boutons j'ai un autre formulaire qui apparait (pour l'instant le formulaire d'accueil est toujours ouvert).
donc non je n'utilise pas de .hide ou visible = false


Je n'est pas de formload non plus.

exemple pour ma page d'accueil :

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
 
Public Class MenuDemarrage
 
    Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
 
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Homologation.Click
        Homologation.Show()
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Controle_entree.Click
        ControleEntree.Show()
 
 
 
    End Sub
 
    Private Sub Label1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
 
    End Sub
 
 
 
End Class

[alex61]

d accord donc homologation et ControleEntree entré son des windows form
c'est bien ca ?

si c'est le cas

tu doit ajouter un évènement formload a cela
( double clique dans ta form ou il n'y a pas d'autre objet en mode design )


ps : ajoute un prefixe a tes objet pour les distinguer , c'est plus simple aprés pour les relier

ex frm_homologation
txt_nom
etc...

[sandball22]

Oui ce sont des windows form.

A quoi va me servir l'évènement formload ?
Je mets quoi à l'intérieur de cet évènement a part :

me.Combobox1.SelectedItem = "Ma Valeur par défaut"

Où dois-je appeler cet évènement ?

[sinople]

Si ton comboBox est relié à une source de donnée, faut gérer la valeur par défaut au niveau de cette dernière (constructeur si objet, valeur par défaut du champ si database, etc.)

Si ton comboBox n'est pas relié à une source de donnée. Il faut, après avoir chargé la liste interne du controle (valeur de la liste déroulante), mettre la propriété .SelectedItem = ObjetDeLaListeInterneParDéfaut (L'objet en question est souvant une string mais pas forcément).

Attention par relié à une source de donnée pour le comboBox, je ne parle pas de celle pour la liste de choix mais bien de celle reliée à la sélection!

[mactwist69]

Oui ce sont des windows form.

A quoi va me servir l'évènement formload ?
Je mets quoi à l'intérieur de cet évènement a part :


Où dois-je appeler cet évènement ?

Form_Load est comme son nom l'indique un évènement, donc ce n'est pas toi qui l'appelle directement il va se déclencher automatiquement... Lorsque le formulaire va s'afficher a l'écran.

Donc tu profites de cet évènement pour selectionner une valeur dans ton combobox.

Tu mets ce que tu veux dedans, rien même si tu as envie.
En l’occurrence mets la ligne de code écrite et si il le faut mets le code qui remplis ton combobox (avant bien sur)

[sandball22]

Ok je comprends mieux.

J'ai une petite question, faut il avoir cette méthode pour chaque windows form?
Est ce obligatoire ou facultatif?
Quel est le but lorsque le contenu de cet événement est vide?

revenons à mon problème.

j'ai fait ceci:

Code :

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

1
2
3
4
5
6
 
 
    Private Sub ControleEntree_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.ComboBox3.SelectedItem = "HOM"
 
    End Sub

j'ai toujours le pb à savoir que mon combobox est vide.

[alex61]

il faut que cette valeur soit dans la liste des choix

Code :

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

Me.ComboBox3.item.add("HOM")

et cette évènement est facultatif ( mais très souvent voir tout le temps utilisé )

si il est vide , il n'y a rien qui ce lance au démarrage, donc il est inutile

[sandball22]

J'ai mis le code que tu as écrits dans :

Code :

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

1
2
3
4
5
 
Private Sub ControleEntree_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ComboBox3.Items.add("HOM")
 
End Sub

Mais toujours rien dans la case.
Pourtant HOM fait bien parti de ma collection.
Je ne comprends pas pourquoi cela ne fonctionne pas.

[mactwist69]

Tu le remplis quand tu combobox au juste ?

Peux tu nous montrer ton code ?

[sandball22]

Code :

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

1
2
3
Private Sub ControleEntree_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ComboBox3.Items.add("HOM")
End Sub

et je rentre dans le designer la collection dans les items:

HOM
AAA
BBB

Je ne sais pas si cela vous aide.

[alex61]

il faut ajouter puis sélectionner !

Code :

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

1
2
3
4
5
 
Private Sub ControleEntree_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ComboBox3.Items.add("HOM")
me.Combobox1.SelectedItem ="HOM"
End Sub

[mactwist69]

Si tu as rentré les valeurs dans le designer, alors ce code devrait marcher:

Code :

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

1
2
3
4
Private Sub ControleEntree_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.ComboBox3.SelectedItem = "HOM"
 
    End Sub

Si il ne le fait pas, alors mets un point d'arret sur la ligne de code, et ajoute un espion sur le combobox, et regarde si tu as bien des éléments dedans.

[sandball22]

J'ai réussi à trouver le problème.
En effet, il s'agissait d'un problème au niveau des références de projet.
J'ai supprimé celles qui ne servaient pas et du coup maintenant j'ai le bon comportement. (à savoir: une valeur par défaut dans la comboBox faisant partie de ma collection).

Par contre j'ai un petit soucis mais je fais ouvrir une nouvelle discussion.

Merci de votre aide.