Visualizza messaggio singolo
Vecchio 27-10-2004, 22.39.26   #2
Sergio Neddi
Gold Member
Top Poster
 
L'avatar di Sergio Neddi
 
Registrato: 07-04-2000
Loc.: Padova-Vicenza
Messaggi: 4.814
Sergio Neddi promette bene
Fatto in velocità con il vecchio QBASIC, non so se ti può essere di utilità:
Codice:
stringa$ = "IeriSonoAndatoAMare"
stringaout$ = ""
FOR i = 1 TO LEN(stringa$)
    junk$ = MID$(stringa$, i, 1)
    IF ASC(junk$) < 91 AND ASC(junk$) > 64 THEN
      junk$ = CHR$(32) + junk$
    END IF
    stringaout$ = stringaout$ + junk$
NEXT i
Il risultato alla fine si trova, ovviamente, in stringaout$.
___________________________________

Con il PC risolvo molti problemi che prima non avevo. - Coltiva Linux che Windows si pianta da solo!
Sergio Neddi non è collegato   Rispondi citando