I'm trying to read a data file with 8 columns of data into an array in VB 6.0.

Here is a cut of the code I've started. How do I convert this to one that will read individual columns into 8 separate arrays?

Code:
Private Sub Command1_Click()
    
    Dim TextLine$, Filename$
    Dim FileHandle As Integer
    
    Filename$ = "C:\data.txt"
    
    If Dir(Filename$) = "" Then Exit Sub
    
    FileHandle = FreeFile
    
    Open Filename$ For Input As #FileHandle
    
    Do While Not EOF(FileHandle)
        Line Input #FileHandle, TextLine$
    Loop
    
    Close #FileHandle
    
End Sub
Thanks in advance for your help.