vb.net 保存列表框项目空行

Posted 2023-05-07

【中文标题】vb.net 保存列表框项目空行

【英文标题】：vb.net save listbox items empty lines

【发布时间】：2015-11-12 13:21:21

【问题描述】：

我想在使用 savefiledialog 时将列表框项保存到 txt 文件

这是我正在使用的代码，它正在工作，但它会在每个项目之间添加一个新行。我想保存没有那些空行。如果有人可以帮忙，谢谢！

我的代码：

            If ListBox1.Items.Count > 0 Then
        SaveFileDialog1.InitialDirectory = "C:/"
        SaveFileDialog1.Title = "YOUR RESULTS"
        SaveFileDialog1.FileName = Label4.Text
        SaveFileDialog1.Filter = ("text files (*.txt) | *.txt")

        SaveFileDialog1.ShowDialog()

        Dim w As New IO.StreamWriter(SaveFileDialog1.FileName)
        Dim i As Integer
        For i = 0 To ListBox1.Items.Count - 1
            w.WriteLine(ListBox1.Items(i).ToString)
        Next
        w.Close()
    Else
        MsgBox("There is nothing to save", MsgBoxStyle.Information)
    End If

【参考方案1】：

要从字符串的开头删除空格，请使用默认的String.TrimStart() 扩展方法，如下所示：

w.WriteLine(ListBox1.Items(i).ToString.TrimStart)

要从末尾只删除空格，请使用默认的String.TrimEnd() 扩展方法，并且要从字符串的开头和结尾删除两个空格，请使用String.Trim()

更新

我建议你使用StringBuilder对象如下：

Dim sb As New StringBuilder

For Each lbItem As Object In ListBox1.Items
    sb.Append(lbItem.ToString)
Next

File.WriteAllText(SaveFileDialog1.FileName, sb.ToString, Encoding.Default)

【讨论】：

试过了，还是有空格。

你的意思是空格还是新行？