Sujet Précédent Sujet Suivant

Addition dans une msflexgrid

T103 Messages postés 177 Date d'inscription lundi 11 août 2003 Statut Membre Dernière intervention 21 avril 2010 - 20 sept. 2003 à 23:13
nhervagault Messages postés 6063 Date d'inscription dimanche 13 avril 2003 Statut Membre Dernière intervention 15 juillet 2011 - 20 sept. 2003 à 23:58

sous vb
j'ai creer une msflexgrid a plusieur colonnes
dans l'une d'elle il y a plein de chiffre
ce que je voudrai faire c est lorsque je clique sur un bouton l'ensemble des chiffres dans lla colonne soit additionner et que le resultat soit inscrit dans un textbox
merci beaucoup

A voir également:

1 réponse

Réponse 1 / 1

nhervagault Messages postés 6063 Date d'inscription dimanche 13 avril 2003 Statut Membre Dernière intervention 15 juillet 2011 37
20 sept. 2003 à 23:58

Private Sub Command1_Click()
colonneAAdditionner = 1

For i = MSFlexGrid1.FixedRows To MSFlexGrid1.Rows - MSFlexGrid1.FixedRows

Sum = Sum + CInt(MSFlexGrid1.TextMatrix(i, colonneAAdditionner))

Next
Text1.Text = Sum
End Sub

Private Sub Form_Load()
MSFlexGrid1.Cols = 2
MSFlexGrid1.Rows = 6
For i = MSFlexGrid1.FixedRows To MSFlexGrid1.Rows - MSFlexGrid1.FixedRows
MSFlexGrid1.TextMatrix(i, 1) = i
Next
End Sub

Discussions similaires

Addition et soustraction d'heures

MSFlexgrid

addition en binaire

Faire une somme dans un select

addition d'heure