Como Gravar U Valor No Arquivo Appsetings Em vb Net

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
MF