求助VB更新文本内某一数据并保存更新前数据的代码！

例：1.txt，2.txt文本，分别存放目录为D:\A\ 和D:\B\ 下 1.txt 内容为：
123,123,moda，0.00,1.00,0.00   
123,123,moda，-1.00,1.00,0.00
123,123,moda，3.00,1.00,0.00
123,123,moda，0.00,1.00,0.00   
2.txt内容为：
124,124,vm，3.00,1.00,0.00
124,124,vm，0.00,1.00,0.00   

1.txt中只将moda,后的0更新为1，结果为：
123,123,moda，1.00,1.00,0.00   
123,123,moda，-1.00,1.00,0.00
123,123,moda，3.00,1.00,0.00
123,123,moda，1.00,1.00,0.00   
2.txt中只将vm,后的0更新为1，结果为：
124,124,vm，3.00,1.00,0.00
124,124,vm，1.00,1.00,0.00   

最后将更新前的1.txt和2.txt存放到 D:\back\目录中。
求VB6.0的源代码和设计方法，谢谢！！ 
--------------------编程问答-------------------- --------------------编程问答-------------------- 看来这个网站也不行哦，换论坛了！没人气，遇到问题在这里根本解决不了，看到帖子的用户闪人吧，换论坛吧！

补充：VB ,  基础类