Contact: aviboots(AT)netvision.net.il
39,971 questions
51,913 answers
573 users
Imports System Imports System.Text.RegularExpressions Public Class Program Public Shared Sub Main() Dim str As String = "abc83920xyz" Dim result As String = Regex.Match(str, "\d+").Value Console.Write(result) End Sub End Class ' run: ' ' 83920 '