InStrRev 函数 (Visual Basic)
更新：2007 年 11 月
返回某一字符串从另一字符串的右侧开始算起第一次出现的位置。
Public Function InStrRev(
ByVal StringCheck As String,
ByVal StringMatch As String,
Optional ByVal Start As Integer = -1,
Optional ByVal Compare As CompareMethod = CompareMethod.Binary
) As Integer
参数
StringCheck
必选。搜索的 String 表达式。StringMatch
必选。搜索的字符串表达式。Start
可选。数值表达式，设置从字符串左侧开始进行的每个搜索的起始位置（从一开始计数）。如果省略 Start，则使用 –1，它表示搜索从最后一个字符位置开始。然后搜索从右到左继续进行。Compare
可选。数值，指示对子字符串求值时使用的比较类型。如果省略，就会执行二进制比较。具体的值请参见“设置”。
设置
Compare 参数可以具有下列值。
常数 |
说明 |
|---|---|
Binary |
执行二进制比较。 |
Text |
执行文本比较。 |
返回值
InStrRev 返回下列值：
如果 |
InStrRev 返回 |
|---|---|
StringCheck 的长度为零 |
0 |
StringMatch 的长度为零 |
Start |
未找到 StringMatch |
0 |
StringMatch 在以下中找到： StringCheck |
从字符串的右侧开始找到的第一个匹配项的位置。 |
Start 大于以下匹配项的长度： StringMatch |
0 |
异常
异常类型 |
错误号 |
条件 |
|---|---|---|
Start = 0 或 Start < -1。 |
如果正在升级使用无结构错误处理的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象）比较错误号。）然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述替换这种错误控制。
备注
注意，InStrRev 函数的语法与 InStr 函数的语法不相同。
示例
此示例演示 InStrRev 函数的用法。
Dim TestString As String = "the quick brown fox jumps over the lazy dog"
Dim TestNumber As Integer
' Returns 32.
TestNumber = InStrRev(TestString, "the")
' Returns 1.
TestNumber = InStrRev(TestString, "the", 16)
要求
**模块：**Strings
**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）