列表框删除空格

Question

我正在尝试使用此代码从列表框中删除空格但它无法正常工作

Dim word As String() = {" "}
For i As Integer = 0 To ListBox5.Items.Count - 1
    For Each Word As String In word
        If ListBox5.Items(i).ToString.Contains(Word) Then
            ListBox5.Items(i) = ListBox5.Items(i).ToString.Replace(Word, String.Empty)
        End If
    Next
Next

任何帮助都会受到很多赞赏。

Answer 1

你定义一个字符串数组，其中包含一个值及其静态，为什么？ 看起来你可以通过这样编码来做到这一点 扫描每个项目并替换＆＃34; ＆＃34;用string.empty， 不要检查它是否存在，只需在每个项目上运行替换语句

For i As Integer = 0 To ListBox5.Items.Count - 1    
    ListBox5.Items(i) = ListBox5.Items(i).ToString.Replace(" ", String.Empty)    
Next

Answer 2

试试这段代码

  For i As Integer = 0 To ListBox5.Items.Count - 1
            ListBox5.Items(i) = ListBox5.Items(i).ToString.Replace(" ", Nothing)
        Next

我们必须循环遍历列表框项目。我们将索引0中的项目声明为最终项目索引，即listbox.items.count-1。这存储在变量i中。接下来所有项目，例如从0到count-1被替换。 istBox5.Items（i）.ToString.Replace（“”，Nothing）“”表示空格，“无”表示null。您也可以通过导入system.regularexpressions来使用regex.replace。