Funzione Left

Restituisce il numero di caratteri specificati partendo dall'estremo sinistro di una stringa.

Sintassi:

Left (Text As String, n As Long)

Valore restituito:

String

Parametri:

Testo: stringa di cui si desidera restituire i caratteri più a sinistra.

n: espressione numerica che specifica il numero di caratteri da restituire. Se n = 0, viene restituita una stringa di lunghezza zero. Il valore massimo consentito è 65535.

L'esempio seguente converte una data in formato AAAA.MM.GG nel formato MM/GG/AAAA.

Codici di errore:

5 Richiamo di procedura non valido

Esempio:

Sub ExampleUSDate

Dim sInput As String

Dim sUS_date As String

    sInput = InputBox("Inserite una data in formato internazionale 'AAAA-MM-GG'")

    sUS_date = Mid(sInput, 6, 2)

    sUS_date = sUS_date & "/"

    sUS_date = sUS_date & Right(sInput, 2)

    sUS_date = sUS_date & "/"

    sUS_date = sUS_date & Left(sInput, 4)

    MsgBox sUS_date

End Sub