传递richtextbox中列表框的所有项目

Question

如何将列表框中的项目传递给richtextbox？。我有多个项目，我希望它显示在richtextbox中。这个项目就像一张收据。它显示项目及其数量。

Answer 1

这只是一种方法，使用LINQ：

Dim Items As String() = 
    From s As String In ListBox1.Items

RichTextBox1.Text = String.Join(Environment.NewLine, Items)

Answer 2

使用列表框执行此操作的一个问题是，列表框将项目存储为对象，并使用每个对象的ToString方法显示该对象的表示。

这样的事情应该有效：

RichTextBox1.Lines = (From o In ListBox1.Items
                      Let ostr = o.ToString
                      Select ostr).ToArray

这样，如果您使用无法隐式转换为字符串的对象，它仍然可以工作。或者，如果您使用自定义对象，则所需的只是类中的ToString覆盖。