Question

How to count the digits in a string in VB.NET

Answer 1

Imports System.IO

Module Module1

    Sub Main()

        Dim s As String = "abc 3 def59g hi 0 jkl 444"
        Dim digits As Integer = 0, i As Integer

        Try

            For i = 0 To s.Length - 1

                If (Char.IsDigit(s(i))) Then
                    digits = digits + 1
                End If

            Next
            Console.WriteLine("digits = {0}", digits)

        Catch ex As Exception

            Console.WriteLine(ex.Message)

        End Try

    End Sub

    'run:
    ' 
    'digits = 7

End Module

70+ SQL courses for beginners and professionals