【发布时间】:2013-12-02 06:37:18
【问题描述】:
代码本身可以工作。当有没有文本的子项时会出现问题,程序会崩溃。我正在寻找一种方法来绕过这个烦人的错误。
我的代码:
If ComboBox1.Text = "Everything" Then
Dim SetSave As SaveFileDialog = New SaveFileDialog
SetSave.Title = ".txt"
SetSave.Filter = ".txt File (*.txt)|*.txt"
If SetSave.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim s As New IO.StreamWriter(SetSave.FileName, False)
For Each myItem As ListViewItem In Form1.ListView1.Items
s.WriteLine(myItem.Text & TextBox1.Text & myItem.SubItems(1).Text & TextBox1.Text & myItem.SubItems(2).Text & TextBox1.Text & myItem.SubItems(3).Text & TextBox1.Text & myItem.SubItems(4).Text & TextBox1.Text & myItem.SubItems(5).Text & TextBox1.Text & myItem.SubItems(6).Text & TextBox1.Text & myItem.SubItems(7).Text) '// write Item and SubItem.
Next
s.Close()
End If
错误:(这表示没有文本的列表视图项目可以从数字1到7,下面的一个是5) InvalidArgument=“5”的值对“索引”无效。 参数名称:索引
【问题讨论】:
标签: vb.net listview text save items