NeWBiE demande aide pour créer une boucle ;)Résolu

Question

bonjour

bon je capte pas trop comment faire une boucle de tel sorte que
cel - ci incremente et donc change l'objet 

je ne cé po comment decrire ce ke je veux faire (je sais sa va etr dur dans ce cas mé voila ce ke j'essay de fair...)

i = 0
Dirrst.MoveFirst
Do While i < 3
bouton& i & .Caption = Dirrst![Caption]
i = i + 1
Dirrst.MoveNext
Loop

en fait je vx assigné une valeur a un de mé bouton , pui apré on va a la valeur suivante é donc on va o proch1 bouton aussi

g po topé d'aide sur sa...

merci de me documenté ;)

ciaooo

GaMeS

TheEwook · Accepted Answer

Salut, 

En faite il faut que tu crée en goupe de control avec tes boutons

de sorte que tes boutons se nomment : bouton(0), bouton(1), etc.....

et donc voilà le code :


i = 0
Dirrst.MoveFirst
Do While i < 3
bouton(i).Caption = Dirrst![Caption]
i = i + 1
Dirrst.MoveNext
Loop


voilà

@++

________________
TheEwook

bilaloch · Answer

Tu veu le faire en quoi vb.net ou vb?

@ Plus  ;) 

BIL@Loch
  :)

cs_GaMeS · Answer

re , 

je veux le faire en VB 6 ;)

voila , tu px m'aidé alors ;)

sa serai cool ;)

merci d'avance ;)

GaMeS ;)

jrivet · Answer

tu as combien de bouton, 3 je suppose , il faut qu ils aient tous le meme non (apres avoir creer une matrice de bouton)

i = 0
Dirrst.MoveFirst
Do While i < 3
 -> ca change la : bouton(i) .Caption = Dirrst![Caption]
i = i + 1
Dirrst.MoveNext
Loop
-------------------------------------------------
Essai ca sinon on trouvera autre chose
-------------------------------------------------

 :big)

bilaloch · Answer

re,
Deja tu doi mettre un index pour chaque bouton. Ensuite tu doi mettre un textbox avec DataSource le data, DataField le champs dans la base de donnée. Ensuite le code :


Dim I
I = 0
Dirrst.MoveFirst
Do While i < 3
bouton( i ) .Caption = nom_du_textbox.Caption
I = I + 1
Dirrst.MoveNext
Loop


@ Plus  ;) 

BIL@Loch
  :)

bilaloch · Answer

Oups on a ecrit en meme temps je crois...

@ Plus  ;) 

BIL@Loch
  :)

nhervagault · Answer

Salut,

Je pense que pour ce que tu veux faire il faut utiliser les index.

Nomme ton premier button
apres copie colle et les index se mettront en place

Equivalent a 

Premier button 
name button1 : index 0

ensuite 

name button1 : index 1
name button1 : index 2
name button1 : index 3
name button1 : index 4

et apres ta boucle devient
i = 0
Dirrst.MoveFirst
Do While i < 3
button1 ( i ) .Caption = Dirrst![Caption]
i = i + 1
Dirrst.MoveNext
Loop

apres tu peux encore faire un peux plus dynamique
si tu veux le meme nombre de boutons que d'enregistrement

tu dois utilier
load button(i) dans ta boucle
et jouer avec leur visibilité.
et leur emplacement 

mais ces une autre histoire ;-)

voila

cs_GaMeS · Answer

merci beaucoup pour vous message , je programme sa de suite ;)

bonne continuation ;)

bon je mate la F1 en meme temp , pff cé encor shumi ki va gagné mé bon ...

NeWBiE demande aide pour créer une boucle ;)

8 réponses

Discussions similaires