Masquer contenu des textbox [Résolu]

Signaler
Messages postés
360
Date d'inscription
dimanche 3 décembre 2006
Statut
Membre
Dernière intervention
3 janvier 2012
-
 pimpass -
Re bonjour,

Je voudrais être en mesure dans un formulaire (UserForm) de masquer le contenu de plusieurs textbox, et cela en cliquant sur  ToggleButton1.

Est-ce possible ou y a t-il une façon rapide de masquer le comtenu sans masquer les textbox?

En réalité, je veux avoir le choix de laisser le détail de chaques textbox ou tous simplement de masquer le contenu mais possédant quand même la valeurs à l'interieur.

Merci 

8 réponses

Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
65
Salut
Regarde s'il existe une propriété nommée PasswordChar dans ta TextBox (j'ai un doute sous VBA)
En y mettant une étoile, les caractères se transformeront en une suite d'étoile.
Pour revenir à l'affichage normal, tu n'as qu'à remettre à zéro cette propriété.

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
Messages postés
7668
Date d'inscription
samedi 5 novembre 2005
Statut
Membre
Dernière intervention
22 août 2014
21
Et si tu veux "rigoler" :

Private couic As Boolean




Private Sub Command1_Click()
  coucou
End Sub


Private Sub Text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
   If couic Then Text1.SelStart = Len(Text1)    'cà, c'est pour que l'on ne puisse pas "voir" en sélectionnant
End Sub


Private Sub coucou()
  Text1.BackColor = vbWhite
  Text1.ForeColor = vbWhite
  couic = True
End Sub
Messages postés
4531
Date d'inscription
dimanche 29 septembre 2002
Statut
Modérateur
Dernière intervention
22 avril 2019
8
Sinon tu mets le contenu dans des variables

@+

E.B.
Messages postés
7668
Date d'inscription
samedi 5 novembre 2005
Statut
Membre
Dernière intervention
22 août 2014
21
En te réservant bien évidemment la possibilité de rétablir les choses !

Private Sub Command2_Click()
  bon
End Sub

Private Sub bon()
  Text1.BackColor = vbWhite
  Text1.ForeColor = vbBlack
  couic = False
End Sub
Messages postés
360
Date d'inscription
dimanche 3 décembre 2006
Statut
Membre
Dernière intervention
3 janvier 2012
3
Merci beacoup les amis 
Bonjour,

Une autre méthode serait envisageable ? J'aimerai cacher le texte de la TexBox en ayant tout de même la possibilité d'entrer une valeur par dessus (afin de confirmer celle -ci).
La valeur est mise dans une variable de type String.

Je vous remercie par avance

Cordialement,
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
220
Bonjour,
Et les réponses ci-dessus ne répondent pas à ta problématique ?
Si oui : pourquoi ta question ?
Si non : expose plus clairement les tenants et aboutissants.


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.
Pour comprendre le programme : On importe une liste de mots, cette liste s'intègre dans plusieurs Texbox. Un bouton cache la liste des mots dans les Texbox, puis la personne doit retrouver les mêmes mots en les écrivant dans les mêmes Texbox. Un bouton correction vérifiera si les mots sont justes. Je n'est trouvé aucune aide, cependant j'ai cherché une autre alternative en superposant des labels sur les texbox ça fonctionne ^^ mais je pense qu'il y a plus simple.