Vraag : Het schrijven van een geformatteerd dossier aan geheugen

Ik gebruik de volgende functie om een geformatteerd dossier te openen en te lezen aan een RichTextBox en het werkt boete.  Wat ik zou willen doen moet het dossier kunnen opslaan aan geheugen, en dan het kunnen later roepen als de gebruiker terug naar het oorspronkelijke dossier wil terugkeren.  (De gebruiker heeft de optie om het dossier te veranderen binnen van het tekstvakje).

So fundamenteel ik een knoop wil kunnen verstrekken die de gebruiker terug naar het dossier laat terugkeren in geheugen wordt opgeslagen dat.  Ik ken de behoefte van I om MemoryStream te gebruiken, maar ik kan niet enkel berekenen hoe te maken… schrijven en lezen
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:

Public Sub (ByVal afzender als System.Object, ByVal e als System.ComponentModel.CancelEventArgs) Handvatten OpenFileDialog1_FileOk OpenFileDialog1.FileOk

        txtFile.Text = OpenFileDialog1.FileName.ToString ()
        'Probeer om het open dossier te sluiten
        OpenFileDialog1.Dispose ()
        Schemerige ioOutput als Koord = ""
        'txtFile.Text als het dossier - de naam opende vroeger
        Als File.Exists (txtFile.Text) toen
            Schemerige ioFile als Nieuwe StreamReader (txtFile.Text)
            Schemerige ioLine als Koord = ""
            Schemerige ioLines als Koord = ""
            Terwijl niet ioFile.EndOfStream
                ioLine = ioFile.ReadLine
                ioLines = ioLines & vbCrLf & ioLine
            Eind terwijl
            ioOutput = ioLines

            'Laat opslag het dossier aan geheugen enkel desgevallend
                   De 'code van de plaats die ioOutput hier aan geheugen opslaat

            'Probeer om het open dossier opnieuw te sluiten
            ioFile.Close ()
        Beëindig als
        'Plaats de resultaatStroom in een RichTextBox
        RichTextBox1.Text = ioOutput

    Sub van het eind

Antwoord : Het schrijven van een geformatteerd dossier aan geheugen

Opslag enkel het in een koord op het klassenniveau…
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:

Openbare Klasse Form1

    Privé FileData als Koord = ""

    Privé Sub (ByVal afzender als System.Object, ByVal e als System.EventArgs) Handvatten Button1_Click Button1.Click
        Het gebruiken ofd als Nieuwe OpenFileDialog
            Als ofd.ShowDialog = Windows.Forms.DialogResult.OK toen
                Probeer
                    FileData = My.Computer.FileSystem.ReadAllText (ofd.FileName)
                    txtFile.Text = ofd.FileName
                    RichTextBox1.Text = FileData
                Vangst ex als Uitzondering
                    MessageBox.Show („Dossier: “ & ofd.FileName & vbCrLf & vbCrLf & ex.ToString, „het Dossier van Loadin van de Fout“, MessageBoxButtons.OK, MessageBoxIcon.Error)
                Het eind probeert
            Beëindig als
        Beëindig Gebruikend
    Beëindig Sub

    Privé SubButton2_Click (ByVal afzender als System.Object, ByVal e als System.EventArgs) behandelt Button2.Click
        RichTextBox1.Text = FileData
    Sub van het eind

De Klasse van het eind
Andere oplossingen  
 
programming4us programming4us