Discussion :

[yieiyiei]

Salut,

est-il possible sur un formulaire d'ajouter une "étiquette" par exemple et qu'en allant dessus l'icone de la souris initiallement la flèche devienne la main avec l'index levé et qu'en cliquant sur l'étiquette, le texte s'enfonce.

j'espère être clair , ça n'est que visuel mais si on sait le faire ça m'intéresse.

merci

[Alex_42]

Bonjour,

pour l'icone en forme d'index, il te suffit dans l'onglet Format des propriétés de ton étiquette de mettre un espace dans la ligne 'adresse lien hypertexte'
tu simules ainsi une adresse internet, il te faudra remettre en forme ton texte de l’étiquette car il va te le mettre en bleu souligné (comme un lien internet)

pour le bouton , pas trouvé mieux que ça :

toujours dans l onglet format, à la ligne 'apparence', choisi "en relief"

puis le code suivant sur les 2 evenements 'souris appuyée et souris relaché:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub etiq_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.etiq.SpecialEffect = 2
End Sub
 
Private Sub etiq_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.etiq.SpecialEffect = 1
End Sub

voila, en espérant que ca t'aide un peu.

[yieiyiei]

merci Alex_42, j'ai bricolé un truc avec ça, je pense qu'on ne saura jamais avoir le texte qui s'enfonce, uniquement le contour de boîte mais ton idée était la bonne.

merci.

[Alex_42]

ah, j 'avais mal lu, tu souhaitais un effet sur le texte et non sur le contour ... désolé.
sur le même principe, il faut trouver 2 polices d'écriture qui donnent cet effet là et les lié aux mêmes événements .

bon courage pour la suite .