Question

How to extract only numbers from a string in VB.NET

Answer 1

Imports System.Text.RegularExpressions
 
Public Class Test
    Public Shared Function extract_numbers(s as String) As String
        Dim len As Integer = s.Length
  
        Dim regx As Regex = new Regex("[0-9]")
 
        Dim characters As String = ""
 
        For i As Integer = 0 To len - 1
            Dim ch As Char = s(i)
            If regx.IsMatch(ch.ToString()) Then
                characters = characters + ch
            End If
        Next
        return characters
    End Function
     
    Public Shared Sub Main()
        Dim s As String = "c++14$vb.net &%java*() php c# <>/python 3.7.3"
          
        Console.WriteLine(extract_numbers(s))
    End Sub
End Class
 
 
' run:
' 
' 14373
'

 

70+ SQL courses for beginners and professionals