Funzioni sulle stringhe

Ecco una carrellata di funzioni sulle stringhe:

Asc	Restituisce il codice ASCII di un carattere	MyNumber = Asc("A") Restituisce 65 MyNumber = Asc("a") Restituisce 97 MyNumber = Asc("Albero") Restituisce 65
Chr	Restituisce un carattere dato il suo codice ASCII	MyChar = Chr(65) Restituisce A. MyChar = Chr(97) Restituisce a. MyChar = Chr(62) Restituisce >. MyChar = Chr(37) Restituisce %.
Instr	Restituisce la posizione di una stringa in un'altra	SearchString ="visulabasicscript" Stringa in cui eseguire la ricerca. SearchChar = "i" Esegue la ricerca della lettera "i". MyPos = Instr(4, SearchString, SearchChar) Confronto testuale a partire dalla posizione 4. Restituisce 10
LCase	Converte in minuscolo	MyString = "VBSCript" LCaseString = LCase(MyString) Il valore di LCaseString è "vbscript".
Left	Restituisce un numero di caratteri dalla sinistra di una stringa	MyString = "VBSCript" LeftString = Left(MyString, 3) ' Il valore di LeftString è "VBS".
Len	Restituisce il numero di caratteri di una stringa	MyString = Len("VBSCRIPT") ' MyString include 8 caratteri
LTrim	Toglie gli spazi a sinistra	MyVar = LTrim("    vbscript         ") Il valore di MyVar è "vbscript
Mid	Restituisce un certo numero di caratteri da una stringa	MyVar = Mid("VB Script è divertente!", 4, 6) Il valore di MyVar è "Script".
Replace	Restituisce una data sottostringa con un'altra	MyString = Replace("Linguaggio JavaScript ", "Java", "VB") Restituisce "VBScript".
Rigth	Restituisce un numero di caratteri dalla destra di una stringa	AnyString = "Salve gente!" MyStr = Right(AnyString, 1) Restituisce "e". MyStr = Right(AnyString, 6) Restituisce " gente". MyStr = Right(AnyString, 20) Restituisce "Salve gente".
Rtrim	Toglie gli spazi a destra	MyVar = RTrim("     vbscript    ") Il valore di MyVar è " vbscript".
Space	Crea una Stringa di spazi	MyString = Space(10) Restituisce una stringa con 10 spazi
Split	Crea un array di stringhe più piccole da una stringa	MyString = "VBScriptXèXdivertente!" MyArray = Split(MyString, "x") ' Il valore di MyArray(0) è "VBScript". ' Il valore di MyArray(1) è "è". ' Il valore di )MyArray(2) è "divertente!".
StrComp	Confronta il valore di due stringhe	MyStr1 = "Cane" MyStr2 = "Gatto" MyStr3 = "Gatto" MyComp = StrComp(MyStr3, MyStr2) Restituisce 0. MyComp = StrComp(MyStr1, MyStr2) Restituisce -1. MyComp = StrComp(MyStr2, MyStr1) Restituisce 1.
String	Crea una stringa di un carattere ripetuto un certo numero di volte	MyString = String(5, "*") Restituisce "*****". MyString = String(5, 42) Restituisce "*****". MyString = String(10, "ABC") Restituisce "AAAAAAAAAA".
StrReverse	Inverte una stringa	MyStr = StrReverse("VBScript") Il valore di MyStr è "tpircSBV".
Trim	Taglia gli spazi da entrambi i lati di una stringa	MyVar = Trim("   vbscript   ") Il valore di MyVar è "vbscript".
Ucase	Converte in maiuscolo	MyWord = UCase("Salve gente!") Restituisce "SALVE GENTE!".

Nell'esempio seguente vengono viste alcune delle funzioni qui sopra descritte

<script language="VBScript">
<!--
Option Explicit
dim nome,i

nome=inputbox("Inserisci il tuo nome")
document.write "Il tuo nome ha " & len(nome) & " lettere<br>"
document.write "Le prime tre lettere sono: " & left(nome,3) & "<br>"
document.write "Le ultime tre lettere sono: " & right(nome,3) & "<br>"
document.write "Il tuo nome al contrario è : " & strreverse(nome) & "<br>"
document.write "In maiuscolo: " & Ucase(nome) & "<br>"
document.write "In minuscolo: " & Lcase(nome) & "<br>"
document.write "Iniziale maiuscola: " & Ucase(left(nome,1)) & Lcase(mid(nome,2)) & "<br>"
for i =1 to len (nome)
  document.write mid(nome,1,i) & "<br>"
next
//-->
</script>