我可以发誓我过去已经剥离了 CRLF,但不确定为什么以下内容不起作用:
myString = "ABC" & vbCrLf & "DEF"
str1 = Replace(myString, vbLf, "")
str2 = Replace(str1, vbCrLf, "")
str3 = Replace(str2, vbNewLine, "")
MsgBox str3
Run Code Online (Sandbox Code Playgroud)
上面的代码不起作用,结果是:
ABC
DEF
Run Code Online (Sandbox Code Playgroud)
myString = "ABC" & vbCrLf & "DEF"
str1 = Replace(myString, Chr(13), "")
str2 = Replace(str1, Chr(10), "")
MsgBox str2
Run Code Online (Sandbox Code Playgroud)
上面的代码确实有效,结果是:
ABCDEF
Run Code Online (Sandbox Code Playgroud)
解决方案:感谢@ Mat 的回答(第一个代码的问题是我试图删除项目的顺序)VbCrLf 和 VbNewLine 是相同的,并且在删除 VbLf 后尝试删除组合 vbCr+VbLf 将不起作用