Discussion :

[csmaf2002]

Salut,je suis encore débutant en vb et j'essaye de tracer un graphe a partir de valeurs sauvegardées dans un tableau mais je recois ce message d'erreur : "l'index fourni est hors limites" svp est ce que qq pourrait m'aider, merci
voila mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Private Sub Form_Load()
 
Dim row As Single
 
MSChart1.TitleText = "Courbe de variation Y=f(X)"
 MSChart1.chartType = VtChChartType2dLine
 
 
 With MSChart1
 ' Pas de rafraichissement...
 .Repaint = False
 
 .ColumnCount = 1 ' 1 graphiques
 .RowCount = nbdepointx ' Nb points
 
 ' Tracé du 1er graphe
 .Column = 1 ' numero du graphique
 .ColumnLabel = "essai" ' Libellé du 1er graphe
 
 'on rentre les valeurs du graphe point par point
 For row = 1 To nbdepointx
 .row = vartab(row) 'X
 .RowLabel = CStr(row)
 .Data = vartab1(row) 'Y
 Next row
 
 ' Rafraîchissement du controle
 .Repaint = True
 End With
End Sub

vartab et vartab1 sont les tableaux déclarés dans le module
nbdepointx est le nombre de points a tracer

[SfJ5Rpw8]

sur quelle ligne l'erreur ...?

comment sont déclarés tes variables tableaux..? et comment et renseignée ta variable nbdepointx
?

[csmaf2002]

je sais pas sur qu'elle ligne , il m'affiche juste ce message "l'index fourni est hors limites" erreur 1117, mes variables dans le tableau sont des strings converties en réels avec val()

nbdepointx est déclarée comme public dans un module,avant l'affichage du graph elle est déjà affectée a un entier sur une autre form.

[SfJ5Rpw8]

bon tu m'as pas répondu ... ta variable nbdepointx .. semble être la valeur maximale de ton index... et tes tableaux tu ne nous as toujours pas dis qu'elle était leur dimensions....