Mega Code Archive

 

Categories / VisualBasic Script / Data Type

 

Mid(string, start[, length]) returns the specified number of characters from inside the given string

Sub midDemo()     Dim strPhone As String     strPhone = "123-1231233"          Dim strLocalExchange As String     strLocalExchange = Mid(strPhone, 4, 3)          Debug.Print strLocalExchange End Sub