COMO GRAVAR U VALOR NO ARQUIVO APPSETINGS EM VB NET

'coloque o caminho do xml
Dim caminhoXml As String = "C:\configFile.xml"

Dim xml As New XmlDocument()
xml.Load(caminhoXml)

'recuperando dados
Dim valor As String = xml.DocumentElement.GetElementsByTagName("dataUltimaExecucao").Item(0).InnerText

'inserindo dados
xml.DocumentElement.GetElementsByTagName("dataUltimaExecucao").Item(0).InnerText = "valor"

'salvar xml
xml.Save(caminhoXml)

Dim Valor As Integer = 0 

If Not (ConfigurationSettings.AppSettings(chave) Is Nothing) Then 

 Try 
      Valor = Convert.ToInt32(ConfigurationSettings.AppSettings("Max")) 
 Catch e As Exception 
        //tratamento da exceção
 End Try 

End If