fork download
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5.  
  6. Dim s As String = "foo [123]=ro bar"
  7. Dim i As Integer = s.IndexOf("[")
  8. Dim f As String = s.Substring(i + 1, s.IndexOf("]", i + 1) - i - 1)
  9.  
  10. End Sub
  11.  
  12. End Class
Success #stdin #stdout 0.04s 24328KB
stdin
Standard input is empty
stdout
Standard output is empty