Vbsupernul
Messages postés287Date d'inscriptionvendredi 25 octobre 2002StatutMembreDernière intervention18 janvier 2004 17 nov. 2002 à 18:25
pas tout à fait
Je fais un crypteur/décrypteur
je fais
"a" = 1
"b" = 2
retour chariot = 3
@+
Vbsupernul (tout le monde le sait maintenant... c'est malin :sad) )
Vous n’avez pas trouvé la réponse que vous recherchez ?
cs_rene38
Messages postés1858Date d'inscriptionsamedi 29 juin 2002StatutMembreDernière intervention17 octobre 201311 17 nov. 2002 à 19:19
For i = 1 To Len(Truc) - 1
If Mid(Truc, i, 2) = VbCrLf Then
Mid(Truc, i, 2) = "78"
End If
Next i
"78" mais pas "3" parce-que VbCrLf c'est DEUX caractères : CR chr(13) et LF chr(10)
qu'il faut remplacer par DEUX caractères sinon ...
changement de longueur de Truc et le For ... Next ne sait plus où il en est.
Mais ce code ne fait rien de mieux que Replace en moins bien.