VB.net复制后自动换行

首先，我还是VB.net新手，遇到了一个奇怪的问题

我已经创建了一个工具，可以将多行文本框a中的内容拆分为一行字符串，添加一些字符，并将它们连接起来，显示在另一个多行文本框B中（a->split content->add character->join->display in B）。样品是这样的

原始数据来自：

This
is
a
test
data

结果显示在B中：

Row 0 = This
Row 1 = is
Row 2 = a
Row 3 = test
Row 4 = data

从B复制的结果：

Row 0 = This
Row 1 = 
is
Row 2 = 
a
Row 3 = 
test
Row 4 = 
data

源代码是

tempA = ""
tempB = ""

tempA = A.Text()
stringAry = tempA.Split(Environment.NewLine)
For iCounter As Integer = 0 To stringAry.Length - 1
tempB = tempB + "Row " + iCounter.ToString + " = " + stringAry(iCounter).ToString +     Environment.NewLine
Next
B.Text() = tempB

---

因此，我可以知道为什么复制的结果与显示的结果不同，以及如何解决这个问题吗？

您应该从

字符串（iCounter）

值中删除任何不需要的新行字符

tempA = ""
tempB = ""

tempA = A.Text()
stringAry = tempA.Split(Environment.NewLine)
For iCounter As Integer = 0 To stringAry.Length - 1
tempB = tempB + "Row " + iCounter.ToString + " = " + stringAry(iCounter).ToString.Replace(Environment.NewLine, string.Empty) +     Environment.NewLine
Next
B.Text() = tempB

---

问题在哪里？？？。我可以看到示例和源代码，但您有什么问题吗？很抱歉，我想问的问题是，为什么复制的结果与显示的结果不同，我如何解决这个问题？在你的源代码中，只有一段你从A中获取原始数据并在B中显示结果。你所说的从B复制的结果是什么意思？如果我手动将内容从B复制到记事本，我会得到相同的结果/格式。在加入之前，我尝试从每个数组中替换任何Environment.NewLine和vbCrLf，如下所示：tempA=”“tempB=”“tempA=A.Text（）stringAry=tempA.Split（Environment.NewLine），对于iCounter，我将整数=0替换为stringAry.Length-1 sTemp=stringAry（iCounter）.Replace（Environment.NewLine，”）tempB=tempB+“Row”+iCounter.ToString+“=”+sTemp+Environment.NewLine Next B.Text（）=tempB，但输出似乎仍然相同