Where is "a" is declared and set?

To my understanding, the outfile array is nothing else then a array channels. Channels are required for your I/O operations. FreeFile() is simply a function in VB that returns the next available channel number (and not a array as you may think).


>To whom it may concern,
>
>Private Sub Command4_Click()
>
>Dim infile As Long
>Dim outfile(133) As Byte ????
>Dim Q
>Dim data As Long
>
>infile = FreeFile
>Open Text1.Text For Binary As #infile
> filebytes = LOF(infile)
>
> If filebytes > 0 Then
> outfile(a) = FreeFile() ?????
> Open "c:\binary.txt" For Binary As #outfile(a) ????
>
> For Q = 1 To 8
> Get #infile, Q, data
> Put #outfile(a), Q, data ????
> Next
>
> End If
>
> Close #infile
> Close #outfile(133)
>End Sub
>
>
>Well, i copied this coding from some resources and find that i do not understand this coding which i put (???) next to the coding. Wonder anyone could possible explain to me. I have doubts in array.
>
>Dim outfile(133) As Byte ????
>
>As far as i know this (up) coding declare an array which had 133 block. Am i rite?
>
> outfile(a) = FreeFile() ?????
>
>This part i don't understnad why outfile(a)? I mean why there's a (a) next to the outfile. And freefile() = array freefile ... rite?
>
>
>Put #outfile(a), Q, data
>
>This code above shows that i am trying to put the data into an array called outfile(a)..rite?
>
>Pls Help...thanks..in advnace.