如何使用VB.Net编辑文本文件中的空行

您好，我正在尝试在文本文件中填充空行，但只有第69行正在编辑，因为知道所有的行都是空的，这是我的代码，请帮助

Public Sub labelstrings()
    Dim lines As String() = File.ReadAllLines(del.filename)
    Dim v As Integer
    For v = 0 To 69 
        ReDim lines(v)
        If String.IsNullOrWhiteSpace(lines(v)) Then

            lines(v) = "ali"
            File.WriteAllLines(del.filename, lines)
        End If
    Next

End Sub

我还尝试：

Public Sub labelstrings()
    Dim content As String
    content = File.ReadAllText(del.filename)
    content = content.Replace(String.IsNullOrWhiteSpace(content), "ali")
    File.WriteAllText(del.filename, content)


End Sub

---

处理整个数组，然后只重新写入文件一次。无需重新调暗数组，应使用其上限值，而不是硬编码值：

Public Sub labelstrings()
    Dim lines As String() = File.ReadAllLines(del.filename)
    For v As Integer = 0 To lines.GetUpperBound(0)
        If String.IsNullOrWhiteSpace(lines(v)) Then
            lines(v) = "ali"
        End If
    Next
    File.WriteAllLines(del.filename, lines)
End Sub

---

感谢您的回复，但id无效。文件中没有写入任何内容。请注意，我的文本文件是完全空白的。您可能没有正确描述问题，或者没有正确实施解决方案。上面的代码正确地将我的测试文件中的所有空行更改为“ali”。。。