sString est une chaîne = "1;21-5;6;7*;8-95;200;4+1"; sVal est une chaîne sResultat est une chaîne i est un entier POUR TOUTE CHAINE sVal DE sString SEPAREE PAR ";" i++ sResultat += sVal + RC FIN Info(sResultat)