Imports System
Public Class Test
Public Shared Sub Main()
Dim test as String = vbNewLine & "RV"
Dim lngIndex as Int32 = test.IndexOf(vbNewLine & "RV")
'Console.Out.WriteLine(test)
Console.Out.WriteLine(lngIndex)
Console.Out.WriteLine(test.IndexOf(vbNewLine & "RV", lngIndex+3))
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQlEaW0gdGVzdCBhcyBTdHJpbmcgPSB2Yk5ld0xpbmUgJiAiUlYiCgkJRGltIGxuZ0luZGV4IGFzIEludDMyID0gdGVzdC5JbmRleE9mKHZiTmV3TGluZSAmICJSViIpCgkJCgkJJ0NvbnNvbGUuT3V0LldyaXRlTGluZSh0ZXN0KQoJCUNvbnNvbGUuT3V0LldyaXRlTGluZShsbmdJbmRleCkKCQlDb25zb2xlLk91dC5Xcml0ZUxpbmUodGVzdC5JbmRleE9mKHZiTmV3TGluZSAmICJSViIsIGxuZ0luZGV4KzMpKQoJCQoJRW5kIFN1YgpFbmQgQ2xhc3M=