在VB中，可以使用Mid函数来截取字符串的一部分。Mid函数的语法如下：
Mid(string, start[, length])
参数说明：
string：要截取的字符串。
start：起始位置，从1开始计数。
length（可选）：要截取的长度。
以下是几个示例：
Dim str As String = "Hello, World!"
' 截取从第7个字符开始的所有字符
Dim result1 As String = Mid(str, 7)
Console.WriteLine(result1) ' 输出：World!
' 截取从第4个字符开始的5个字符
Dim result2 As String = Mid(str, 4, 5)
Console.WriteLine(result2) ' 输出：lo, W
' 截取最后5个字符
Dim result3 As String = Mid(str, Len(str) - 4 + 1)
Console.WriteLine(result3) ' 输出：orld!
请注意，VB中的字符串索引是从1开始计数的，而不是0。
