批处理替换文件指定值

你这问题好古怪，一般这类程序都是为了解决实际工作中的大批量处理问题，没有批量不写程序，写程序是有成本的，要考虑投入产出比。一般选择练习，也不选择没有实际意义的问题来练习。

首先你要有库，对ZIP文件 *** 作的库，如果没有，笨办法是直接执行外部命令去解压出b里的c到文件系统的某个位置。打开文件找data，这个还要熟悉数据文件结构，除非没描述的纯数据，否则都会有描述结构，高概率和你说的data重复，如果简单处理很可能破坏文件结构。而且数据在文件级别可能是二进制的，数据二进制表达又是五花八门，还有个格式匹配问题。

找到数据写回文件再接着找，或者读入内存处理完再写回去都行，文件级别的 *** 作倒是蛮简单的。到最后，或许你还要替换原来zip里的源文件，那就随心所欲了。只是这个过程中必然有一堆问题要考虑，程序怎么安装？程序运行时上哪里去找zip? a、b、c没找到怎么办？执行外部命令没找到解压软件怎么办？解压空间不够怎么办？出现文件读写错误怎么办？

应该使用字符串判断函数，在VBA语法参考中应该有，就象这样：

InStr 函数—返回变量型（长型），指定一个字符串在另一个字符串中首次出现的位置。

语法 InStr([start, ] string1, string2 [, compare ] )

其中：

参数一、start 可选。数值表达式 （数值表达式：计算结果为数字的任何表达式。表达式可以是变量、常数、函数和运算符的任意组合。），设置每次搜索的开始位置。如果省略，则从第一个字符位置开始搜索。如果 start 包含 Null （Null：可以在字段中输入或用于表达式和查询，以标明丢失或未知的数据。

参数二、string1 必选。要在其中进行搜索的字符串表达式 （字符串表达式：任一求值为一列连续字符的表达式。表达式的元素可以是：返回字符串或字符串 Variant (VarType 8) 的函数；字符串字面值、常量、变量或 Variant。）。

参数三、string2 必选。被搜索的字符串表达式。

参数四、compare 可选。指定字符串比较 （字符串比较：使用 *** 作符确定某一字符串是否大于或等于另一字符串。使用 Option Compare 语句指定是进行二进制（区分大小写）比较，还是进行文字（不区分大小写）比较。）类型。如果 compare 为 Null，将产生错误。如果省略 compare，则比较类型由 Option Compare 设置决定。请指定有效的 LCID（区域设置 ID），以在比较中使用区域设置特定的规则。

剩下的就是使用if语句把instring函数写入进行判断，并输出结果就可以了。

---