Imports System.Text.RegularExpressions
Module Module1
Sub Main()
Dim s As String = "php pdp dhp paip vb"
Dim reg As String = Regex.Replace(s, "p.p", "PHP")
Console.WriteLine(s)
Console.WriteLine(reg)
End Sub
End Module
' run:
'
' php pdp dhp paip vb
' PHP PHP dhPHPaip vb