Guida di LibreOffice 7.2
Restituisce la parte specificata di una stringa (funzione Mid) o la sostituisce con un'altra stringa (istruzione Mid).
Mid (Testo As String, Inizio As Long [, Lunghezza As Long]) or Mid (Testo As String, Inizio As Long , Lunghezza As Long, Testo As String)
String (solo con la funzione)
Testo: stringa da modificare.
Start: Numeric expression that indicates the character position within the string where the string portion that you want to replace or to return begins. The minimum allowed value is 1. The maximum allowed value is 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).
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