OVH Cloud OVH Cloud

Pb de CheckBox

16 réponses
Avatar
jp.witz
Bonjour

J'ai un pb de CheckBox... (avec VB6)
Lorsque je clique sur l'objet la propriété 'value' change et l'évènement
cb_click est exécuté... ce qui est normal.
Comment faire pour que, lorsque 'value' est changé dans le script, que
l'évènement cb_click NE SOIT PAS exécuté.

Merci de votre aide.

JPW

6 réponses

1 2
Avatar
LE TROLL
Ah, Jacques, tu m'as fait un programme qui fait ping-pong entre les
deux procédures, bien que, ça amrcherait mieux avec "multiLine"...

Je ne veux pas polémiquer, mais... un checkBox, c'est bien pour le
cliquer un jour qu'on le met... Alors, ne pas vouloir passer par click (un
seul pour le checkBox), je ne comprends pas, si on veut de la déco, on prend
un label, un picture... Je ne vois guère comment utiliser un check,
autrement qu'en cliquant dessus ??? On peut certes l'allumer à distance,
mais dans ce cas, il n'a plus son rôle, ça devient (ce que je dis), une
image, qui elle, n'engendrera par plusieurs états, comme le check...

Je serais curieux de voir à quoi sert le check ???

Sur ce, bonne nuit à tous :o)

---
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"Jacques93" a écrit dans le message de news:
%23B$
| LE TROLL a écrit :
| > Ah... bravo... oui :o)
| >
| > Mais à part ça, ce que je ne comprends pas, c'est qu'il mette un objet
qu'on
| > clique et qu'il ne veule pas de clique, faudrait commencer par mettre le
bon
| > objet !!!
| >
|
| On modifie parfois par code, l'état, ou plus précisément, une propriété
| d'un objet. Cela peut générer ,selon la propriété, un événement non
| souhaité, mais dont on ne maitrise pas le déclenchement (personne n'est
| parfait, surtout pas moi :-) ) .
|
| Essaie ceci :
|
| Private Sub Text1_Change()
| Text1.Text = Text1.Text & " Le Troll"
| ' ce que j'ai à faire...
| End Sub
|
| Private Sub Text1_Click()
| Text1.Text = Text1.Text & " LE TROLL"
| End Sub
|
| et cliques une seule fois sur le TextBox
|
| ça ne plante pas, quoique au bout d'un moment... mais ça fait beaucoup
| de Troll, non ?
|
| --
|
| Cordialement,
|
| Jacques.
Avatar
Jacques93
Jean-marc a écrit :

[...]


Si un seul programme méritait le qualicatif d'INFERNAL, ce serait
sans conteste celui-là !! A vous donner des cauchemars pendant des
nuit et des nuits :-))))))))))




Bonne nuit quand même :-D

Adage non chinois : ce n'est pas le nombre de lignes qui fait la qualité
du code. Mais moins le nombre de ligne est, plus le bug est facile à
trouver ( Lao Tseu ??? )


--

Cordialement,

Jacques.
Avatar
Jacques93
LE TROLL a écrit :
Ah, Jacques, tu m'as fait un programme qui fait ping-pong entre les
deux procédures, bien que, ça amrcherait mieux avec "multiLine"...

Je ne veux pas polémiquer, mais... un checkBox, c'est bien pour le
cliquer un jour qu'on le met... Alors, ne pas vouloir passer par click (un
seul pour le checkBox), je ne comprends pas, si on veut de la déco, on prend
un label, un picture... Je ne vois guère comment utiliser un check,
autrement qu'en cliquant dessus ??? On peut certes l'allumer à distance,
mais dans ce cas, il n'a plus son rôle, ça devient (ce que je dis), une
image, qui elle, n'engendrera par plusieurs états, comme le check...

Je serais curieux de voir à quoi sert le check ???

Sur ce, bonne nuit à tous :o)



Bonne nuit, c'est pleine lune, les trolls se couchent !!!
ahuri je suis :

<http://www.briographe.com/post/2006/10/06/Mandryka-sous-le-masque-du-Concombre>

je ne suis pas le concombre, c'est ici, comme quoi on peut être dingue,
sans être fou, mais pour le code, la règle est imposée.

http://www.leconcombre.com/echo/jardin-zen/jardin/fr/index.html

tu peux bien sur, visiter d'autres pages ...

--

Cordialement,

Jacques.
Avatar
Jacques93
bahn po a écrit :
bahn po a émis l'idée suivante :
Jacques93 a exprimé avec précision :
Bonjour bahn po,
bahn po a écrit :
jp.witz a présenté l'énoncé suivant :










Tu peux utiliser

check1_Mouseup(Button As Integer, Shift As Integer, X As Single, Y
As Single)


à la place de Check1_Click()




Celà n'empechera pas le déclenchement de l'évènement Check1_Click :-)



"à la place de"



Et je précise que check1.value = 1 ou 0 est transparent pour
check1_mouseup tout en changeant l'état du contrôle check. La solution
est donc l'événement Mouse Up.

Bonne soirée ;)





Quand on veut éviter un événement, faut-il l'éviter ou le contourner ?

PS : les valeurs sont 0 (Unchecked), 1 (Checked) ou 2 (Grayed)
en VB6

:-)

--

Cordialement,

Jacques.
Avatar
bahn po
Jacques93 a présenté l'énoncé suivant :


Quand on veut éviter un événement, faut-il l'éviter ou le contourner ?



En ce qui me concerne check1_Mouseup est parfait. A savoir si cela fera
l'affaire pour jp.witz, si il revient un jour par ici.
Avatar
bahn po
jp.witz a pensé très fort :
Bonjour

J'ai un pb de CheckBox... (avec VB6)
Lorsque je clique sur l'objet la propriété 'value' change et l'évènement
cb_click est exécuté... ce qui est normal.
Comment faire pour que, lorsque 'value' est changé dans le script, que
l'évènement cb_click NE SOIT PAS exécuté.

Merci de votre aide.

JPW



Autre réponse, tu utilises un flag (drapeau) pour specifié quand c'est
le code qui change la valeur du contrôle check.

Soit:

''''''''''''''''''''''''''''''
'.......check1.pas.emmerdant.'
''''''''''''''''''''''''''''''
'
Option Explicit
Dim x As Boolean
'

__________________________

Private Sub Check1_Click()

If x = "Vrai" Then
'
' appel depuis le code,
'
x = "Faux" ' on repasse le flag à Faux

'
' on ne fait rien
' par exemple
'

Else

' ou
' click de l'utilisateur
' = code quand on click
' ...
'
End If

End Sub
__________________________

' bouton command1 pour tester
'
Private Sub Command1_Click()
'
' essai quand le code change la valeur de check1
'
x = "Vrai"
'
Check1.Value = 1
'
x = "Faux"

' ci dessus, ne pas oublier de remettre le flag à Faux
'
'
End Sub


Bye
1 2