打开rtf文件，查找和替换里面的文件（VB6.0源代码编写）