[Sesa_Mina]

Probier mal folgendes:


am Formular ein Textfeld erstellen.
Eigenschaft 'MultiLine' aud True setzen


private sub leseText (myfile as string)
open myfile for input as #1
text1.text=""
while not eof(1)
line input#1,data
text1.text=text1.text & vblf & data
wend
close #1
end sub

Den text hast nachher in der textbox stehen und kannst ihn sogar bearbeiten.

und wennst die richtextbox verwendest hast sogar befehle zum laden und speichern dabei.

mfg