vb里面,要删除指定的空行。为此郁闷了很久。求各位了。。。
这样一段文字
---------------------------------
aa aa1 aa2
b b1 b2
q ww e
we rt ty
ss ty fgdf
-----------------------------
,要把文字保留,没有空行隔开的文字保留,但是要记录每个数据段的行数。数据段之间要有空行。上面后半段没有文字了,就要全部删除,形成这样:
---------------------------------
aa aa1 aa2
b b1 b2
q ww e
we rt ty
ss ty fgdf
-------------------------------------
其他:你这是算法不清楚,我用伪代码的形式给你描述一下
变量.上一行=空
变量.当前行=空
读取一行数据到 变量.当前行
循环 直到文件结束
如果 变量.当前行 是空
如果 变量.上一行 不是空
输出空行到结果文件
变量.上一行=空
否则(如果 变量.当前行 不是空)
输出变量.当前行到结果文件
变量.上一行=变量.当前行
读取一行数据到 变量.当前行
'循环结束点
如果 变量.当前行<>空
输出变量.当前行到结果文件中 打开原来的文件
依次读入各行
如果是需要保留的内容,则写入到新文件中,否则就不写
重复以上2步,直到原文件读完
删除原来的文件,将新文件更名为原来的名称
上一个:VB6操作excel 菜鸟求高手帮写几个VB6操作excel的过程
下一个:VB程序设计题作业求救啊!帮忙回答一下,感激不尽!