Dim dz as string = "收件单位:11/////收件地址:11/收件人:11/联系电话:11"Dim s As String = dz.Replace("/", vbcrlf)
这样排列下来的结果就是,1个/就替换了1个回车换行。
收件单位:11
收件地址:11
收件人:11
联系电话:11
如何实现 不管多少个/ 只替换1个回车换行?
收件单位:11
收件地址:11
收件人:11
联系电话:11
Dim pattern As String = "[\/]+"
Dim txt = "收件单位:11/////收件地址:11/收件人:11/联系电话:11"
Dim str = System.Text.RegularExpressions.Regex.Replace(txt , pattern , vbcrlf)
Output.Show(str)