Verifica "passo-passo" di ciascun carattere in una data stringa
Da Gambas-it.org - Wikipedia.
Versione del 14 feb 2012 alle 09:04 di Vuott (Discussione | contributi) (Nuova pagina: Data una stringa di una qualunque lunghezza e composizione, anche contenente spazi fra le parole, intendiamo conoscere ciascun carattere che la compone. ' Gambas class file''</font> ...)
Data una stringa di una qualunque lunghezza e composizione, anche contenente spazi fra le parole, intendiamo conoscere ciascun carattere che la compone.
' Gambas class file</font> Public Sub Button1_Click() Dim a$ As String Dim b As Integer ' fingiamo che la stringa, composta da caratteri e loro quantità a noi non conosciuti, sia questa: a$ = "Verifica passo-passo della stringa" ' Iniziamo il controllo carattere dopo carattere per l'intera lunghezza della stringa: For b = 1 To Len(a$) ' Mostriamo in console il risultato intero della verifica ' (il " ; " alla fine della funzione Mid$ consentirà di vedere i caratteri in allineamento orizzontale): Print Mid$(a$, b, 1); Next End
In console avremo coerentemente la scritta:
Verifica passo-passo della stringa