我读取一个字符串，然后放在数组里边。然后再textbox里显示。
显示的时候我每行加回车
像是这样
For i = 0 To testArray.Count - 1
VI_txtfinal.Text += testArray(i) + vbCrLf
Next
在textbox里显示正常。
但是复制到word里总是多一行回车。即空一行。
然后尝试删除回车
像是这样
strRes = Replace(strRes， vbCrLf， "") '删除回车符
strRes = Replace(strRes， "\n"， "") '删除回车符
但是都没有什么效果。
这是为什么？
怎么解决

@夜闻香 求救啊吧主

在txt里和txtbox效果是一样的。复制到word里就多个空行。

用vbCr或vbLf

你每行后面加一个 vbCrLf，自然就是在末尾加一个回车，等于多一个空行了。
另外，直接使用 textbox.text = 字符，会额外增加绘图负担，建议使用一个变量先存储文本，最后再设置到 textbox 里面去。