what is weird is that it is actually saving some of the strings but not all..i dont understand
this is a xml reader i coded that turns the values into form fields..(works)
problem is taking those form fields and placing them into public strings
which is really weird because some of strings actually do return but some are blank


For example msgbox(__IRCVersion) returns the value from a textbox in the form
but msgbox(__AltNick) or msgbox(__Nick) does not...
Code:
Imports System
Imports System.IO
Imports System.Xml
Imports System.Xml.Serialization
Imports System.Text
Imports WindowsApplication1.SettingsForm

Public Module XmlReaderT
    Public Class BlueNexusConfig
        Public _PassportInfo As EmailInfo
        Public _CookieInfo As Cookies
        Public _Settings As UserSettings
    End Class
    Public Class EmailInfo
        Public _Email As String
        Public _Pswd As String
    End Class
    Public Class Cookies
        Public _GKPID As String
        Public _MSRegCookie As String
        Public _MSProfile As String
        Public _MSTicket As String
    End Class
    Public Class UserSettings
        Public _PassportAuth As Boolean
        Public _CustGKID As Boolean
        Public _GKID As String
        Public _Nick As String
        Public _AltNick As String
        Public _Ident As String
        Public _VersionReply As String
        Public _IRC7Version As String
        Public _FindsFirst As Boolean
        Public _findsMethodPP As Boolean
        Public _FindsIp As String
        Public _ChatIP As String
    End Class
    Public Sub ReadSettings(filename As String)
        Dim serializer As New XmlSerializer(GetType(BlueNexusConfig))
        Dim fs As New FileStream(filename, FileMode.Open)
        Dim bnx As New BlueNexusConfig
        bnx = CType(serializer.Deserialize(fs), BlueNexusConfig)
        SettingsForm.GKPID.Text = bnx._CookieInfo._GKPID
        SettingsForm.Ticket.Text = bnx._CookieInfo._MSTicket
        SettingsForm.Profile.Text = bnx._CookieInfo._MSProfile
        SettingsForm.MSRegCookie.Text = bnx._CookieInfo._MSRegCookie
        SettingsForm.email.Text = bnx._PassportInfo._Email
        SettingsForm.Password.Text = bnx._PassportInfo._Pswd
        SettingsForm.TextBox1.Text = bnx._Settings._Nick
        SettingsForm.AltNick.Text = bnx._Settings._AltNick
        SettingsForm.IDENT.Text = bnx._Settings._Ident
        SettingsForm.ChatIP.Text = bnx._Settings._ChatIP
        SettingsForm.FindsIP.Text = bnx._Settings._FindsIp
        SettingsForm.VersionReply.Text = bnx._Settings._VersionReply
        SettingsForm.MethodcPP.Checked = bnx._Settings._PassportAuth
        If bnx._Settings._PassportAuth = False Then
            SettingsForm.MethodcG.Checked = True
        End If
        SettingsForm.NetworkChFinds.Checked = bnx._Settings._FindsFirst

        If bnx._Settings._FindsFirst = False Then
            SettingsForm.NetworkChChat.Checked = True
        End If
        SettingsForm.CustGateCheck.Checked = bnx._Settings._CustGKID
        SettingsForm.CustGate.Text = bnx._Settings._GKID
        SettingsForm.IRCVERSION.Text = bnx._Settings._IRC7Version
        SettingsForm.FindsMcPP.Checked = bnx._Settings._findsMethodPP
        If bnx._Settings._findsMethodPP = False Then
            SettingsForm.FindsMcG.Checked = True
        End If
    End Sub
    Public __Email = SettingsForm.email.Text
    Public __Pswd = SettingsForm.Password.Text
    Public __GKPIDX = SettingsForm.GKPID.Text
    Public __MSProfile = SettingsForm.Profile.Text
    Public __MSRegCookie = SettingsForm.MSRegCookie.Text
    Public __MSTicket = SettingsForm.Ticket.Text
    Public __ChatIP = SettingsForm.ChatIP.Text
    Public __FindsIp = SettingsForm.FindsIP.Text
    Public __PassportAuth = SettingsForm.MethodcPP.Checked
    Public __CustGKID = SettingsForm.CustGateCheck.Checked
    Public __GKID = SettingsForm.CustGate.Text
    Public __Ident = SettingsForm.IDENT.Text
    Public __Nick = SettingsForm.TextBox1.Text
    Public __AltNick = SettingsForm.AltNick.Text
    Public __VersionReply = SettingsForm.VersionReply.Text
    Public __IRC7Version = SettingsForm.IRCVERSION.Text
    Public __FindsFirst = SettingsForm.NetworkChFinds.Checked
    Public __findsMethodPP = SettingsForm.FindsMcPP.Checked
End Module
any help would be appreciated..ive had help from here before..very greatful