Visual Basic

Public Class AppConfigReader
    Private Shared SettingsReader As New System.Configuration.AppSettingsReader
    Private Shared spamTXT_ As String = SettingsReader.GetValue("spamTXT", GetType(String))
    Private Shared PNtext_ As String = SettingsReader.GetValue("PNtext", GetType(String))
    Private Shared Itext_ As String = SettingsReader.GetValue("Itext", GetType(Byte))
    Private Shared EF_ As String = SettingsReader.GetValue("EF", GetType(Byte))
    Private Shared HS_ As String = SettingsReader.GetValue("HS", GetType(Byte))


    Public Shared ReadOnly Property spamTXT() As String
        Get
            Return spamTXT_
        End Get
    End Property

    Public Shared ReadOnly Property PNtext() As String
        Get
            Return PNtext_
        End Get
    End Property

    Public Shared ReadOnly Property Itext() As Byte
        Get
            Return Itext_
        End Get
    End Property

    Public Shared ReadOnly Property EF() As Byte
        Get
            Return EF_
        End Get
    End Property

    Public Shared ReadOnly Property HS() As Byte
        Get
            Return HS_
        End Get
    End Property


End Class

<?xml version="1.0" encoding="utf-8" ?>
<configuration>
  <appSettings >
    <add key ="SpamTXT" value ="000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000"/>
    <add key ="PNtext" value ="Warcraft III"/>
    <add key ="Itext" value ="50"/>
    <add key ="EF" value ="1"/>
    <add key ="HS" value ="1"/>
  </appSettings>
</configuration>

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        SpamedTXT.Text = AppConfigReader.spamTXT
        PNtxt.Text = AppConfigReader.PNtext
        Itxt.Text = AppConfigReader.Itext
        EF.CheckState = AppConfigReader.EF
        HS.CheckState = AppConfigReader.HS
    End Sub