Ben c'est que c'est en VB
Mais je posais ma question ici vu que c'est un problème de math.
Mais bon, voici le code:
While Not EOF(iFreeFile)
startPos = 1
Line Input #1, sTmp 'Lire une ligne complète et la mettre dans sTmp.
For x = 0 To 5
iLen = InStr(startPos, sTmp, sPipe) - startPos
List1.AddItem Mid(sTmp, startPos, iLen)
startPos = startPos + iLen + 1
Next
List1.AddItem Mid(sTmp, startPos, Len(sTmp))
'Je voudrais supprimer cette ligne et mettre for x = 0 to 6 et mettre startpos = startpos + ilen + 1 au début et faire en sorte que ilen retourne soit la longueur de la chaine stmp ou soit il retourne la valeur de Instr si c pas 0, donc qu'il renvoit soit la position de la string sPipe ou soit la longueur de la chaine sTmp si c 0, donc jamais 0
Wend