Bonjour,
Ce n'est pas très lisible. Dans un premier temps, je te conseille de placer la fin de ta boucle dans une variable.
Dim Limite As Int32 = 0
If (MonObjet IsNot Nothing) Then
Limite = MonObjet.Lenght - 2
For Boucle As Int32 = 0 To Limite
'...
Next
End If
ou
Dim Limite As Int32 = 0
If Not(String.IsNullOrEmpty(MonObjet)) Then
Limite = MonObjet.Lenght - 2
For Boucle As Int32 = 0 To Limite
'...
Next
End If
Déjà, si tu copie le code plutôt qu'un image, ce sera plus facile à comprendre le problème. Selon ce que je vois, l'objet n'est pas instancié.
K