Differenze tra le versioni di "Funzione simile a String()"

Da Gambas-it.org - Wikipedia.
 
Riga 1: Riga 1:
 
Volendo utilizzare una funzione interna esplicita, da noi scritta, avente risultato identico alla funzione "String()" <SUP>&#91;[[#Note|nota 1]]&#93;</sup> di Gambas, è possibile adottare il seguente codice:
 
Volendo utilizzare una funzione interna esplicita, da noi scritta, avente risultato identico alla funzione "String()" <SUP>&#91;[[#Note|nota 1]]&#93;</sup> di Gambas, è possibile adottare il seguente codice:
  '''Private''' Function Ripete(volte As Integer, car As String) As String
+
  Private Function Ripete(volte As Integer, car As String) As String
 
    
 
    
 
   Dim rit As String
 
   Dim rit As String
Riga 11: Riga 11:
 
   Return rit
 
   Return rit
 
   
 
   
  '''End'''
+
  End
  
  

Versione attuale delle 18:25, 28 giu 2024

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.