Question

Word VBA问题的继续

hawking_xu大侠的功底不凡，看了hawking_xu大侠对weeqeeyee的Word VBA问题解答，想改变一下问题：在原有选择项（原有顺序不变）之后增加答案项，比如：
原题：4.在掺杂半导体中，多子的浓度越高，少子的浓度越（ ）。 正确答案：B A、高 B、低 C、不变
改变为：4.在掺杂半导体中，多子的浓度越高，少子的浓度越（ ）。 A、高 B、低 C、不变 B、低

这该是个类似的问题，可我想了半天，也想不出来，请hawking_xu大侠再作解答。谢谢！
我是想把原题：

1.本征半导体中的自由电子浓度（ ）空穴浓度。正确答案：C A、大于 B、小于 C、等于
2.在掺杂半导体中，多子的浓度主要取决于（ ）。 正确答案：C A、温度 B、材料 C、掺杂浓度
3.在掺杂半导体中，少子的浓度受（ ）的影响很大。 正确答案：A A、温度 B、掺杂工艺 C、掺杂浓度
4.在掺杂半导体中，多子的浓度越高，少子的浓度越（ ）。 正确答案：B A、高 B、低 C、不变
5.N型半导体（ ）。 正确答案：B A、带正电 B、呈中性 C、带负电

变成这样：
1.本征半导体中的自由电子浓度（ ）空穴浓度。A、大于 B、小于 C、等于 @@C、等于
2.在掺杂半导体中，多子的浓度主要取决于（ ）。A、温度 B、材料 C、掺杂浓度 @@C、掺杂浓度
3.在掺杂半导体中，少子的浓度受（ ）的影响很大。A、温度 B、掺杂工艺 C、掺杂浓度 @@A、温度
4.在掺杂半导体中，多子的浓度越高，少子的浓度越（ ）。A、高 B、低 C、不变 @@B、低
5.N型半导体（ ）。A、带正电 B、呈中性C、带负电 @@B、呈中性

不好意思，把“hawking_xu”当成“haifeistar”了，还是请haifeistar超大侠解答。

Answer 1

将光标定位在文档开头，编辑 → 替换：

查找内容：正确答案：([A-F])(*)(\1[!A-F^13]{1,})(*)^13

替 换 为：\2\3\4^32@@\3^p

高级 → √ 使用通配符 → 全部替换

Answer 2

其实就是个参照的问题，看你的 实际情况应该可以查找“（ ）。 ”这个符号，然后查找“、”号，到第四个顿号前的一个字符就是答案了。

像这样的vba针对性很强，你得看你要处理的事情的实际环境，然后变化相应的处理方式。
很难具有通用性。