从字符串的末尾算起查找出现位置 InStrRev

2.6.2 InStrRev函数
也可以使用InStrRev函数返回一个字符串在另一个字符串中出现的位置，与InStr函数不同的是，从字符串的末尾算起。其语法为：
InStrRev(String1,String2[,[Start[,compare])
参 数String1为被查找的字符串，参数String2为要查找的字符串，这两个参数都是必需的。参数Start为可选参数，设置每次查找开始的位置，若 忽略则使用-1，表示从上一个字符位置开始查找。参数Compare为可选参数，表示所使用的比较方法，如果忽略则执行二进制比较。
下面的示例使用了InStr函数和InStrRev函数，相应的结果不同：
Sub test()
Dim myString As String
Dim sSearch As String
myString = "I like the functionality that InsStrRev gives"
sSearch = "th"
Debug.Print InStr(myString, sSearch) '返回8
Debug.Print InStrRev(myString, sSearch) '返回26
End Sub

摘抄自： http://hi.baidu.com/realvnc/blog/item/05183431ffdfab12eac4af16.html