VBA Mid()函数

Mid()函数返回给定输入字符串中指定数量的字符。

语法

Mid(String,start[,Length])

参数

• String - 必需的参数。输入从中返回指定数量的字符的字符串。
• Start - 必需的参数。 一个整数，它指定了字符串的起始位置。
• Length - 必需的参数。 一个整数，指定要返回的字符数。

示例

添加一个模块，并将下面的代码放在编辑器中。

Private Sub Constant_demo_Click()
   Dim var as Variant
   var = "Microsoft VBScript"
   msgbox("Line 1 : " & Mid(var,2))
   msgbox("Line 2 : " & Mid(var,2,5))
   msgbox("Line 3 : " & Mid(var,5,7))
End Sub

执行上面示例代码，得到以下结果 -

Line 1 : icrosoft VBScript
Line 2 : icros
Line 3 : osoft V