si setto la variabile.....

Dim locale As String
Dim ala As String
locale = text1.text
Open locale For Input As #1
Line Input #1, ala
MsgBox (ala)
Close #1


e mi da il solito errore