About opening files

[Hageneezz]

Hi all,ive got a question about reading in data from text files
Ive got a project with a textbox. If i click the command button i want vb to open the textbox and read in a value from a specific line. How can i do this

Is it possible to read in a specific line from a textfile as a result of a random number,example if there is a random number of 4 can vd read in the value from line 4 in the file..Hope you can help

[RhinoBull]

The are many different ways so the following sample is just a one of them:

Public Function GetTextFromLine(sFile As String, iLine As Long) As String
Dim sText$, arText() As String, sLine$
 
    Open sFile For Input As #1
        'read entire file into a string variable
        sText = Input(LOF(1), #1)
        'split text into array
        arText = Split(sText, vbNewLine)
        'read specific line
        sLine = arText(iLine - 1)
    Close #1
    GetTextFromLine = sLine
 
End Function
 
'usage:
Private Sub Command2_Click()
    Text1.Text = GetTextFromLine("c:\temp\test1.txt", 3)
End Sub

[Hageneezz]

Hey thanks very much for the reply

[RhinoBull]

You're welcome.