Verifica "passo-passo" di ciascun carattere in una data stringa

Da Gambas-it.org - Wikipedia.

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

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