Restituisce un valore Variant (String) contenente un numero specificato di caratteri di una stringa.
Sintassi
Stringa(stringa; inizio [; lunghezza ] )
La sintassi della funzione Mid ha gli argomenti seguenti:
| Argomento | Descrizione |
|---|---|
| stringa | Obbligatorio. espressione stringa da cui vengono restituiti caratteri. Se stringa contiene un valore Null, verrà restituito un valore Null . |
| inizio | Obbligatorio. Long. Posizione del carattere nella stringa in corrispondenza della quale inizia la parte da prendere. Se inizio è 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 il testo contiene meno di lunghezza (incluso il carattere all'inizio), verranno 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 Espr1 FROM ProductSales; | Restituisce "IDProdotto" e la parte di IDProdotto a partire dalla posizione del carattere 5 e visualizza i risultati nella colonna Espr1. |
| SELECT ProductID, Mid(ProductID,5,4) AS testMid FROM ProductSales; | Restituisce il valore "PRODUCTID" e la parte di ProductID 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 seguenti illustrano l'uso 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"