Imports System
Public Class Test
Public Shared Sub Main()
Dim i As String
i = "asds trim-134 asdas"
Dim c As String()
c = i.Split("trim-")
c = c(c.Length - 1).Split(" ")
System.Console.WriteLine(c)
Dim l As Integer
'l = Integer.Parse(c(0))
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCURpbSBpIEFzIFN0cmluZwoJaSA9ICJhc2RzIHRyaW0tMTM0IGFzZGFzIgoJCURpbSBjIEFzIFN0cmluZygpCiAgICAgICAgICAgICAgICAgICAgICAgIGMgPSBpLlNwbGl0KCJ0cmltLSIpCiAgICAgICAgICAgICAgICAgICAgICAgIGMgPSBjKGMuTGVuZ3RoIC0gMSkuU3BsaXQoIiAiKQogICAgICAgICAgICAgICAgICAgICAgICAJU3lzdGVtLkNvbnNvbGUuV3JpdGVMaW5lKGMpCiAgICAgICAgICAgICAgICAgICAgICAgIERpbSBsIEFzIEludGVnZXIKICAgICAgICAgICAgICAgICAgICAgICAgJ2wgPSBJbnRlZ2VyLlBhcnNlKGMoMCkpCiAgICAKCUVuZCBTdWIKRW5kIENsYXNz