вот енто написал:

 

Open App.Path & "\xxx.dat" For Input As #10
For x = 1 To 11 Step 1
Line Input #10, t
mas(x) = t
Next x

Text1.Text = mas(1)

...
Close #10

 

ругается на  mas(x) = t

Хотя вроде в Option Explicit описал переменные

Dim mas(11), x As Long

Dim t As String