在VB中遍历文件并用正则表达式完成复制