主题：请问这个字符串替换功能如何实现

参考代码

dim str as string = "【客户姓名】 -> <test>" & vbcrlf & _
"【联系电话】 -> <6666666>" & vbcrlf & _
"【销售姓名】 -> <马晓濛>"

msgbox(str)

str = System.Text.RegularExpressions.Regex.Replace(str, "(?<=【联系电话】 -\>+).*", " <*******>")
msgbox(str)