Visual Basic InStrRev 函数

定义和用法

InStrRev 函数可返回一个字符串在另一个字符串中首次出现的位置。搜索从字符串的末端开始，但是返回的位置是从字符串的起点开始计数的。

InStrRev 函数可返回下面的值：

• 如果 string1 为 ""（零长度） - InStr 返回 0
• 如果 string1 为 Null - InStr 返回 Null
• 如果 string2 为 "" - InStr 返回 start
• 如果 string2 为 Null - InStr 返回 Null
• 如果 string2 没有找到 - InStr 返回 0
• 如果在 string1 中找到 string2，InStr 返回找到匹配字符串的位置。
• 如果 start > Len(string1) - InStr 返回 0

提示：请参阅 InStr 函数。

语法

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

实例

例子 1

Module Module1
    Sub Main()
        dim txt,pos
        txt="This is a beautiful day!"
        pos=InStrRev(txt,"his")
        Console.WriteLine(pos)
    End Sub
End Module

输出：

2

例子 2

Module Module1
    Sub Main()
        dim txt,pos
        txt="This is a beautiful day!"
        'textual comparison
        pos=InStrRev(txt,"B",-1,1)
        Console.WriteLine(pos)
    End Sub
End Module

输出：

11

例子 3

Module Module1
    Sub Main()
        dim txt,pos
        txt="This is a beautiful day!"
        'binary comparison
        pos=InStrRev(txt,"T")
        Console.WriteLine(pos)
    End Sub
End Module

输出：

1

例子 4

Module Module1
    Sub Main()
        dim txt,pos
        txt="This is a beautiful day!"
        'binary comparison
        pos=InStrRev(txt,"t")
        Console.WriteLine(pos)
    End Sub
End Module

输出：

15