VBA Mid 取中间子字符串

返回字符串的中间N个字符。

Mid：middle，中间。

语法

Function Mid(str, Start, [Length])

从字符串str的第start位开始取，取Length位，进行返回。

其中Length为可选项，如果没有传递此参数，表示一直取到字符串结尾。

示例

Sub sub6()
  Dim s1 As String
  s1 = "xiaobuteach.com"
  Debug.Print Mid(s1, 7, 5) '输出 teach
  Debug.Print Mid(s1, 7) '输出 teach.com
End Sub

第07章 VBA工具类