VC++利用EQ域向word中插入公式

今天头给的任务是在word中把原来用sqrt(**)中的sqrt去掉，要用word中的根式来表达。这可麻烦了，刚开始我用√{***}被否定了。然后就上网查资料，后来知道WORD有个EQ域，在没有公式编辑器的情况下也能输入公式，于是开始找怎么利用EQ域向word中写公式。这可费劲了，以前没用过，网上找到的是C#的连接如下：

http://www.cnblogs.com/chuncn/archive/2010/07/05/1771596.html

但是我用的是C++里面的东西名字不一样。后来发现其实都差不多，然后就开始对着写，可是参数总是写不对。运行出错。

后来找到篇c++关于操作word的文章，写的很全，连接如下：

http://blog.sina.com.cn/s/blog_6af293570100l9g3.html

里面写了很多方法，然后我知道应该传什么参数了。程序也就写出来了。但是新问题出现了。word里面的结果没有变成想要的形式（），而是{EQ \R(***)}；需要手动在选中公式按shift+F9才行。

后来对比word里面用定义同样功能的宏的代码，知道了问题的关键：fields.ToggleShowCodes()调用的时候需要将当前光标Selection移到公式里面才行。

下面贴出关键代码：

COleVariant vTrue((short)TRUE), vFalse((short)FALSE), vOpt((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    Selection oSel;
    oSel = wordApp.wordApplication.GetSelection();
    Fields fields = oSel.GetFields();
    Range range = oSel.GetRange();
    COleVariant formula = sText;//sText = _T("EQ \\R(***)")
    fields.Add(range, vOpt, &formula, vFalse);
    oSel.MoveLeft(COleVariant((short)1), COleVariant((short)1), COleVariant((short)0));
    fields.ToggleShowCodes();
    oSel.MoveRight(COleVariant((short)1), COleVariant((short)1), COleVariant((short)0));