Remplir MSFlexgrid par Boucle for

Signaler
Messages postés
5
Date d'inscription
mercredi 11 mars 2009
Statut
Membre
Dernière intervention
14 avril 2009
-
Messages postés
5
Date d'inscription
mercredi 11 mars 2009
Statut
Membre
Dernière intervention
14 avril 2009
-
Bonjour;
Je veux remplir une colonne MSFlexgrid en utilisant une boucle for  parce que le nombre de ligne que j'ai dans MSFlexgrid n'est pas fixe mais dépond de la valeur d'un texbox  (j'ai essayé plusieurs code mais ça n'a pas marché )
j'ai utilisé le code suivant
for i=1 to i=MSFlexgrid1.rows-1
with MSFlexgrid1
.textmatrix(i,1)=i
next i
qq1 peut m'aider svp

2 réponses

Messages postés
1263
Date d'inscription
mardi 11 novembre 2003
Statut
Membre
Dernière intervention
24 juillet 2013
6
Salut adilino7
Soit Textbox la textbox qui contient le nombre de lignes (on ne compte pas la ligne 0)

Avec le With
MSFlexgrid1.rows = val(Textbox.Text) +1
for i=1 to MSFlexgrid1.rows-1
    with MSFlexgrid1
        .textmatrix(i,1)=i
     end with
next i

Sans le With cela donne
MSFlexgrid1.rows = val(Textbox.Text) +1

for i=1 to MSFlexgrid1.rows-1

    MSFlexgrid1.textmatrix(i,1)=i
 next i

La version sans le With est préférable à moins que tu utilises d'autres propriétés ou méthodes de MSFlexgrid1 dans la boucle for. Dans ce cas ces propriétés ou méthodes doivent être entre le With MSFlexgrid1 et le End With

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain
Messages postés
5
Date d'inscription
mercredi 11 mars 2009
Statut
Membre
Dernière intervention
14 avril 2009

Merçi Mr GRENIER Alain