VBA - InStrRev 函数

InStrRev 函数返回一个字符串在另一个字符串中第一次出现的位置。 搜索从右向左进行。

语法

InStrRev(string1,string2[,start,[compare]])

参数说明

• String1 − 必需的参数。 要搜索的字符串。

• String2 − 必需的参数。 搜索 String1 的字符串。

• Start − 可选参数。 指定搜索的起始位置。 搜索从右到左的第一个位置开始。

• Compare − 可选参数。 指定要使用的字符串比较。 它可以采用以下提到的值。

  • 0 = vbBinaryCompare - 执行二进制比较（默认）

  • 1 = vbTextCompare - 执行文本比较

示例

添加一个按钮并放置以下函数。

Private Sub Constant_demo_Click()
   var = "Microsoft VBScript"
   msgbox("Line 1 : " & InStrRev(var,"s",10))
   msgbox("Line 2 : " & InStrRev(var,"s",7))
   msgbox("Line 3 : " & InStrRev(var,"f",-1,1))
   msgbox("Line 4 : " & InStrRev(var,"t",5))
   msgbox("Line 5 : " & InStrRev(var,"i",7))
   msgbox("Line 6 : " & InStrRev(var,"i",7))
   msgbox("Line 7 : " & InStrRev(var,"VB",1))
End Sub

执行上述脚本后，会产生以下结果。

Line 1 : 6
Line 2 : 6
Line 3 : 8
Line 4 : 0
Line 5 : 2
Line 6 : 2
Line 7 : 0 

❮ vba_strings.html