Jag vill gärna spara texten med olika stilar
Ex: jag skriver i Arial Fet 20, nästa gång jag
öppnar detta skall det vara Arial Fet 20, även
om jag skrivit i annan stil precis innan.

Spara text är enklast tycker jag med:

On Error GoTo dberrhandler
CommonDialog1.ShowSave
Dim Minfil As Integer
Minfil = FreeFile()
Open CommonDialog1.FileName For Output As #Minfil
Print #Minfil, Me.Text1.Text
Close #Minfil

dberrhandler:
Exit Sub

Öppna text är enklast tycker jag med:

On Error GoTo dberrhandler
CommonDialog1.ShowOpen
Dim Minfil As Integer, skrivfil As Integer
Minfil = FreeFile
Open CommonDialog1.FileName For Input As Minfil
skrivfil = Minfil
Me.Text1.Text = Input$(LOF(Minfil), Minfil)
Close Minfil

dberrhandler:
Exit Sub

Men, stilen på texten sparas ej, alltid samma
förinställda text

Du måste inkudera textormatet i din fil.
Du kan annars titta på ritch textbox. Den klarar av formatering av text och kan spara ner formateringen i filen.

Så här löser jag det fritt ur minnet
<code>
Option Explicit
Private Sub Command1_Click()
Dim MinFil As Long, fontData As String
On Error GoTo filOutErr
CommonDialog1.ShowSave
MinFil = FreeFile()
fontData = "A20B" 'Arial 20 Bold
Open CommonDialog1.FileName For Output As #MinFil
Print #MinFil, fontData
Print #MinFil, Me.Text1.Text
Close #MinFil
filOutOk:
Exit Sub
filOutErr:
MsgBox "Fel vid skrivning till fil"
Resume filOutOk
End Sub
Private Sub Command2_Click()
Dim fNum As Long, fontStr As String
On Error GoTo filInErr
CommonDialog1.ShowOpen
fNum = FreeFile
Open CommonDialog1.FileName For Input As #fNum
Line Input #fNum, fontStr
Select Case fontStr
Case "A20B"
Me.Text1.FontName = "Arial"
Me.Text1.FontSize = 20
Me.Text1.FontBold = True
Case Else
Me.Text1.FontName = "Arial"
Me.Text1.FontSize = 10
End Select
Do Until EOF(fNum)
Line Input #fNum, Me.Text1.Text
Loop
Close #fNum
filInOk:
Exit Sub
filInErr:
MsgBox "Fel vid hämtning"
Resume filInOk
End Sub
</code>

Jo, det funkar nog.
Men detta gör du i programeringen.
Jag vill göra detta under programets körning.
Färdigt program alltså .
Precis som du kör t.ex. World.

tydligen ingen som klarar detta

Vad är det du undrar?

Hillqvist ger en lösning med RichTextBox.
SvenPon ger en lösning där du gör ett eget filformat. Skulle personligen satt det som en klass, men skit samma.

Du kommer aldrig någonsin kunna spara det i en ren textfil utan att spara extra data. Så... igen: vad är det du undrar?

Jag vill spara allt
Ex:
rad 1 är skrivet med font x och storlek x
rad 2 är skrivet med font y och storlek y
rad 3 är skrivet med font z och storlek z
rad 4 är skrivet med font a och storlek a

som jag sa, precis som när du skriver i t.e.x World

hur gör jag då ?