Mega Code Archive

 

Categories / VB.Net Tutorial / Regular Expressions

 

Count chars

Imports System.Text.RegularExpressions Public Class Tester     Public Shared Sub Main         Dim quote As String = _             "The important thing" & vbNewLine & _             "is not to stop questioning." & vbNewLine & _             "--Albert Einstein" & vbNewLine         Dim numChars As Integer = Regex.Matches(quote, ".").Count         Console.WriteLine(numChars)     End Sub End Class 66