Mid 函数

返回一个 Variant (String) 值,其中包含字符串中指定数量的字符。

语法

Mid ( 字符串,开始 [,长度]

Mid函数语法具有以下参数:

参数

说明

字符串

必需。 从中返回字符的字符串表达式 。 如果字符串包含 null,则返回null

开始

必需。 长远. 字符串中要开始执行部件的字符位置。 如果start大于字符串中的字符数, Mid返回零长度字符串("")。

长度

可选。 变体Long)。 要返回的字符数。 如果省略或文本中的字符数少于(包括开头的字符),则返回字符串起始位置到末尾之间的所有字符。


备注

若要确定字符串中的字符数,请使用Len函数。

注意: 将MidB函数与字符串中包含的字节数据结合使用,如同在双字节字符集语言中一样。 参数指定字节数,而不是指定字符数。 有关使用MidB的示例代码,请参阅示例主题中的第二个示例。

查询示例

表达式

结果

从 ProductSales 中选择 "ProductID"、"Mid" (ProductID,5)作为表达式1

返回从字符位置5开始的 "产品 Id" 和 "产品 Id" 部分,并在 "列表达式 1" 中显示结果。

从 ProductSales 中选择 "ProductID"、"Mid" (ProductID、5、4)作为 testMid。

返回从字符位置5开始的 "ProductID" 和 ProductID 部分,其中包含4个字符并在列 testMid 中显示结果。

VBA 示例

注意: 下面的示例演示了在 Visual Basic for Applications (VBA)模块中使用此函数的示例。 有关使用 VBA 的详细信息,请在 "搜索" 旁边的下拉列表中选择 "开发人员引用",然后在搜索框中输入一个或多个字词。

第一个示例使用Mid函数从字符串返回指定数量的字符。

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" ' Create text string.
FirstWord = Mid(MyString, 1, 3) ' Returns "Mid".
LastWord = Mid(MyString, 14, 4) ' Returns "Demo".
MidWords = Mid(MyString, 5) ' Returns "Function Demo".

第二个示例使用MidB和用户定义的函数(MidMbcs)来返回字符串中的字符。 此处的区别在于输入字符串为 ANSI,长度以字节为单位。

Function MidMbcs(ByVal str as String, start, length)
MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), _
start, length), vbUnicode)
End Function
Dim MyString
MyString = "AbCdEfG"
' Where "A", "C", "E", and "G" are DBCS and "b", "d",
' and "f" are SBCS.
MyNewString = Mid(MyString, 3, 4)
' Returns ""CdEf"
MyNewString = MidB(MyString, 3, 4)
' Returns ""bC"
MyNewString = MidMbcs(MyString, 3, 4)
' Returns "bCd"

注意:  本页面是自动翻译的,可能包含语法错误或不准确之处。 我们的目的是使此内容能对你有所帮助。 能否告知我们此信息是否有所帮助? 下面是该参考内容的英文版

另请参阅

字符串函数以及如何使用它们

扩展你的 Office 技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×