Testo predefinito in TextBox che scompare al click del mouse

[WCB]

Buon pomeriggio a tutti,
avrei gentilmente bisogno di un vostro aiuto.
In una UserForm ho 2 textbox, la mia intenzione sarebbe quella di inserire un testo predefinito, come tipo descrizione, nelle textbox che scompare al click del mouse sulla casella.
Esempio: nei siti web sono presenti delle caselle "inserisci username", "inserisci password" ecc e se si clicca sopra il testo scompare.. ecco, una cosa del genere
Sarebbe possibile fare ciò?
Ringrazio chi vorrà aiutarmi e buona continuazione

[Anthony47]

Il textbox ha la proprieta' ControlTipText che consente di visualizzare un "suggerimento" quando il controllo viene puntato.
Oppure puoi usare una "Label" per visualizzare "sempre" il suggerimento.

Oppure sfrutti gli eventi del textbox per creare l'effetto che hai immaginato; es sull' Enter nel textbox", se e' vuoto viene compilato con il testo di "suggerimento" gia' selezionato (cosi' con l'input da tastiera viene subito cancellato); sull' Exit se il testo e' quello del suggerimento allora viene cancellato.

Ciao

[Zer0Kelvin]

Ciao.
Se vuoi proprio che il testo compaia nella textbox e scompaia al clic, puoi usare l'evento MouseDown

Codice: Seleziona tutto

Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
   
    If Me.TextBox1 = "testo da cancellare al click" Then Me.TextBox1 = ""
   
End Sub

Private Sub UserForm_Activate()

    Me.TextBox1 = "testo da cancellare al click"

End Sub


[WCB]

Buongiorno,
grazie mille per aver risposto.
Ho provato la soluzione di Zer0Kelvin e va benissimo!
Grazie per essere intervenuti e buona continuazione