Je ne sais pas si le traitement des chaines a changé alors...
Voilà le code, je pense à bug
le code OK
Code : Tout sélectionner
Texte$ = LSet("", 31, "*")
Debug Texte$
Texte1$ = Left( Texte$, (( Len(Texte$)-Len(" PUREBASIC ") )/2) +1 ) + " PUREBASIC "
Debug Texte1$
Vous pouvez remplacer le 1 par 33 ou 170.1 le résultat est que ce nombre est considéré comme une chaine
Code : Tout sélectionner
Texte$ = LSet("", 31, "*")
Debug Texte$
Texte1$ = Left( Texte$, ( ( Len(Texte$) - Len(" PUREBASIC ") )/2 ) ) + 170.1 + " PUREBASIC "
Debug Texte1$
Code : Tout sélectionner
a$ = "36" + 1
Debug a$