[Resolved]Simple Read .txt

[Account]

I have a text1 and this code:

Option Explicit
 
Private Sub Command1_Click()
    text1.text = "My text" 
        On Error GoTo errorHandeler
            Open "c:\temp.txt" For Output As #1
                Print #1, text1.Text
            Close #1
errorHandeler:
End Sub
 
Private Sub Form_Load()
On Error GoTo errorHandeler
    Dim Text As String
        Open "c:\temp.txt" For Input As #1
                
                Exit Sub
errorHandeler:
End Sub

But, the READ txt function is not good, how to make it puts the text from the ini into my Text1?

[that is a part of a code that Gavio me, I use it for something diffrent now but dont know how to edit it]

[RhinoBull]

There is a tutorial posted in the VB FAQ section:

http://www.vbforums.com/showthread.php?t=342619

[gavio]

Private Sub Form_Load()
On Error GoTo errorHandeler
    Dim Text As String
        Open "c:\temp.txt" For Input As #1
[B]            Do While Not EOF(1)
                Line Input #1, Text
                     Debug.Print Text
            Loop[/B]
        Close #1
errorHandeler:
End Sub

[Account]

ok, both helped:]

Thnx, topic Resolved