affichage textbox

Alors voila mon probleme :

Je veux creer un textbox par enregistrement de ma table Acces & les afficher suivant l' axe Y de mon graph..
Seulement les txtbox s' affiche de haut en bas (au lieu de bas en haut comme je voudrai)
Voici ma fonction
Public Function creer_objet()
compte = 0
For compte = 1 To 5
Load Text1(compte)
' BUG->affiche a l envers
Text1(compte).Top = Text1(compte - 1).Top + Text1(compte - 1).Height + 20
Text1(compte).Visible = True
Next compte

End Function

Le truc c' est que je n' arrive pas a trouver la bonne relation entre "Text1(compte).Top" et "Text1(compte - 1).Top"

Si quelqu' un le sait qu' il me le fasse savoir ..

Merci d' avance..




Pat76

c koi ton container, je veux dire tu affiche les textbox sur une form directement ou alors tu passe autrement avec la gestion des scrolls bar ?


sinon essaye ca :


Public Function creer_objet()
compte = 0
Espace = 20

For compte = 1 To 5
Load Text1(compte)
' BUG->affiche a l envers
Text1(compte).Top = Me.height - (Text1(0).height * compte) - Espace
Text1(compte).Visible = True
Next compte

End Function

Merci quand meme mais ton code marche pas ...
T' es sur de ton coup...

Pat76

Tiens, j'aurais bien remplacé cette ligne :

Text1(compte).Top = Text1(compte - 1).Top + Text1(compte - 1).Height + 20


par celle-ci :

Text1(compte).Top = Text1(compte - 1).Top - Text1(compte - 1).Height - 20



sinon, effectivement, il s'empilent de haut en bas et pas de bas en haut !


Manu

Merci !!
C' etait bien le + qu' il fallait remplacer par un -
Maintenant ca s' affiche ds le bon sens...

Est ce que tu saurait tant qu' a faire comment je peux relier chaque txtbox a un enregistrement de ma table Acces???