Mid
Mid函数从给定的输入字符串返回指定数量的字符。
语法 (Syntax)
Mid(String,start[,Length])
参数描述 (Parameter Description)
String - 必需参数。 输入从中返回指定字符数的字符串。
Start - 必需参数。 一个Integer，指定字符串的起始位置。
Length - 可选参数。 一个Integer，指定要返回的字符数。
添加按钮并添加以下功能。
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
