InStrRev 函数 [VBA]
返回字符串在另一个字符串中的位置,从字符串的右侧开始。
InStrRev函数从右侧返回找到匹配的位置。 如果未找到该字符串,则该函数返回0。
InStrRev (Text1 As String, Text2 As String [,Start As Long] [, Compare As Integer])
Long
Text1: 要在其中进行搜索的字符串表达式。
Text2: 要搜索的字符串表达式。
Start: 可选的数字表达式,用于在字符串中标记左侧的位置,其中搜索指定的子字符串。 如果省略此参数,搜索将从字符串的最后一个字符开始。 允许的最大值为65535。
Compare: 可选的数值表达式,用于定义比较的类型。 该参数的值可以是
1: 默认值1表示文本比较时不区分大小写。
0: 值0表示区分大小写的二进制比较。
为了避免运行时错误,如果省略了第一个返回参数,请不要设置 Compare 参数。
Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
sInput = "The book is on the table"
iPos = InStrRev(sInput,"the",10,1) ' 返回 1, 搜索时区分大小写
Print iPos
iPos = InStrRev(sInput,"the",10,0) ' 返回 0, 搜索时区分大小写
Print iPos
End Sub