doubler une chaine de caractère

[Buckethead]

Bonjour à tous.

Après avoir regardé la bibliothèque String dans le help je bloque.

Je cherche une fonction comparable à str(n,"mon_texte") que j'ai connu dans d'autre basic.

Pour être plus clair je cherche à faire cet exemple: str(3,"ok") = okokok

[Mytic]

voilà voilà :

Code : Tout sélectionner

  Resultat$ = RSet("R", 8)          ; Le résultat est: "       R"
  Resultat$ = RSet("R", 8, "-")     ; Le résultat est: "-------R"
  Resultat$ = RSet("LongString", 4) ; Le résultat est: "Long"

ou

Code : Tout sélectionner

  Resultat$ = LSet("L", 8)          ; Resultat$ sera: "L       "
  Resultat$ = LSet("L", 8, "-")     ; Resultat$ sera: "L-------"
  Resultat$ = LSet("LongString", 4) ; Resultat$ sera: "Long"

[Buckethead]

J'avais bien essayé RSet, ou alors il me faut un exemple concret car il ne répète qu'un seul caractère !

[Mytic]

Oui en effet, elle ne répète qu’un seul caractère Dsl

[Mytic]

Je t’ai fait une procédure qui fait cela :

Code : Tout sélectionner

Procedure.s setstring(chaine.s,n.l)
For i = 1 To n
r$+chaine
Next i
ProcedureReturn r$
EndProcedure

Debug setstring("ok",3) 

[Buckethead]

Sympa, merci Mytic

(marche niquel, text$ = setstring("blabla ",100))