vb6 ToolTipText, CoomandButton, Checkbox Fermé

Question

Bonjour a tous
Est ce que quelqu'un saurai comment ont fait pour
qu'avec avec un CHECKBOX et un COMMANDBUTTON :

le texte du TOOLTIPTEXT du COMMANDBUTTON s'affiche quand la case du CHECKBOX n'est pas cocher

le texte du TOOLTIPTEXT du COMMANDBUTTON ne s'affiche pas quand la case du CHECKBOX est cocher

En d'autre terme :
le texte s'affiche quand la case n'est pas cocher
le texte ne s'affiche pas quand la case est cocher

ceci est dans mes options du projet biensur

Merci a tous

palui · Answer

bonjour,Private Sub Check1_Click()If Check1.Value = Unchecked Then    Command1.ToolTipText = "exemple"        Else    Command1.ToolTipText = vbNullStringEnd IfEnd Subpeut-être ?

Utilisateur anonyme · Answer

Merci a palui, je vais essayer

Utilisateur anonyme · Answer

Bonjour a Palui et au autre aussiNon ca marche pas, ca dit : Variable non definie.A+

palui · Answer

Variable non definie. il faut avoir défini un checkbox nommé check1et un commandbutton nommé command1( dans cet exemple. )de qu'elle variable parle-t-on ?

Utilisateur anonyme · Answer

Salut a palui et Merci de m'aider a comprendre ce que je fait,Merci.ont parle de la variable command1 je croisA+

Utilisateur anonyme · Answer

Salut a palui et au autre
Votre code marche avec le checkbox placer directement sur form1

mais moi le checkbox est dans frmoption et le tooltiptext du Command1 et dans form1

j'ai donc rajouter ca :
----------------------------------------------------------------------------
Private Sub Check1_Click()

If Check1.Value = Unchecked Then
frmDocument.Command1.ToolTipText = "exemple"
Else
frmDocument.Command1.ToolTipText = vbNullString
End If
End Sub
----------------------------------------------------------------------------
et j'ai 2 messages d'erreurs :

1. le code pour apply doit etre place ici pour permetre la definition des options sans fermer le dialogue.

2. le code place ici doit definir les options et fermer le dialogue.

Merci a ceux qui save
Merci a toussent

Vb6 ToolTipText, CoomandButton, Checkbox

6 réponses

Discussions similaires

Newsletters