Comprendre Fonctionement des Tableaux

Question

Bonjour, 
Je debut en VB.NET
L'appli est dispo ici: 
http://www.pitoux.com/tableau.zip
En gros 1 bouton permet d'entrer une liste de temp&#233;rature et le deuxieme boutton (code ci-dessou) affiche les temp&#233;rature et calcul une moyenne

Je travail sur les Tableau. et je ne pige pas comment fonctionne ce code:



1. Dim Result 
As 
String
2. Dim i 
As 
Short
3. Dim Total 
As 
Single = 0
4. Result = "High temperatures:" & vbCrLf & vbCrLf

5.      
6. For i = 0 
To UBound(Temperatures)
7.     Result = Result & "Day " & (i + 1) & vbTab & _Temperatures(i) & vbCrLf
8.      Total = Total + Temperatures(i)

9. Next


10. Result = Result & vbCrLf & _"Average temperature: " & Format(Total / Days, "0.0")
11. TextBox1.Text = Result

Se que je pige pas, la variable "Resut" ligne 3 se voit affact&#233; une valeur que l'on affiche pas.

De la s'execute le FOR en ligne 6. En ligne 7 on donne une nouvelle valeur a "Result" se qui donc annule son ancienne valeur (ligne 4) .
Et pourtant quand j'execute le programme le message "High temperatures" s'affiche. Pourquoi ? Aucune instruction ne l'affiche et sa valeur est effac&#233; bien avant d'arriver a la ligne 11.?

Ensuite et pour finir Admetton que j'ai 3 temp&#233;ratures, se qui veux dire en gros:
6. For i = 0 
To 2
A chaque execution de mon FOR- NEXT la variable RESULT et TOTAL prennent une autre valeur. Et donc efface l'ancienne valeur.

Je comprend pas que la ligne 11 arrive a afficher toute mes temp&#233;rature.

J'esp&#233;re que je suis claire dans mon probl&#233;me.
Sinon vous avez un Micro sous MSN mon contact est  LaurentATpitoux.com

Egyde · Answer

4. Tu initialise la chaîne de caractère Result avec "High temperatures:" & vbCrLf & vbCrLf

6 à 9. A chaque itération de ta boucle, tu concatènes Result et "Day " & (i + 1) & vbTab & _Temperatures(i) & vbCrLf. Chaque itération a pour effet de rajouter une ligne à Result

10. Tu affiches Result.

=> A chaque itération, l'ancienne valeur n'est pas effacée. Il faudrait pour cela remplacer 7 par :

Result = "Day " & (i + 1) & vbTab & _Temperatures(i) & vbCrLf

C'est pourtant simple ;S

Pitoux78 · Answer

Donc en gros une variable peux etre incr&#233;ment&#233; de plusieurs valeur a condition qu'a chaque ajout d'&#233;l&#233;ment un saut de ligne soit effectu&#233; ?

PCPT · Answer

result = result & qqchose





result = "bonjour" [entr&#233;e]


result = "bonjour" [entr&#233;e] ET "monsieur"


result etc......





@+

Comprendre Fonctionement des Tableaux

3 réponses

Discussions similaires