Question

How to replace consecutive characters with only one using RegEx in VB.NET

Answer 1

Imports System
Imports System.Text.RegularExpressions

Class Program
    Public Shared Sub Main()
        Dim input As String = "aaaabbbccdddddd"
        Dim pattern As String = "(.)\1+"
		
        Dim result As String = Regex.Replace(input, pattern, "$1")
		
        Console.WriteLine("Original: " & input)
        Console.WriteLine("Modified: " & result)
    End Sub
End Class


' run:
'
' Original: aaaabbbccdddddd
' Modified: abcd
'

 

70+ SQL courses for beginners and professionals