Imports System
 
Public Class Test
	Public Shared Sub Main()
		Dim texto As String = "if Argumento1 = Argumento2 ( --statements; );"
 
        Dim ifIndice As Integer = texto.IndexOf("if")
        Dim igualIndice As Integer = texto.IndexOf("=")
 
        Dim ifLen As Integer = Len("if") + 1
 
        Dim argumento1 As String = texto.Substring(ifIndice + ifLen, igualIndice - ifLen)
        Dim argumento2 As String = texto.Substring(igualIndice + 2, texto.IndexOf(" (") - igualIndice - 1)
        Console.WriteLine(String.Format("Arg1: {0}, Arg2: {1}", argumento1, argumento2))
        Console.ReadLine()
	End Sub
End Class

SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQlEaW0gdGV4dG8gQXMgU3RyaW5nID0gImlmIEFyZ3VtZW50bzEgPSBBcmd1bWVudG8yICggLS1zdGF0ZW1lbnRzOyApOyIKCiAgICAgICAgRGltIGlmSW5kaWNlIEFzIEludGVnZXIgPSB0ZXh0by5JbmRleE9mKCJpZiIpCiAgICAgICAgRGltIGlndWFsSW5kaWNlIEFzIEludGVnZXIgPSB0ZXh0by5JbmRleE9mKCI9IikKCiAgICAgICAgRGltIGlmTGVuIEFzIEludGVnZXIgPSBMZW4oImlmIikgKyAxCgogICAgICAgIERpbSBhcmd1bWVudG8xIEFzIFN0cmluZyA9IHRleHRvLlN1YnN0cmluZyhpZkluZGljZSArIGlmTGVuLCBpZ3VhbEluZGljZSAtIGlmTGVuKQogICAgICAgIERpbSBhcmd1bWVudG8yIEFzIFN0cmluZyA9IHRleHRvLlN1YnN0cmluZyhpZ3VhbEluZGljZSArIDIsIHRleHRvLkluZGV4T2YoIiAoIikgLSBpZ3VhbEluZGljZSAtIDEpCiAgICAgICAgQ29uc29sZS5Xcml0ZUxpbmUoU3RyaW5nLkZvcm1hdCgiQXJnMTogezB9LCBBcmcyOiB7MX0iLCBhcmd1bWVudG8xLCBhcmd1bWVudG8yKSkKICAgICAgICBDb25zb2xlLlJlYWRMaW5lKCkKCUVuZCBTdWIKRW5kIENsYXNz