sub combobox_click Label1.caption=combobox.text 'Affiche la sélection dans un contrôle label lors d'un choix dans le conbobox end sub
sub combobox_click if combobox.text="A" then Label1.caption="Choix 1" if combobox.text="B" then Label1.caption="Choix 2" if combobox.text="C" then Label1.caption="Choix 3" end if end sub