Parsing Vb6:分隔制表符分隔的文本

Parsing Vb6:分隔制表符分隔的文本,parsing,vb6,tab-delimited,Parsing,Vb6,Tab Delimited,我有一个文件,有几千行和几列,用制表符隔开。我想做的是逐个循环,将列放入数组中,这样我就可以将它们分别放在另一个应用程序中,然后移到下一行。不幸的是,我已经做到了这一点: Open mytextfile.txt For Input As #FileHandle Do While Not EOF(FileHandle) Line Input #FileHandle, IndividualLine StringToBreakup = IndividualLine Loop 那么,如何使用sp

我有一个文件,有几千行和几列,用制表符隔开。我想做的是逐个循环,将列放入数组中,这样我就可以将它们分别放在另一个应用程序中,然后移到下一行。不幸的是,我已经做到了这一点:

Open mytextfile.txt For Input As #FileHandle
 Do While Not EOF(FileHandle)
 Line Input #FileHandle, IndividualLine
 StringToBreakup = IndividualLine
Loop
那么,如何使用split命令将单个行拆分为一个数组呢

Dim StringArray as Variant

Open mytextfile.txt For Input As #FileHandle
 Do While Not EOF(FileHandle)
 Line Input #FileHandle, IndividualLine
 StringToBreakup = IndividualLine

 StringArray = Split(StringToBreakup, CHR(9)) 

 Process array here...

Loop
澄清一下:我会避免使用变体,而使用vbTab

Dim str() as String

Open mytextfile.txt For Input As #FileHandle
    Do While Not EOF(FileHandle)
    Line Input #FileHandle, IndividualLine
    str = Split(IndividualLine, vbTab)
    Debug.Print str(0)  'First array element
Loop