vb.net - 自动删除listobx中的空项目？

Question

listbox由于从textbox读取文本文件 的附加文本，我有一个不断创建空项目。

我可以让它在启动时删除任何空项目吗？

Answer 1

如果您想在加载表单时从列表框中删除空项目，请使用Form1_LoadEvent

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

然后在此事件中添加此代码

Dim i As Integer = 0
        Do While (ListBox1.Items.Count) - 1 >= i
            If String.IsNullOrEmpty(ListBox1.Items(i)) Then
                ListBox1.Items.Remove(ListBox1.Items(i))
                i -= 1
            End If
            i += 1
        Loop

您可以将 if 条件语句替换
String.IsNullOrEmpty(ListBox1.Items(i)) 为 ListBox1.Items(i) = String.Empty

Answer 2

阅读文件时最好只过滤掉空行。但是，如果那不可能：

For i As Integer = 0 To yourListBox.Items.Count - 1
    If CStr(yourListBox.Items(i)) = String.Empty Then
        yourListBox.Items.RemoveAt(i)
        i -= 1
    End If
Next

如果您可以控制添加，那么假设您正在添加它们，如下所示：

For Each line As String In IO.File.ReadAllLines(somefile)
    yourListBox.Items.Add(line)
Next

......然后你去：

For Each line As String In IO.File.ReadAllLines(somefile)
    If line <> String.Empty Then yourListBox.Items.Add(line)
Next