[visual Basic]: Combobox help viiite!!

Marsh Posté le 25-11-2001 à 21:12:29

Salut à tous! Bon vous etes mon dernier recours!!

Ca fé plusieurs jours que je n'arrive pas à faire ca:
Dans une liste déroulante, quand on fé le choix 1, il ecrit 1 et quand on fé le choix 2 bah il écrit 2 c tout con!!

Voilà mon code:
Private Sub Combo1_Click()
If Combo1.List(0) = "Création d'entreprise" Then
Frame2.Visible = True
Elseif Combo1.list(0) = "tralal" then
Frame2.Visible = False
End If
End Sub

Ou est l'erreur?? G po trop compris non plus le (0) il sert à koi??

Merci d'avance !!!

Marsh Posté le 25-11-2001 à 21:12:29

Marsh Posté le 25-11-2001 à 21:53:22

pour lire la valeur sélectionnée du combo, c'est combo1.text
pour savoir quel item de la liste a été choisi, c'est combo1.listindex (0 pour le 1er élément, 1 pour le 2e,...)

---------------
stats boinc : http://jmb.boinc.fr/

Marsh Posté le 25-11-2001 à 21:55:26

j'écrirai ton prog. comme ça :

Code :

Private Sub Combo1_Click()
select case combo1.listindex
case 0
Frame2.visible=True
case 1
Frame2.visible=False
end select
End Sub

[edtdd]--Message édité par jmbocquet--[/edtdd]

---------------
stats boinc : http://jmb.boinc.fr/

Marsh Posté le 25-11-2001 à 22:18:16

ah yes t'assures!! Je test et reposte si ca déconne!!!

Merci t un boss!

Marsh Posté le 26-11-2001 à 09:54:45

On peut l'écrire aussi comme ca :

Private Sub Combo1_Click()

Frame2.Visible = (Combo1.ListIndex > 0)

End Sub

Marsh Posté le 26-11-2001 à 17:53:24

Oki bah merci!! Ca marche tout marche c parfait!! Trop bien!!

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *