Contenuto

# Funzione Mid, Istruzione Mid

Restituisce la parte specificata di una stringa (funzione Mid) o la sostituisce con un'altra stringa (istruzione Mid).

### Sintassi:

    Mid (Testo As String, Inizio As Long [, Lunghezza As Long]) or Mid (Testo As String, Inizio As Long , Lunghezza As Long, Testo As String)

### Valore restituito:

String (solo con la funzione)

### Parametri:

Testo: stringa da modificare.

Start: espressione numerica che indica la posizione all'interno della stringa del carattere da cui inizia la porzione da sostituire o restituire. Il valore minimo ammesso è 1, il massimo è 2.147.483.648.

Lunghezza: espressione numerica che restituisce il numero di caratteri da sostituire o restituire. Il valore massimo consentito è 2.147.483.648.

Se il parametro Lunghezza viene omesso nella funzione Mid, vengono restituiti tutti i caratteri dell'espressione, dall'inizio alla fine della stringa.

Se il parametro Lunghezza dell'istruzione Mid è inferiore alla lunghezza del testo da sostituire, il testo viene ridotto alla lunghezza specificata.

Testo: stringa da usare per sostituire la stringa specificata (istruzione Mid).

### 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

Argomenti correlati

Funzioni per le stringhe