[VB.Net] problème avec "Spilt"

Bonjour,

Je ne recupère pas la valeur correctement dans ce code
Code:

1 2 3 4 5 6 Dim newphoto() As String Dim separ As Char = "\" Open.ShowDialog() chemin = Open.FileName newphoto = chemin.Split(chemin, separ) flphoto = newphoto(UBound(newphoto))
La terminaison du chemin est : BF57.gif et je ne recupère que 57.gif dans flphoto
quelqu'un à une idée du pourquoi

Je précise que je récupère très bien les autres terminaisons qui sont du style 0001.gif

D'avance merci