VB .txt数据文件操作，请帮忙，多谢
VB .txt数据文件操作，请帮忙，谢谢！
有两个.txt数据文件，如下所示：
A.txt:
Number A-time 压力 温度
22 08:00:30 144.35 25
23 08:00:31 155.45 25
24 08:00:32 178.22 25
B.txt:
序号 B-time 湿度 膨胀度
11 08:00:30.200 50.3 45
12 08:00:31.300 50.5 46
13 08:00:32.200 50.7 50
要求：将A.txt的“A-time”列、“压力”列、“温度”列、与B.txt的“B-time”列、“湿度”列、提出来合并成为C.TXT文件，然后输出到硬盘，输出的C.txt文件如下:
C.txt:
A-time B-time 压力 湿度 温度
08:00:30 08:00:30.200 144.35 50.3 25
08:00:31 08:00:31.300 155.45 50.5 25
08:00:32 08:00:32.200 178.22 50.7 25
请高手能够给出具体的实现代码，比如首先需要打开并读取A.txt、B.txt文件，希望能给出具体实现代码的，
非常感谢！
------解决方案--------------------
这个容易：
有两个.txt数据文件，如下所示：
A.txt:
Number A-time 压力 温度
22 08:00:30 144.35 25
23 08:00:31 155.45 25
24 08:00:32 178.22 25
B.txt:
序号 B-time 湿度 膨胀度
11 08:00:30.200 50.3 45
12 08:00:31.300 50.5 46
13 08:00:32.200 50.7 50
要求：将A.txt的“A-time”列、“压力”列、“温度”列、与B.txt的“B-time”列、“湿度”列、提出来合并成为C.TXT文件，然后输出到硬盘，输出的C.txt文件如下:
C.txt:
A-time B-time 压力 湿度 温度
08:00:30 08:00:30.200 144.35 50.3 25
08:00:31 08:00:31.300 155.45 50.5 25
08:00:32 08:00:32.200 178.22 50.7 25
请高手能够给出具体的实现代码，比如首先需要打开并读取A.txt、B.txt文件，希望能给出具体实现代码的，
非常感谢！
------解决方案--------------------
这个容易：
- VB code
Dim strTmp As String, strItem1() As String, strItem2() As String Open "A.txt" For Input As #1 Open "B.txt" For Input As #2 Open "C.txt" For Output As #3 Do Until ((EOF(1)) Or (EOF(2))) Line Input #1, strTmp strItem1 = Split(strTmp, " ") If Ubound(strItem1) = 3 Then Line Input #2, strTmp strItem2 = Split(strTmp, " ") If Ubound(strItem2) = 3 Then Print #3, strItem1(1) & " " & strItem2(1) & strItem1(2) & " " & strItem2(2) & strItem1(3) End If Enf If Loop Close #3 Close #2 Close #1
------解决方案--------------------
- VB code
Line Input #1, strTmp
Do While InStr(strTmp, Space(2)) > 0
strTmp = Replace(strTmp, Space(2), Space(1))
Loop
------解决方案--------------------
当处理很大的文件时，我一般是作为二进制文件来读的，可以处理超过 2GB 的文本。
每次读入一个片段，例如 65536 字节，进行处理。需要注意的是，截取进来的数据一般不会正好在换行处，需要处理。例如半行（也许只差换行符）保留，与下一次读取的数据连接，等等。
如果你不怕麻烦，可以试试。
但你要在进程内开超大的数组，对于配置差的机器，可能还是要内存溢出。