Funzione simile a String()

Da Gambas-it.org - Wikipedia.

Volendo utilizzare una funzione interna esplicita, da noi scritta, avente risultato identico alla funzione "String()" [nota 1] di Gambas, è possibile adottare il seguente codice:

Private Function Ripete(volte As Integer, car As String) As String
 
 Dim rit As String
 
 Repeat
   rit &= car
   Dec volte
 Until volte = 0

 Return rit

End


Note

[1] La Funzione "String()", nativa di Gambas restituisce una stringa contenente tante volte il contenuto di tipo Stringa del suo 2° parametro quante volte specificato nel suo primo parametro di tipo Intero.