Mid(string, start[, length])

[code]
Dim MyString, InizioWord , FineWord , CentroWords
MyString = "Mid Function Demo" ' stringa di esempio
InizioWord = Mid(MyString, 1, 3) ' Ritorna "Mid".
FineWord = Mid(MyString, 14, 4) ' Ritorna "Demo".
CentroWords = Mid(MyString, 5) ' Ritorna "Function Demo".
[code]

Toeke