Public Class frm_Stringhe Private Sub frm_Stringhe_Load(sender As Object, e As EventArgs) Handles MyBase.Load Dim Stringa As String = "Un giorno all'improvviso," Dim StringaBis As String = "mi innamorai di te!" Console.WriteLine("Asc: Restituisce un Integer che rappresenta il codice carattere corrispondente a un carattere.") Console.WriteLine(Strings.Asc("U")) Console.WriteLine() Console.WriteLine("Chr: Restituisce il carattere associato al codice carattere specificato.") Console.WriteLine(Strings.Chr(85)) Console.WriteLine() Console.WriteLine("Left: Restituisce una stringa contenente un numero specificato di caratteri a partire dal lato sinistro di una stringa.") Console.WriteLine(Strings.Left(Stringa, 9)) Console.WriteLine() Console.WriteLine("Right: Restituisce una stringa contenente un numero di caratteri specificato a partire dalla destra della stringa.") Console.WriteLine(Strings.Right(Stringa, 11)) Console.WriteLine() Console.WriteLine("Mid: Restituisce una stringa contenente il numero di caratteri specificato da una stringa.") Console.WriteLine(Strings.Mid(Stringa, 4, 6)) Console.WriteLine() Console.WriteLine("LCase: Restituisce una stringa o un carattere convertito in minuscolo.") Console.WriteLine(Strings.LCase(Stringa)) Console.WriteLine() Console.WriteLine("UCase: Restituisce una stringa o un carattere contenente la stringa specificata convertita in lettere maiuscole.") Console.WriteLine(Strings.UCase(Stringa)) Console.WriteLine() Console.WriteLine("Len: Restituisce un intero in cui è contenuto il numero di caratteri in una stringa.") Console.WriteLine(Strings.Len(Stringa)) Console.WriteLine() Console.WriteLine("InStr: Restituisce un Integer che specifica la posizione di inizio della prima occorrenza di una stringa in un'altra.") Console.WriteLine(Strings.InStr(Stringa, "giorno")) Console.WriteLine() Console.WriteLine("StrComp: Restituisce -1, 0 o 1 in base al risultato di un confronto tra stringhe.") Console.WriteLine(Strings.StrComp(Stringa, StringaBis)) Console.WriteLine(Strings.StrComp(StringaBis, Stringa)) Console.WriteLine() Console.WriteLine("Replace: Restituisce una stringa nella quale la sottostringa specificata è stata sostituita con un'altra sottostringa per il numero di volte indicato.") Console.WriteLine(Strings.Replace(StringaBis, "!", "...")) Console.WriteLine() Console.Read() End Sub End Class