以编程方式更新配置文件vb.net

Imports System.Configuration

Dim config As Configuration = ConfigurationManager.OpenExeConfiguration(ConfigurationUserLevel.None)

Dim appSettings As AppSettingsSection = config.AppSettings

appSettings.Settings("Key").Value = "NewValue"

config.Save(ConfigurationSaveMode.Modified)

Imports System.Configuration

Module Module1

    Sub Main()
        ' 读取配置文件
        Dim config As Configuration = ConfigurationManager.OpenExeConfiguration(ConfigurationUserLevel.None)

        ' 获取配置节
        Dim appSettings As AppSettingsSection = config.AppSettings

        ' 更新配置值
        appSettings.Settings("Key").Value = "NewValue"

        ' 保存配置文件
        config.Save(ConfigurationSaveMode.Modified)
    End Sub

End Module