请高手帮忙写个小程序，并打包成可执行文件，是文本处理型的
已经解决了。

[此贴子已经被作者于2016-10-22 14:54编辑过]

你这个思路，看着很乱。没看太明白。
整体而言，就是字符串的对比。这个很简单。
取出字符可以用 mid命令， s=mid(a,i,j) 那么s就是a中间 i 到i+j这一段。
打开文件，逐行读取
Open "C:\1.txt" for input as #1
Do while not EOF(1)
 line input #1, a '一次读入一行直到文件尾
Loop
close #1
写文件
Open "C:\2.txt" for output as #2
Print #2, a
close #2
只要你VB的基础能看得懂上面的语句，也写出if endif 和Do Loop。自己完全可以动手做，而且excel VBA就可以，不必打包成exe。

谢谢！

谢谢！

[此贴子已经被作者于2016-10-22 14:54编辑过]

已发邮件给你

谢谢XSS-WL，我在身边找了个朋友，已经搞定了，下次和你联系。