How do i get line1 from my text file and put it in a textbox?

How do i take line1 from my textbox and put it into my textbox

please help me :confused:

This will get the first line from Text1 and set the text of Text2 to that line:

VB Code:

Dim firstline As String
firstline = Mid$(Text1.Text, 1, InStr(1, Text1.Text, vbNewLine) - 1)
Text2.Text = firstline

This will get the first line from a sequential text file.

Code:

---

Private Sub Command1_Click()
  Dim MyString
  Dim FileNum As FreeFile
  Open "YourTextFile.txt" For Input As #FileNum
    Input #FileNum, MyString
  Close #FileNum
  Text1 = MyString
End Sub

---