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 中)