Hur sparar jag enklst en texten i ex: Text1 ? Hej, enklast måste väl vara en RichTextBox ? Du sparar genom att i händelsen Form_Unload skriva följande:Spara text
Hur öppnar jag denna text nästa gång jag öppnar programet ?Sv: Spara text
Loadfile & Savefile är dom kommandon du då behöver.
Alltså, byt ut text1 mot richtextbox1, ligger i komponentlistan (Du vet vart va?)
/BSv: Spara text
Dim ffile as Integer
ffile = FreeFile()
Open "C:\tmp\myFile.txt" For Output As #ffile
Print #ffile, Me.Text1.Text
Close #ffile
Och i Form_Load skriver du:
Dim ffile As Integer
ffile = FreeFile()
Open "C:\tmp\myFile.txt" For Input As #ffile
xmlstring = Input$(LOF(ffile), #ffile)
Me.Text1.Text = Input$(LOF(ffile), #ffile)
Close #ffile
Du får naturligtvis ändra till valfri sökväg som är giltig på din burk...