Mid 语句

项目
08/18/2008

更新：2007 年 11 月

用另一个字符串中的字符替换 String 变量中指定数量的字符。

Mid( _
   ByRef Target As String, _
   ByVal Start As Integer, _
   Optional ByVal Length As Integer _
) = StringExpression

各部分说明

Target
必选。要修改的 String 变量的名称。
Start
必选。Integer 表达式。Target 的字符位置，即开始替换文本处。Start 使用从一开始的索引。
Length
可选。Integer 表达式。要替换的字符数。如果省略该参数，则使用所有 String。
StringExpression
必选。替换部分 Target 的 String 表达式。

异常

异常类型	错误号	条件
ArgumentException	5	Start <= 0 或 Length < 0。

如果正在升级使用无结构错误处理的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象）比较错误号。）然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述替换这种错误控制。

备注

所替换的字符数总是小于或等于 Target 中的字符数。

Visual Basic 有 Mid 函数 (Visual Basic) 和 Mid 语句。这些元素都对字符串中指定数量的字符进行操作，但 Mid 函数返回字符，而 Mid 语句替换字符。有关更多信息，请参见 Mid 函数 (Visual Basic)。

说明：
Visual Basic 早期版本中的 MidB 语句替换字节形式（而不是字符形式）的子字符串。它主要用于在双字节字符集 (DBCS) 应用程序中转换字符串。所有 Visual Basic 字符串均采用 Unicode 的形式，不再支持 MidB。

示例

本例使用 Mid 语句用一个字符串中的字符替换字符串变量中指定数量的字符。

Dim TestString As String
' Initializes string.
TestString = "The dog jumps"
' Returns "The fox jumps".
Mid(TestString, 5, 3) = "fox"
' Returns "The cow jumps".
Mid(TestString, 5) = "cow"
' Returns "The cow jumpe".
Mid(TestString, 5) = "cow jumped over"
' Returns "The duc jumpe".
Mid(TestString, 5, 3) = "duck"