Mid 函数 (Visual Basic)
更新：2007 年 11 月
从一个字符串返回包含指定数量字符的字符串。
Public Shared Function Mid( _
ByVal str As String, _
ByVal Start As Integer, _
Optional ByVal Length As Integer _
) As String
参数
str
必选。String 表达式，从该表达式返回字符。Start
必选。Integer 表达式。要返回字符的开始位置。如果 Start 大于 str 中的字符数，Mid 函数将返回零长度字符串 ("")。Start 从一开始。Length
可选。Integer 表达式。要返回的字符数。如果 Length 省略或超过文本的字符（包括 Start 处的字符）数，则返回从字符串开始位置到结尾的所有字符。
异常
异常类型 |
错误号 |
条件 |
|---|---|---|
Start <= 0 或 Length < 0。 |
如果正在升级使用无结构错误处理的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象）比较错误号。）然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述替换这种错误控制。
备注
若要确定 str 中的字符数，请使用 Len 函数。
Visual Basic 具有 Mid 函数和 Mid 语句。这些元素都对字符串中指定数量的字符进行操作，但 Mid 函数返回字符，而 Mid 语句替换字符。有关更多信息，请参见 Mid 语句。
.gif "说明") 说明： |
|---|
Visual Basic 早期版本中的 MidB 函数返回字节形式（而不是字符形式）的字符串。它主要用于在双字节字符集 (DBCS) 应用程序中转换字符串。所有 Visual Basic 字符串均采用 Unicode 的形式，不再支持 MidB。 |
示例
本例使用 Mid 函数从字符串返回指定数量的字符。
' Creates text string.
Dim TestString As String = "Mid Function Demo"
' Returns "Mid".
Dim FirstWord As String = Mid(TestString, 1, 3)
' Returns "Demo".
Dim LastWord As String = Mid(TestString, 14, 4)
' Returns "Function Demo".
Dim MidWords As String = Mid(TestString, 5)
要求
**模块：**Strings
**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）