fork download
  1. Imports System
  2. Imports System.Text.RegularExpressions
  3.  
  4. Public Class Test
  5. Public Shared Sub Main()
  6. Dim str As String = "ABBBBBBCD"
  7. Dim result As String = Regex.Replace(str, "(?<=B{4})B", "x")
  8. Console.WriteLine(result) //=> "ABxCD"
  9. End Sub
  10. End Class
Success #stdin #stdout 0.08s 18848KB
stdin
Standard input is empty
stdout
ABBBBxxCD