Bonjour,

J' ai trouvé une solution pour creer un textbox dynamique :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Set var = question.Controls.Add("Forms.TextBox.1")
cette méthode fonctionne.

Le problème est que : quand je veux boucler x fois cette creation de textbox et que je veux renommer la textbox en :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
with var.name = "var"+cstr(x)
Je n'arrive pas a récuperer la valeur du text box par les variables var1, var2, varn... je n'arrive même pas à recuperer mon résultat dans une msgbox.

Avez vous une solution à me proposer, ci-dessous mon code complet :


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Do while x <> 5
 
Set var = question.Controls.Add("Forms.TextBox.1")
With var
.Name = "var" + CStr(x)
.Left = 120
.Height = 18
.Width = 54
.Top = 72 + 24 * x
End With
 
msgbox controls("var"+cstr(x))
 
x=x+1
loop