如何使用Vb6解析以制表符分隔的文本？
- 内容介绍
- 文章标签
- 相关推荐
本文共计249个文字，预计阅读时间需要1分钟。
我有一个文件，有几千行，几列用标签分隔。我想做的是将每个循环放入一个数组，以便我可以将它们单独放在另一个应用程序中，然后移动到下一行。不幸的是，我得到了这个：+Open mytextfil
我有一个文件,有几千行,几列用标签分隔我想要做的是逐个循环,将列放入一个数组,以便我可以将它们单独放在另一个应用程序中,然后移到下一行.不幸的是我得到了这个：Open mytextfile.txt For Input As #FileHandle Do While Not EOF(FileHandle) Line Input #FileHandle, IndividualLine StringToBreakup = IndividualLine Loop
那么我将如何将单个阵容分解为数组呢？
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
澄清一下：我会避免使用Variants并使用vbTab.
本文共计249个文字，预计阅读时间需要1分钟。
我有一个文件，有几千行，几列用标签分隔。我想做的是将每个循环放入一个数组，以便我可以将它们单独放在另一个应用程序中，然后移动到下一行。不幸的是，我得到了这个：+Open mytextfil
我有一个文件,有几千行,几列用标签分隔我想要做的是逐个循环,将列放入一个数组,以便我可以将它们单独放在另一个应用程序中,然后移到下一行.不幸的是我得到了这个：Open mytextfile.txt For Input As #FileHandle Do While Not EOF(FileHandle) Line Input #FileHandle, IndividualLine StringToBreakup = IndividualLine Loop
那么我将如何将单个阵容分解为数组呢？
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
澄清一下：我会避免使用Variants并使用vbTab.