fork download
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim test as String = vbNewLine & "RV"
  6. Dim lngIndex as Int32 = test.IndexOf(vbNewLine & "RV")
  7.  
  8. 'Console.Out.WriteLine(test)
  9. Console.Out.WriteLine(lngIndex)
  10. Console.Out.WriteLine(test.IndexOf(vbNewLine & "RV", lngIndex+3))
  11.  
  12. End Sub
  13. End Class
Success #stdin #stdout 0.11s 13600KB
stdin
Standard input is empty
stdout
0
-1