Faire une somme en VB5

Résolu
bubulle122 Messages postés 4 Date d'inscription mercredi 24 novembre 2010 Statut Membre Dernière intervention 20 décembre 2010 - 19 déc. 2010 à 03:39
bubulle122 Messages postés 4 Date d'inscription mercredi 24 novembre 2010 Statut Membre Dernière intervention 20 décembre 2010 - 19 déc. 2010 à 11:04
Bonjour,

J'ai défini ma matrice m(u,v) sous forme de tableau.
Je voudrais maintenant calculer la somme de tous les éléments de m ou seulement sa trace par exemple.
Existe-il une fonction somme en VB ?

Je n'en ai pas trouvé et c'est assez fastidieux de taper masomme = m(1,1) + m(1,2) + ... + m(u,v) + ...

Merci d'avance !

3 réponses

Number7 Messages postés 23 Date d'inscription vendredi 1 février 2002 Statut Membre Dernière intervention 27 décembre 2010 1
19 déc. 2010 à 04:08
Tu n'a qu'a utiliser deux boucle ForNext Impriqué
Par exemple, si dans ton tableau m(u,v), u va de 1 a 10 et v de 1 a 10
tu n'a qu'a faire ca

Code :

Dim u as integer
Dim v as integer
Dim Total as long

Total = 0

For u = 1 to 10
For v = 1 to 10
Total = Total + m(u,v)
Next v
Next y

Ca remplace:

Total = 0
Total = m(1,1)
Total = Total + m(1,2)
Total = Total + m(1,3)
Total = Total + m(1,4)
Total = Total + m(1,5)
Total = Total + m(1,6)
Total = Total + m(1,7)
Total = Total + m(1,8)
Total = Total + m(1,9)
Total = Total + m(1,10)
Total = Total + m(2,1)
Total = Total + m(2,2)
Total = Total + m(2,3)
Etc...

Ma passion : l'électronique et la programmation
3
Number7 Messages postés 23 Date d'inscription vendredi 1 février 2002 Statut Membre Dernière intervention 27 décembre 2010 1
19 déc. 2010 à 04:10
Désolé, une petite erreur de frappe

Remplace Next y par Next u



Ma passion : l'électronique et la programmation
0
bubulle122 Messages postés 4 Date d'inscription mercredi 24 novembre 2010 Statut Membre Dernière intervention 20 décembre 2010
19 déc. 2010 à 11:04
Génial, merci !
0
Rejoignez-nous