Imports System
Imports System.Text.RegularExpressions
Public Class Test
Public Shared Sub Main()
' Input string.
Dim input As String = ":1Af404080A83hfndsgt4u47"
' Use Regex.Replace with string arguments.
Dim output As String = Regex.Replace(input, "(?<=^.{5}).{8}", "Hello123")
' Print.
Console.WriteLine(input)
Console.WriteLine(output)
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KSW1wb3J0cyBTeXN0ZW0uVGV4dC5SZWd1bGFyRXhwcmVzc2lvbnMKClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKICAgICAgICAnIElucHV0IHN0cmluZy4KICAgIAlEaW0gaW5wdXQgQXMgU3RyaW5nID0gIjoxQWY0MDQwODBBODNoZm5kc2d0NHU0NyIKCSAgICAnIFVzZSBSZWdleC5SZXBsYWNlIHdpdGggc3RyaW5nIGFyZ3VtZW50cy4KCSAgICBEaW0gb3V0cHV0IEFzIFN0cmluZyA9IFJlZ2V4LlJlcGxhY2UoaW5wdXQsICIoPzw9Xi57NX0pLns4fSIsICJIZWxsbzEyMyIpCgkgICAgJyBQcmludC4KCSAgICBDb25zb2xlLldyaXRlTGluZShpbnB1dCkKCSAgICBDb25zb2xlLldyaXRlTGluZShvdXRwdXQpCglFbmQgU3ViCkVuZCBDbGFzcw==