vb.net - 替换 ListBox 中的坏词

Question

有人可以告诉我如何从列表框中删除坏词吗？

示例我有一个项目“Sh * t hats”，但我想用任何内容替换“Sh * t”。我怎样才能做到这一点？我试过了：

ListBox1.Items.Item(1).remove("Sh*t")

Answer 1

这取决于您如何添加 ListBox 项目，如果它们只是字符串，这应该可以工作：

For i = 0 To ListBox1.Items.Count - 1
    If ListBox1.Items(i).ToString.Contains("badword") Then
        ListBox1.Items(i) = ListBox1.Items(i).ToString.Replace("badword", "")
    End If
Next

（请注意区分大小写），您可以使用ListBox1.Items(i) = ListBox1.Items(i).ToString.ToLower.Replace("badword", "")，但这意味着任何被更改的项目都将变成全小写。

Answer 2

此示例创建一个带有坏词的字符串的通用列表，循环遍历列表框，与坏词列表进行比较，如果找到则删除：

Dim BadWords As New List(Of String)
BadWords.Add("poop")
BadWords.Add("crap")
For Each li As ListItem In Me.ListBox1.Items
   If BadWords.Contains(li.Text) Then
       li.Text = ""
   End If
Next

每次迭代，li都是ListBox's ListItem元素的一个实际实例，所以当场修改它，也会在列表中更新它。