Vb.net 从listview中提取数据

我有一个列表视图框，有5列，最多25行。我想从中导出数据。我这里的代码非常有效：

Dim rtb As New RichTextBox 
rtb.AppendText("Gen, Juv, Adult, Senile, Total" & vbNewLine)

For Each BitofData As ListViewItem In Results.ModelData.Items
    rtb.AppendText(
        BitofData.Text & "," &
        BitofData.SubItems(1).Text & "," &
        BitofData.SubItems(2).Text & "," &
        BitofData.SubItems(3).Text & "," &
        BitofData.SubItems(4).Text & vbNewLine)
Next
rtb.SaveFile(Address, RichTextBoxStreamType.PlainText)

---

但这将如何作为另一种形式的迭代来编写呢。例如，For循环或while循环？？？

子项（0）

与

相同。Text

因此您也可以在子项上循环0-4。问题是：如果它有效，为什么您希望它作为for和while循环？如果它有效，为什么要更改它？好问题。我还猜测for each没有for或while循环更有效。但我想了解我可能已经解决了这个问题问题我试图使用：For x As Integer=1来表示Results.ModelData.Items.Count-1