Formatage de chaines et mesures de temps d'execution

Soyez le premier à donner votre avis sur cette source.

Vue 4 288 fois - Téléchargée 204 fois

Description

Quand on calcule de très grands nombres (>1000 chiffres) le temps d´affichage du résultat dans un text.box n´est pous négligeable.
On compare deux méthodes:
1)On lit,on formatte,on assemble 4 blocs de nombres, puis on affiche la chaîne ainsi formée
2)L´instruction d´affichage contient aussi la lecture des données et leur formatage
La seconde méthode est 2 à 3 fois plus rapide que la première.D´autres solutions existent.
J´aimera recevoir plus d´information sur dáutre façon de procéder.

Source / Exemple :


Voir Zip

Codes Sources

A voir également

Ajouter un commentaire

Commentaire

Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
65
Tu compares tout et n'importe quoi...

par exemple, la première ligne de ce code (Avant) :

a(i) = Text1(i).Text 'Lecture
a(i) = Format$(Text1(i).Text, "0000") 'Formattage

n'a rien a faire là... puisque tu écrases aussitot a(i)

de plus, tes mesuers sont fausses, puisque le contenu de tes deux textboxes, a l'arrivée sont différents (erreur de codage)

essaye plutot, par exemple :

Dim c As String
For j = 1 To 100
For i = 0 To 3
c = c & Format$(Text1(i).Text, "0000") 'String de sortie
Next i
Next j
Text1(4).Text = Text1(4).Text & c

et tu verras que le temps de traitement diminue sensiblement. En effet, chaque fois que tu modifie le TextBox, celui ci est redessiné, cela est couteux....

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.