当前位置:编程学习 > VB >>

VB中读取文本文件中的每一行,处理后写入另一个文本文件

--------------------编程问答-------------------- 10,000行,每行算1000个字节。才10MB。

一次性读取,Split()拆分成数组,计算,写入。 --------------------编程问答-------------------- 看文件大小,如果小的话可以直接读入进行处理,如果大的话可以使用内存影射文件。 --------------------编程问答-------------------- 支持一次性读取 --------------------编程问答-------------------- 这显然是一个命题作业。出题者预期的流程是逐行读入,判断,调用函数,写文件。

Dim strLine As String, strTmp() As String

Open "c:\source.txt" For Input As #1
Open "c:\result.txt" For Output As #2
Do Until EOF(1)
  Line Input #1, strLine
  strTmp = Split(strLine, "name")

  If Ubound(strTmp) > 0 Then
    Print #2, strLine & vbTab & abc(strTmp(1))
  End If
Loop
Close #2
Close #1




补充:VB ,  基础类
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,