run-time error 54

[Vishalgiri]

Please use a buffer while working with files but you have to Declare the type of that variable first, so

Private Sub Form_Load()
Dim strFileInfo
Open "c:\TEXT.TXT" For Input As #1
    Get #1, , strFileInfo
Close #1
Text1.Text = strFileInfo
End Sub

By the way
You can also use relative path for file you wants to open.