Question

How to count the white spaces in a string in VB.NET

Answer 1

Imports System
Imports Microsoft.VisualBasic

Public Class CountWhiteSpacesInString_VB_NET
    Public Shared Sub Main(ByVal args As String())
		Dim s As String = "VB.NET " & vbLf & "  Programming " & vbCr & " Language " & vbTab & " "
		
        Dim WhiteSpaces As Integer = s.Length - s.ToLower().Replace(" ", "").Replace(vbLf, "").Replace(vbCr, "").Replace(vbTab, "").Length
		
        Console.WriteLine("WhiteSpaces = " & WhiteSpaces)
    End Sub
End Class



' run:
'
' WhiteSpaces = 10
' 

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System
Imports Microsoft.VisualBasic

Public Class CountWhiteSpacesInString_VB_NET
    Private Shared Function countWhitespaceCharacters(ByVal s As String) As Integer
        Dim count As Integer = 0

        For Each c As Char In s
            If Char.IsWhiteSpace(c) Then
                count += 1
            End If
        Next

        Return count
    End Function

    Public Shared Sub Main(ByVal args As String())
        Dim s As String = "C# " & vbLf & "  Programming " & vbCr & " Language " & vbTab & " "
	
        Console.WriteLine("WhiteSpaces = " & countWhitespaceCharacters(s))
    End Sub
End Class




' run:
'
' WhiteSpaces = 10
' 

 

70+ SQL courses for beginners and professionals