- Imports System 
- Imports System.Text.RegularExpressions 
-   
- Public Class Test 
- 	Public Shared Sub Main() 
- 		Dim res As MatchCollection = Regex.Matches("hjgv ygkuy (1) erg erg ewr (12)erg erg erg er. (321)", "\(([0-9]+)\)") 
-         If res.Count() > 0 Then 
-             For Each m As Match In res 
-             	Console.WriteLine(m.Groups(1).Value) 
-             Next 
-         End If 
- 	End Sub 
- End Class 
				SW1wb3J0cyBTeXN0ZW0KSW1wb3J0cyBTeXN0ZW0uVGV4dC5SZWd1bGFyRXhwcmVzc2lvbnMKClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQlEaW0gcmVzIEFzIE1hdGNoQ29sbGVjdGlvbiA9IFJlZ2V4Lk1hdGNoZXMoImhqZ3YgeWdrdXkgKDEpIGVyZyBlcmcgZXdyICgxMillcmcgZXJnIGVyZyBlci4gKDMyMSkiLCAiXCgoWzAtOV0rKVwpIikKICAgICAgICBJZiByZXMuQ291bnQoKSA+IDAgVGhlbgogICAgICAgICAgICBGb3IgRWFjaCBtIEFzIE1hdGNoIEluIHJlcwogICAgICAgICAgICAJQ29uc29sZS5Xcml0ZUxpbmUobS5Hcm91cHMoMSkuVmFsdWUpCiAgICAgICAgICAgIE5leHQKICAgICAgICBFbmQgSWYKCUVuZCBTdWIKRW5kIENsYXNz