注册 登录
编程论坛 VB6论坛

TXT文件读入列,生成行的问题。

ictest 发布于 2017-04-16 17:39, 1002 次点击
请教TXT文件读写的一种写法:

现有a.txt文件格式如下:
Name:123
Lot:1

....XXX.....
...XABAAX...
..AABAAABAX.
.XAABAABAAAX
.AABAAABAAAX
.XAABAAAABAA
..XAABAAABX.
...XAAHAAX..
......AXAA..
......XXX...

Totle:
        A=44
        B=11
        X=16
        H=1

想要生成如下格式的b.txt文件:

Name:123
Lot:1

..........
...X1X....
..1111X...
.X11211X..
X1221211..
X2111121..
X111111H1X
.X2111111X
..11122X1.
..X111X...
...XX1....

Totle:
        1=44
        2=11
        X=16
        H=1
        
变化的方式如下:
第一行,第二行,第三行不变,读出后直接写入新的TXT文件。
从第4行开始到第13行,首先将A变成1,B变成2,然后读第一列(第4行到第13行的第一列),在新的TXT文件中变成第5行,读第2列(第4行到第13行的第二列),在新的TXT文件中变成第6行.....以此类推。
第14行,第15行,第16行不变,读出后直接写入新的TXT文件。
变化完成。

2 回复
#2
Artless2017-04-17 01:19
题目明确Lz努力
#3
xiangyue05102017-04-17 08:55
如果你的txt就是上面的这样,不会再复制或者有其他的字符信息
那么可以直接将txt文档读入一个字符串,并对这个字符串进行replace操作,A替换成1, B替换成2
Replace 是区分大小写的,所有Total中的a和A不同,B也和b不同,不会搞混的。 是否适用需要楼主自己判断,毕竟上面只是一个示例,也许其他的情况不适用。
1