vb.net InStrRev(Compare, String1, String2, Start)编程详细实例

InStrRev 函数用于在一个字符串中查找另一个字符串出现的位置，这个函数会从字符串的末尾开始查找。下面是一个 VB.NET 的 InStrRev 函数的详细实例：

Dim Compare As CompareMethod = CompareMethod.Text ' 比较方式，这里使用文本比较
Dim String1 As String = "Hello World" ' 要查找的字符串
Dim String2 As String = "Wor" ' 要查找的子字符串
Dim Start As Integer = Len(String1) ' 开始查找的位置，这里从字符串的末尾开始查找

Dim Result As Integer = InStrRev(Compare, String1, String2, Start) ' 调用 InStrRev 函数

If Result > 0 Then ' 如果找到了子字符串
    Console.WriteLine("找到了子字符串，位置在：" & Result) ' 输出找到的位置
Else ' 如果没找到子字符串
    Console.WriteLine("没有找到子字符串") ' 输出未找到
End If

在这个示例中，我们首先定义了比较方式，使用文本比较方式。然后定义了要查找的字符串和要查找的子字符串。接着，我们定义了开始查找的位置，这里使用字符串的长度作为开始的位置，即从字符串的末尾开始查找。最后，我们调用了 InStrRev 函数，传入比较方式、要查找的字符串、要查找的子字符串和开始查找的位置。如果函数返回的结果大于 0，说明找到了子字符串，我们输出找到的位置；如果函数返回的结果等于 0，说明没有找到子字符串，我们输出未找到即可。

需要注意的是，在实际使用中，可以根据需要修改查找的比较方式和开始查找的位置。