Works like a charm! I really appreciate it!

I left out a few details about the variables I was wanting to save, so a few changes were necessary. Going to go ahead and post them in case the information is of use to anyone:

Load:

Code:
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim fileload As System.IO.StreamReader
        fileload = My.Computer.FileSystem.OpenTextFileReader("../../../AdventureProgress.txt")
        Dim progressload As String = fileload.ReadToEnd
        fileload.Close()
        Dim datasplit As String() = progressload.Split(New Char() {"'"c})
        doonce = datasplit(1)
        XpBar.Value = datasplit(2)
        HungerBar.Value = datasplit(3)
        SleepBar.Value = datasplit(4)
        HealthBar.Value = datasplit(5)
        Intl.Text = datasplit(6)
        Chr.Text = datasplit(7)
        Spd.Text = datasplit(8)
        Stl.Text = datasplit(9)
        Dex.Text = datasplit(10)
        Clockweek = datasplit(11)
        Clocksec = datasplit(12)
        Clockmin = datasplit(13)
        Clockhour = datasplit(14)

    End Sub
Save:

Code:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim filesave As System.IO.StreamWriter
        filesave = My.Computer.FileSystem.OpenTextFileWriter("../../../AdventureProgress.txt", False)
        filesave.Write("'" & doonce & "'" & XpBar.Value & "'" & HungerBar.Value & "'" & SleepBar.Value & "'" & HealthBar.Value & "'" & Intl.Text & "'" & Chr.Text & "'" & Spd.Text & "'" & Stl.Text & "'" & Dex.Text & "'" & Clockweek & "'" & Clocksec & "'" & Clockmin & "'" & Clockhour & "'")
        filesave.Close()
    End Sub