计数文本文件中的文本实例数 - VB

vb.net file parsing text delimited

482 观看

1回复

3 作者的声誉

我需要解析一个大的分隔文本文件(2800万行加)并使用VB 2015计算文本文件中特定文本的实例数。

因此,线的结构;

123 | WD7 | ELU | SOD | 010116
456 | WD9 | LFT | AST | 010116
135 | WD7 | TFT | THY | 010116
154 | AED | ELU | SOD | 030116

等等....

我的确切要求是识别分隔字段2和分隔字段4中的每个条目,然后计算每个条目的实例数。

因此,从上面的行中,字段2中的项目将是WD7,WD9和AED,实例的数量将是WD7 x 2,WD9 x 1和AED x 1。

类似地,字段4中的项目将是SOD,AST,THY和SOD,并且实例的数量将是SOD x 2,THY x 1,AST x 1。

在解析文件之前,将不知道字段2和字段4中的项目,并且实际上解析是识别这些字段中包含的文本以及多少次。

希望这很清楚,非常感谢任何指导。

史蒂夫

作者: SBalmer 的来源 发布者: 2017 年 4 月 3 日

回应 1


0

102 作者的声誉

决定

试试这个:

Dim textfile As String = "C:/test/test.txt"
Dim stream_reader As New StreamReader(textfil_file)
Dim line As String
line = stream_reader.ReadLine()
Do While Not (line Is Nothing)
        Dim parts As String() = line.Split("|")
        For Each part In parts
            'display them in msgboxes or do whatever you like with them

            MsgBox(part(1))
            MsgBox(part(3))
        Next
    line = stream_reader.ReadLine()
Loop
stream_reader.Close()
作者: Alex 发布者: 2017 年 4 月 5 日
32x32