Comp
Risultato = Comp ( Stringa1 AS String , Stringa2 AS String [ , Modo AS Integer ] ) AS Integer
Compara due stringhe e ritorna:
-
0 se le due stringhe sono uguali.
-
1 se Stringa1 è più grande di Stringa2.
-
-1 se Stringa1 è più piccola di Stringa2.
Il parametro
Modo può essere combinato come meglio definito alla pagina
Metodi di comparazione.
Esempi
IF (Comp(command, "open") = 0) THEN open_file
DIM UserName AS String
PRINT "Immettere il proprio User Name:";
INPUT UserName
IF Comp(UserName, "Pippo") = 0 THEN
PRINT "OK potete entrare."
ELSE
PRINT "Spiacente, accesso negato."
ENDIF
' Questo è solo un'esempio illustartivo parziale.
' Per cancellare effettivamente il file è necessario scrivere del codice appropriato.
DIM answer AS String
PRINT "Vuoi cancellare il file? [s/n]"
INPUT answer
IF Comp(answer, "s", gb.text) = 0 THEN
'...... (inserire qui il codice per cancellare il file.)
'......
'......
' In caso di successo stamperà il messaggio.
PRINT "File cancellato"
ELSE
PRINT "File non cancellato"
ENDIF
Vedi anche