关于 VB mid出现的问题

Private Sub Command1_Click()
a = "123456789"
b = "5"
v = InStr(a, b)
c = Mid(a, v + 1, 2) '只取2个字符
Print c
End Sub

v = InStr(a, b)
w= InStr(v,a, chr(13))
c = Mid(a, v + 1,w-v)

返回 Variant (String)，其中包含字符串中指定数量的字符。

语法 Mid(string, start[, length])

Mid 函数的语法具有下面的命名参数：

部分 说明
string 必要参数。字符串表达式，从中返回字符。
start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数，Mid 返回零长度字符串 ("")。

length 可选参数；为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到尾端的所有字符。