VB dynamique ?

**suckthewindow** · 01/12/2005, 12h36

Bonjour a tous,
j'essaie de developper une appli en vb ... bon j'avoue ne pas etre un grand fan de vb mais je n'avais pas le choix ... peut etre que je me trompe sur se langage ... enfin l'avenir me le dira

tout ca pour dire: est-il possible en vb de placer des champs textes de facon dynamique ??
le nombre de champs et leur position etant fonction du contenu d'une bd

merci a tous
++

**loacast** · 01/12/2005, 12h55

Dès le moment ou tu peux créer un contrôle et intéragir avec une base de données, ce que tu demandes est tout à fait possible. Par contre je ne crois pas que l'on puisse créer des contrôle dynamiquement avec VBA, si tu bosses avec VB6 ou mieux avec VB.net, no soucy.

**suckthewindow** · 01/12/2005, 12h59

je bosse en vb6 ... mais comment creer des controles dynamiquement ? as tu un exemple de code ?

merci

**Le Pharaon** · 01/12/2005, 13h03

Ici dans les faqs
http://vb.developpez.com/faq/?page=Form#ctl_dynamique

**suckthewindow** · 01/12/2005, 13h12

merci bcp

**leroissejp** · 01/12/2005, 13h42

Bonjour,
Tu places un TextBox sur ta Form et tu mets l'Index à 0.

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
16
17
18
19
20
21
22
 
Private Sub Command1_Click()
' Déclare la variable.
   Dim I
 'Positionne le TextBox sur la barre d'outils.et ensuite s'amuse
   Text1(0).Move 0, 0, 800, 400
   ' Crée les autres TextBox.
   For I = 1 To 3
      ' Crée un bouton.
      Load Text1(I)
      ' Place et dimensionne le TextBox.
        Text1(I).Top = Text1(I - 1).Top + 500
      ' Affiche le TextBox.
      Text1(I).Visible = True
   Next I
   ' Définit les légendes des TextBox.
   Text1(0).Width = 5000
   Text1(0).Text = "Au lieu de .Text, tu mets .DataField = ton recordSet!nom du champ."
   Text1(1).Text = "Idem"
   Text1(2).Text = "Idem"
   Text1(3).Text = "Idem"
End Sub

jpleroisse