OVH Cloud OVH Cloud

ComboBox

11 réponses
Avatar
JLuc
En cette heure matinale, bonjour,
VB6
J'ai un problème avec les combobox.
L'événement Change ne fonctionne pas :-?

Dans le Form_Load :
Combo1.AddItem "COM1", 0
Combo1.AddItem "COM2", 1
Combo1.AddItem "COM3", 2

Private Sub Combo1_Change()
MsgBox "essai"
End Sub

Qu'ai-je mal fais dans la conception ?
Merci pour vos reponses

--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-\O

1 réponse

1 2
Avatar
Le pape
Il existe différents types de combobox selon le style que tu leur donne.
Si c'est une dropdown combo (type 0) ou une combo simple (type 1), tu
peux changer le contenu du champ. Si tu changes le champ, l'événement
Change est appelé, alors que si tu cliques sur la flèche,
c'est l'événement click qui est détecté. Si le mode est Dropdown list
(type 2), tu ne PEUX PAS changer le contenu, c'est donc l'événement
Click qui est déclenché.

Essaye ce code et change le type de la combobox (Propriété Style) : une
form avec une combobox (Combo1) et un bouton (Command1)

Philippe

Private Sub Combo1_Change()
MsgBox "Changé"
End Sub

Private Sub Combo1_Click()
MsgBox "Cliqué"
End Sub

Private Sub Command1_Click()
Unload Me
End Sub

Private Sub Form_Load()
Combo1.AddItem "1"
Combo1.AddItem "2"
Combo1.AddItem "3"
End Sub



JLuc a écrit :
En cette heure matinale, bonjour,
VB6
J'ai un problème avec les combobox.
L'événement Change ne fonctionne pas :-?

Dans le Form_Load :
Combo1.AddItem "COM1", 0
Combo1.AddItem "COM2", 1
Combo1.AddItem "COM3", 2

Private Sub Combo1_Change()
MsgBox "essai"
End Sub

Qu'ai-je mal fais dans la conception ?
Merci pour vos reponses



1 2