error execution ; depassement de capacité

je suis un debutant en vb;
voici un echantillon du code pour lequel j'ai de serieux ennui

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim SeDebut As Long Dim SeFin As Long   SerialDebut = Trim(SerialDebut) 'SerialDebut et serialfin st des valeur saisies ds un text box que je recupère... SerialFin = Trim(SerialFin) SeFin = CLng(SerialFin) SeDebut = CLng(SerialDebut) If (SeFin - SeDebut) > 0 Then NbreSup = NbreSup + 1

---

mon problème c'est que je n'arrive pas a traiter les nombre entier de plus de 10 chiffres tel que 99999999999 (10chiffres) ERREUR:depassement de capacité ;alors que je veux pouvoir traiter des nombre S/N: 9999999999999999 (16 chiffres); le type long n'est til pas approprié? ou y a til une erreur dans mes declarations?? Aider moi SVP

Bonjour,

Cela ne fonctionnerait t'il pas en laissant "SerialDebut" et "SerialFin", c'est a dire des types string ???

VB devrait normalement comparer les deux chaines de caractères ...

Code:

---

1 2 3 4 5 6 7 8 9

Dim SerialDebut As String Dim SerialFin As String   SerialDebut = Trim(SerialDebut) SerialFin = Trim(SerialFin)   If (SerialFin > SerialFin ) Then NbreSup = NbreSup + 1 End If

---

Après si tu veut, vérifie que tes informations saisies soit bien numériques ...

Merci LePoulot
j'y ai pensé mais le problème qui se pose c'est le suivant: j'utilise le resulta de la difference entre "serialFin et serialdebut" dans une boucle For; cmt pallier a cela? merci d'avance

Le type de données Decimal utilise 12 octets pour stocker une valeur. Cela sera-t-il suffisant ?

Edit : je tenais l'info sur le type Decimal d'un bouquin. Mais ce format n'étant pas supporté directement dans VB, mais pour certaines bases de données, soupir!, je propose donc le type variant qui occupe 16 octets. Je fais des tests mais je doute le pire puisqu'il est indiqué (dans le même bouquin) que variant peut contenir 'toute valeur aussi grande qu'une Double' qui occupe seulement 8 octets...

Edit (bis) : Comme je le redoutais, ça ne marche pas. Il reste la référence donnée par LePoulot.

bonjour à tous,

Avec un 'variant' cela a l'air de fonctionner ?

Code:

---

1 2 3 4 5 6

Private Sub Form_Load() Dim a a = 999999999999999# + 1 MsgBox a   End Sub

---

La réponse correspond.
A+

[edit] le signe '#' a été ajouté tout seul par VB
[edit2] affiché en exposant, pour une comparaison ça devrait convenir.