Sujet Précédent Sujet Suivant

Problème checkbox

Résolu/Fermé
stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 - 18 août 2010 à 18:00
stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 - 18 août 2010 à 22:19
Bonjour,

Je suis débutant en vb6 et je cré un petit logiciel utilisant des checkbox et une base de donnée access.

Lorsque j'enregistre la valeur de ma checkbox dans ma base données pas de soucis.

Lorsque je veux charger la valeur de ma checkbox il me met "valeur de propriété incorrect" parcequ'il reçoit comme valeur "vrai" au lieu de "1"

Ma question est donc comment convertir une valeur "vrai" en "1" dans un code vb6.

Merci

9 réponses

Réponse 1 / 9
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
18 août 2010 à 18:23
Bonjour,
C'est un bug de VB6 Francais
Quand il enrégistre il met "Vrai" mais pour restituer il faut "True"
Pour y remédier.. 
    If TaValeur = "Vrai" then CheckBox1.value = True

A+
0
Réponse 2 / 9
stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 1
18 août 2010 à 20:40
Merci ça marche, mais je pensais qu'il y avait peut-être moyen de convertir le "vrai" booléen en "1" integer directement dans ma ligne de code sans devoir passer par If...Then

Tu comprends ce que je veux dire?
0
Réponse 3 / 9
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
Modifié par lermite222 le 18/08/2010 à 21:18
C'est possible, dis d'abord..
Comment tu enrégistre la valeur CheckBox dans ta BD ?
L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
0
Réponse 4 / 9
stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 1
18 août 2010 à 21:24
Dans un champ ayant comme type de valeur "oui/non"

par la ligne de code

.Fields("ChantierIdentiqueFacturation") = FormRepertoire.RepIdentique.Value

et je la récupère avec la ligne de code

.RepIdentique.Value = Enregistrement.Fields("ChantierIdentiqueFacturation")

Et là ça bug du au retour vrai à la place de true
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 9
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
18 août 2010 à 21:45
Y a quelque chose que je comprend pas, la valeur d'un checkBox en VB6 est 1 ou 0, alors comment ce fait-il que tu à un Boolean ?
0
Réponse 6 / 9
stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 1
18 août 2010 à 21:51
C'est vrai qu'il suffirait alors que je transforme mes champs de base de données en integer à la place de booléen et ça devrait marcher. je vais essayer et je te tiens au courant
0
Réponse 7 / 9
stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 1
18 août 2010 à 21:57
Eh oui tout simplement, que suis-je bête, merci du coup de mains...
0
Réponse 8 / 9
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
Modifié par lermite222 le 18/08/2010 à 22:00
Un petit truc que j'emploi pour palier au bug des boolean.
J'enrégistre en integer 
dim A as Integer,B as Boolean 
A = Abs(Boolean) si c'est -1 ça fera 1 sinon 0 
et pour assigner 
B = -A , si A= 0 beh.. ça fera 0 et si c'est 1 ça fera True.

L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
0
Réponse 9 / 9
stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 1
18 août 2010 à 22:19
Je note ton petit truc

Grand merci
@+
0

Discussions similaires

VBA : If CheckBox.Value = True Or CheckBox.Value = True Then ...
fannoche35 -
fannoche35 -

4 réponses
[PHP] Récuperer la valeur d'une checkbox
CrosmanBeauGoss42 -
bul -

6 réponses
checkbox + onChange
sebounty -
nieuxeur -

7 réponses
Formulaire : checkbox envoie 1 si coché et 0 si non
loutry -
loutry -

2 réponses
[VBA] Checkbox sous excel
gloglo111 -
Moi Sonneuse -

9 réponses