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 语句。
![]() |
---|
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 中)