Restituisce un valore Variant (String) contenente un numero specificato di caratteri di una stringa.
Sintassi
Mid(stringa, inizio [, lunghezza ] )
La sintassi della funzione Mid ha gli argomenti seguenti:
| Argomento | Descrizione |
|---|---|
| stringa | Obbligatorio. Espressione stringa da cui vengono restituiti caratteri. Se la stringa contiene Null, viene restituito Null . |
| inizio | Obbligatorio. Long. Posizione del carattere nella stringa in cui inizia la parte da prendere. Se start è maggiore del numero di caratteri nella stringa, Mid restituisce una stringa di lunghezza zero (""). |
| lunghezza | Facoltativo. Valore Variant (Long). Numero di caratteri da restituire. Se omesso, o se nel testo sono presenti caratteri di lunghezza inferiore a quella (incluso il carattere all'inizio), vengono restituiti tutti i caratteri dalla posizione iniziale alla fine della stringa. |
Osservazioni
Per determinare il numero di caratteri nella stringa, usare la funzione Len .
Nota
Usare la funzione MidB con dati di tipo byte contenuti in una stringa, come per le lingue con set di caratteri a byte doppio. Invece di specificare il numero di caratteri, gli argomenti specificano il numero di byte. Per un codice di esempio che usa MidB, vedere il secondo esempio nell'argomento Esempio.
Esempi di query
| Espressione | Risultati |
|---|---|
| SELECT ProductID, Mid(ProductID,5) AS Expr1 FROM ProductSales; | Restituisce IDProdotto e la parte IDProdotto a partire dalla posizione del carattere 5 e visualizza i risultati nella colonna Espressione1. |
| SELECT ProductID, Mid(ProductID,5,4) AS testMid FROM ProductSales; | Restituisce il "ProductID" e la parte di IDProdotto a partire dalla posizione del carattere 5, contenente 4 caratteri e visualizza i risultati nella colonna testMid. |
Esempi di VBA
Nota
Gli esempi di VBA riportati di seguito illustrano l'utilizzo di questa funzione in un modulo di Visual Basic, Applications Edition (VBA). Per altre informazioni sull'uso di VBA, selezionare Riferimenti per sviluppatori nell'elenco a discesa accanto a Cerca e immettere uno o più termini nella casella di ricerca.
Il primo esempio usa la funzione Mid per restituire un numero di caratteri specificato da una stringa.
Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" ' Create text string.
FirstWord = Mid(MyString, 1, 3) ' Returns "Mid".
LastWord = Mid(MyString, 14, 4) ' Returns "Demo".
MidWords = Mid(MyString, 5) ' Returns "Function Demo".
Il secondo esempio usa MidB e una funzione definita dall'utente (MidMbcs) sempre per restituire i caratteri dalla stringa. La differenza consiste nel fatto che la stringa di input è in formato ANSI e la lunghezza è espressa in byte.
Function MidMbcs(ByVal str as String, start, length)
MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), _
start, length), vbUnicode)
End Function
Dim MyString
MyString = "AbCdEfG"
' Where "A", "C", "E", and "G" are DBCS and "b", "d",
' and "f" are SBCS.
MyNewString = Mid(MyString, 3, 4)
' Returns ""CdEf"
MyNewString = MidB(MyString, 3, 4)
' Returns ""bC"
MyNewString = MidMbcs(MyString, 3, 4)
' Returns "bCd"