begin process at 2012 02 14 11:25:25
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

J'AI BESOIN D'AIDE !!!! :)

 > 

cases a coché : 3 choix


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

cases a coché : 3 choix

lundi 26 juillet 2004 à 17:17:30 | cases a coché : 3 choix

hastan

hello je recherche un truc tout bete ...

pour les cases a coché 3 choix quel est le nom de l etat non actif?
y a oui/ non/ et.?.....


voici mon p'tit code...
lol
If (ArchitectesBois.Value = 0) Then
v_ArchitectesBois = ArchitectesBois.Value
ElseIf (ArchitectesBois.Value = oui) Then
v_ArchitectesBois = oui
ElseIf (ArchitectesBois.Value = non) Then
v_ArchitectesBois = non
End If

et j aimerai que si la case ne st pas activée , il selectionne tous les contacts : architectesbois oui et non , ( ca c est bon..) si oui , qu'il ne selectionne que les architectes pour V_architectesbois = oui et l inverse pour non....
merci
lundi 26 juillet 2004 à 17:47:21 | Re : cases a coché : 3 choix

CanisLupus

Membre Club Administrateur CodeS-SourceS
Salut,

Pour une case à cocher, le test c :

if ArchitectesBois.value = Checked ' pour savoir si elle est cochée
if ArchitectesBois.value = Unchecked ' pour savoir si elle est pas cochée

Je ne vois pas de 3ème choix.

Cordialement

CanisLupus
lundi 26 juillet 2004 à 19:07:45 | Re : cases a coché : 3 choix

goguys

Je crois qu'une case peut être :
- non cochée : Unchecked
- cochée : Checked
- cochée et grisée : Grayed

respectivement les valeurs 0, 1 et 2...
lundi 26 juillet 2004 à 19:09:35 | Re : cases a coché : 3 choix

jack

Administrateur CodeS-SourceS
Correctif :
if ArchitectesBois.value = vbChecked ' pour savoir si elle est cochée
if ArchitectesBois.value = vbUnchecked ' pour savoir si elle est pas cochée

... Si, les CheckBox peuvent prendre un état vbGrayed = grisée mais je ne sais plus dans quelle circonstance ...

Vala
Jack
lundi 26 juillet 2004 à 19:21:25 | Re : cases a coché : 3 choix

DARKSIDIOUS

Membre Club Administrateur CodeS-SourceS
Tu peux toujours les griser manuellement lors de l'événement click selon la valeur actuelle du checkbox et l'ancienne valeur de celui-ci...

DarK Sidious

[Responsable API/VB du site www.ProgOtoP.com]
Téléchargez ProgOtoP API Viewer
lundi 26 juillet 2004 à 20:15:34 | Re : cases a coché : 3 choix

CanisLupus

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !
DSL jack, Checked et Unchecked sont parfaitement bien compris en vb6. Pas besoin de vb.....

S'il y a un 3ème état c Check1.Enabled = false (càd grisé sans possibilité de cliquer dessus) qu'elle soit cochée ou non.

Donc, je résume tous les états d'une case à cocher (soit 4) :

Check1.Enabled = True And Check1.value = Checked
Check1.Enabled = True And Check1.value = Unchecked
Check1.Enabled = False And Check1.value = Checked
Check1.Enabled = False And Check1.value = Unchecked

Cordialement

CanisLupus
lundi 26 juillet 2004 à 20:18:29 | Re : cases a coché : 3 choix

CanisLupus

Membre Club Administrateur CodeS-SourceS
Enfin, en vb6 ça marche, pour les versions inférieures, je ne garantis pas.

Cordialement

CanisLupus
lundi 26 juillet 2004 à 20:51:13 | Re : cases a coché : 3 choix

hastan

humm.. j dois vraimment avoir du mal..... :'(

voila mon code....
il en veu tjr pô snif...


If (ckArchitectesBois.Value = Checked) Then
v_ArchitectesBois = "True"
MsgBox "coché"
ElseIf (ckArchitectesBois.Value = Unchecked) Then
v_ArchitectesBois = "False"
MsgBox "pacoché"
ElseIf (ckArchitectesBois.Value = Grayed) Then
v_ArchitectesBois = "*"
MsgBox "griser"
End If

dans l doute g essayer avec "vbChecked" mais aucune difference...
les msBox sont juste la pour verifier la valeur renvoyée...

merci tt de meme pour toutes les reponses!!
lundi 26 juillet 2004 à 21:40:55 | Re : cases a coché : 3 choix

CanisLupus

Membre Club Administrateur CodeS-SourceS
Bon, essaie ça alors :

If ckArchitectesBois.Enabled = False Then
v_ArchitectesBois = "*"
MsgBox "griser"
else
If ckArchitectesBois.Value = Checked Then
v_ArchitectesBois = "True"
MsgBox "coché"
Else
v_ArchitectesBois = "False"
MsgBox "pacoché"
end if
End If

Cordialement

CanisLupus
mardi 27 juillet 2004 à 18:56:10 | Re : cases a coché : 3 choix

goguys

Bonjour,

Ce code fonctionne* :

If (ckArchitectesBois.Value = 1) Then
v_ArchitectesBois = "True"
MsgBox "coché"
ElseIf (ckArchitectesBois.Value = 0) Then
v_ArchitectesBois = "False"
MsgBox "pacoché"
ElseIf (ckArchitectesBois.Value = 2) Then
v_ArchitectesBois = "*"
MsgBox "griser"
End If

*Attention, je crois qu'il y a un petit quiproco dans ces réponses. Est ce qu'on parle de l'état inactif de la case (ckArchitectesBois.enabled = False)?
Ou est-ce qu'on parle de l'état de la case qui n'est ni cochée ni "pas cochée" autrement dit l'état grisé (ckArchitectesBois.value=2)?

J'ai mis "=2" et pas "=Grayed" sinon chez moi ça marche pô...

1 2

Cette discussion est classée dans : cases, value, coché, oui, architectesbois


Répondre à ce message

Sujets en rapport avec ce message

cases à cocher questionnaire [ par severino li ] Bonsoir,Je souhaiterai savoir si quelqu'un connaîtrai un moyen pour intégrer dans un masque de saisie pour un questionnaire la valeur "oui","non" et " couleur du texte dans cases excel [ par joina ] je sais que cette question a déja été posée mais je n'ai trouvé aucune reponse satisfaisante pour VB. Ca c'est mes cases :A_EXCEL.Worksheets(1).Range( VBA excel: copier-coller avec incrémentation [ par Jeep13330 ] Bonjour à tous ! Voila un problème sur lequel je bûche avec grandes difficultés. Y aurait -t il un être qui pourrait m'éclairer ? En vous remerciant, Conditions multiples [ par Gyamso ] Bonsoir, J'aurais besoin d'aide pour la programmation d'un script VB sous word 2003. Voici de quoi il s'agit : j'ai 4 cases à cocher, appelons les A B WebBrowser + ComboBox [ par christophe658 ] salut a tous , j'utilise WebBrowser pour recupére une page et j'aurais aimé reprendre les valeurs entre .... d'une liste deroulante qui ressemble a ce datetimepicker [ par ucf662 ] je suis nouveau ici et j'ai besoi d'aise svp voici mon code le probleme que je rencontre c'est que je veux que lorsque le jour de la reprise du trav Un débutant a besoin d'aide en Programmation VBA.. [ par vichoo90 ] Bonjour à tous, Je suis nouveau stagiaire dans une entreprise, et mon premier projet consiste à exploiter les données d'un classeur Excel qui se rempl Erreur InvalidOpérationExcepion [ par jbgames ] Bonjour, je crée actuellement une application plutôt simple et lorsque je veux la déboguer le message suivant apparait : [IMG]http://img809.i Faire un Graph Excel par VB6 [ par coolboy2008 ] bonjour, dans mon projet en Vb6, j'ai commencer a crée des rapport excel, je lance un code dans vb et ceci m'ouvre une page excel avec mon graphe, to [déplacé VB.NET -> VBA] Userform avec filtre ou tri [ par vincenttinet ] Bonjour le forum, Je cherche une solution pour excel 2003. J'ai besoin d'aide sur un Userform en complement d'information. j'ai créé un Userform, q


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,153 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales