vc操作word画了一个矩形，如何往矩形框里面写字呢？

我用vc操作word画了一个矩形，已经能够画出矩形了。但是如何往矩形框里面写字呢？能否给个示例代码呢？谢谢大虾们了。以下为部分代码。
if(!m_app.CreateDispatch(_T("Word.Application"))) //启动WORD
{
//AfxMessageBox(_T("OFFICE没有安装"));
return FALSE;
}
m_app.SetVisible(bVisiable);
COleVariant FileName(fileName); COleVariant vtrue((short)true),vfalse((short)false),vOpt((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
m_docs = m_app.GetDocuments();
m_doc = m_docs.Add(FileName, vOpt, vOpt, vOpt);
m_sel = m_app.GetSelection();
m_shp = m_doc.GetShapes();m_shp.AddShape(1,100,200,100,200,vOpt);