Certo che puoi:
codice:
Private Sub Form_Load ()
    Open "<percorso file txt>" For Input As #1
End Sub

Private Sub Command1_Click ()
    Line Input #1, Buffer 'Buffer è una variabile di tipo Stringa
    Text1 = Buffer
End Sub

Private Sub Form_Unload (Cancel As Integer)
    Close #1
End Sub
Così dovrebbe funzionare. Ovviamente se arrivi alla fine del file devi chiuderlo e riaprirlo.

Ciao