tekst in een tekstbox onthouden???? hoe!!

[hackie900]

ik wil graag dat als ik bijv. tekst in een tekstbox hebt getypt dat als ik het programma afsluit en ik kijk weer bij die tekstbox dat de tekst er dan nog in staat.
wie kan mij helpen

 

[RogerS]

Dan zul je de informatie bij het afsluiten van het programma ergens moeten bewaren, en bij starten weer moeten terughalen. Het beste kun je dit in een bestandje opslaan.

 

[Pizara]

Als het gaat om maar een 'aantal' textboxxen dan kan je het wel kwijt in je resources.
Mocht het er tientallen / hondertallen zijn zou ik serializeren. Dat gaat veel sneller.

Public Class Form1

    Dim ResFilename As String = "res.resources"

    Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing

        Dim rw As New Resources.ResourceWriter(ResFilename)
        rw.AddResource("TextBox1", TextBox1.Text)
        rw.Generate()
        rw.Close()

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        If System.IO.File.Exists(ResFilename) = False Then
            Dim rw As New Resources.ResourceWriter(ResFilename)
            rw.Close()
        Else
            Dim rr As New Resources.ResourceReader(ResFilename)
            Dim en As IDictionaryEnumerator = rr.GetEnumerator()

            While en.MoveNext()
                If en.Key = "TextBox1" Then
                    TextBox1.Text = CType(en.Value, String)
                    Exit While
                End If
            End While
            rr.Close()
        End If

    End Sub

End Class

 

[hackie900]

bedankt!!! het is gelukt!!

 

[hackie900]

nu lukt het neit meer ik krijg nu hierbij een error:
Dim rr As New Resources.ResourceReader(ResFilename)
er staat bij:
Corrupt .resources file. Got an unexpected EndOfStreamException while trying to read the ResourceReader header.

 

[Pizara]

je hebt een leeg bestand gesaved ofzo. gewoon die res file deleten en opnieuw saven.

 

[DuneII]

Je moet naar my project (solution explorer) en dan naar settings. Daar heb je 1 rij in de tabel staan. Als naam staat daar setting. Die naam kun je veranderen. Ik noem hem in dit geval even text. Voeg dan in je forum de volgende code toe:

Public Class Form1

    Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        My.Settings.text = TextBox1.Text()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TextBox1.Text = My.Settings.text
    End Sub
End Class

Dit is de makkelijkste manier om er maar 1 of misschien 2 te laten onthouden.

 

[hackie900]

het werkte!!! dank u wel