[Line et décimaux] problème visual basic 6

Bonjour,

Je me retrouve bloqué sur une portion de code:

Dim Decoupe() 

For Each Elements In Lignes
    Decoupe() = Split(Elements, " ")
    picturebox1.Line -(Decoupe(0), Decoupe(1))
Next
Erase Decoupe()
End Sub

avec Lignes déclarée comme collection.

Dans le tableau Decoupe j'au une suite de nombre. Au début tout fonctionne mais l'eereur 13 est générée lorsque qu'un nombre décimal arrive.

Quelqu'un peut-il me venir en aide s'il vous plait merci d'avance