Examples: Mid function Dim subString As String subString$ = Mid$("ABCDEF", 2, 3) Print subString$ ' Output: BCD