creation d'un textbox par clic sur un bouton

Question

bonjour,
voila ce que j'aimerais faire  :
dans un "Form" j'ai un bouton. j'aimerais que lorsque je clique sur ce
bouton, il aparaiise sur le form un TextBox (en dessous du bouton)
mais le problême c'est que je ne vois pas du tout comment faire. d'habitude
je "dessinais le contôle" mais là il faut que je le créé dynamiquement .
j'espere qu'il y a une solution pas trop complexe

Merci

Pascal

heromega · Answer

Oh, ça a l'air compliqué mais c'est tout simple!
En faite, on va cacher le textbox, et quand on clique sur le bouton, on va le faire apparaitre!!
Il suffit pour cela d'aller dans les propriétées de la textbox, est à la propriété VISIBLE tu met FALSE. Ta textbox disparaitra lors de l'execution.
Ensuite à ton bouton tu met comme code:
text1.visible=true
Et c'est tout! 
Au début ta box sera caché, aprés un clic sur le bouton, elle sera montrer! Tout simple!

heromega@aol.com

Mikkael · Answer

Salut,

Je te propose cette solution:

Private Sub Command1_Click()
   Text1.Visible = True           'Montre le TextBox
End Sub

Private Sub Form_Load()
  Text1.Visible = False           'Cache le TextBox 
End Sub

PS: il faut un TextBox sur ta feuille nommé Text1

A+

palouf · Answer

Ok, disons que ce que je voulais faire était plus dynamique.
je vous ajoute le code que j'ai utilisé:

Dim mabox As TextBox
Set mabox = Form1.Controls.Add("vb.textbox", "lenomquetuveux")
mabox.Visible = True

Merci a EWAD qui m'a envoyé la premiere partie et a Mikkael et heromega pour le Visible (passque sinon on le voit pas :) )

cs_slimane5 · Answer

ghjkjhgkhighij

Creation d'un textbox par clic sur un bouton

4 réponses

Discussions similaires