Discussion :

[DiverSIG]

j'ai un tableau à 2 dimensions (1911 lignes et 2261 colonnes), et j'écris les valeurs du tableau dans un fichier texte.

voici les lignes de code pour écrire dans le fichier :

Code :

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

1
2
3
4
5
6
For l = 1 To nbl
        For c = 1 To nbc
            'toto = x_0 + (c - 1) * 50
            Print #num_out, CStr(y_0 + (l - 1) * 50) & dlm_out & CStr(x_0 + (c - 1) * 50) & dlm_out & T_MNT(l, c)
        Next c
    Next l

nbl et nbc contiennent les valeurs 1911 et 2261, déclarées en type integer.
x_0=860000 et y_0=1781000 (constantes déclarées en type long)

l'instruction print plante quand l=1 et c=657 au niveau de CStr(x_0 + (c - 1) * 50), avec le message d'erreur 'dépassement de capacité'.

à ce niveau, x_0+(c-1)*50 vaut 892800, ce qui ne correspond à aucune valeur limite d'un type de donnée.

quelq'un a-t-il une idée du problème ?

[random]

teste ceci

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Sub testegrandeur()
On Error GoTo error1
Dim a As Byte
a = 255 + 255 - 255
MsgBox ("ca passe avec des nombres")
a = a + a - a
Exit Sub
error1:
MsgBox ("ca passe pas avec des variables ")
End Sub

moralité vb utilise une valeur tampon à laquelle il donne une taille qu'il juge convenable pour 255 il ne se trompe pas mais pour a (byte) qui vaut pourtant
255 quand le tampon vaut 510 il pleure

[ouskel'n'or]

Si le dépassement de capacité ne concerne pas les nombres, alors le pb vient "d'ailleurs". Essaie d'ajouter un retour chariot en fin de ligne et dis-nous

Code :

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

 Print #num_out, CStr(y_0 + (l - 1) * 50) & dlm_out & CStr(x_0 + (c - 1) * 50) & dlm_out & T_MNT(l, c) & chr(13)

A tout hasard