如何使用vb.net删除INI文件一节中的一行？

Imports System.IO

Public Sub DeleteIniLine(filePath As String, lineToDelete As String)
    ' 打开INI文件并读取内容
    Using reader As New StreamReader(filePath)
        Dim content As New StringBuilder()

        ' 逐行读取INI文件内容
        While Not reader.EndOfStream
            Dim line As String = reader.ReadLine()

            ' 判断是否为要删除的行
            If Not line.StartsWith(lineToDelete) Then
                ' 将非删除行添加到StringBuilder对象中
                content.AppendLine(line)
            End If
        End While

        ' 关闭StreamReader
        reader.Close()

        ' 创建新的INI文件并写入内容
        Using writer As New StreamWriter(filePath)
            writer.Write(content.ToString())
            writer.Close()
        End Using
    End Using
End Sub

Dim filePath As String = "path/to/your/file.ini"
Dim lineToDelete As String = "key=value"

DeleteIniLine(filePath, lineToDelete)