Open/Save

[MeJulie]

I would like to know how could we load a file and save it as a *.txt file. I made a program more less like Word and i know that we have to make a directory listbox and a file listbox (i already made them ), but i dont know how to save what is in the "giant" textbox on a file, and then load it. Could you teach me how to do that. Oh and another thing is to Save and also Load what is on a listbox.

[scr0p]

use the code below to load/read a text file.

Private Sub command1_Click()
    Dim FilePath As String
    Dim Temp As String
    FilePath = "c:\testn\test.txt"
    Open FilePath For Input As #1
    
    'Opens the file given by the user.
    Do Until EOF(1)
    'Does this loop until End Of File(EOF) for file number 1.
        Line Input #1, Temp
        'Read one line and puts it into the varible Temp
        Text1.Text = Text1.Text & vbCrLf & Temp 'adds the existing text + the next line
        'Adds the read line into Text1.
        MsgBox "End of file reached!"
    Loop
    
    Close #1
End Sub