请教大侠,如何用VC控制(设置)word中的字体,如字体大小,粗体等。请高手不吝赐教,在此先谢谢啦!

解决方案 »

  1.   

    这是VB中控制字体的代码,希望对你有用Dim myWord As New Word.Application
    myWord.Documents.Add
    myWord.Selection.Font.Size = 20
    myWord.Selection.Font.ColorIndex = wdBlue
    myWord.Selection.Font.Bold = True
    myWord.Selection.Font.Animation = wdAnimationSparkleText
    myWord.Selection.TypeText "Hello Word, this is Visual Basic"
    myWord.ActiveDocument.SaveAs "C:\MyFile.doc"
    myWord.Quit
      

  2.   

    楼上这位兄台,谢谢你的帮助。 可是你的代码好想是VB吧?我现在用的是VC,兄台能否提供相关的代码 或信息? 吾不胜感谢!!!!
      

  3.   

    从ClassWizard中导入Word类库
    其中App,Docs,Doc,Font,Selection需要导入
    先创建CWordApp->WordDocs->WordDoc;然后WordApp->Selection;再将Selection与Doc关联
    通过关联Selection和Font,然后直接设置Font就可以了WordApp->Selection理解为:CSelection sel;
    sel.AttachDisp...(WordApp.GetSelection())
    具体的我一时说不清楚,但是我解决了
    呵呵
      

  4.   

    楼上这位兄台能否在说得明白一些,你说的那些设置我都已经做好了,只是在设置字体时不知怎么设置:
         selection.TypeParagraph();
         paragraphs=selection.GetParagraphs();
         selection.SetFont(???)
        这里的setFont里面的内容怎么设置呀,还有在:
          range=selection.GetRange();
          range.SetFont(???);
        这里的SetFont又是作什么用的?这两者又有什么区别??
      
    兄台能否说得详细些,或者给我发点相关程序代码,非常感谢,分数不够还可再加!!!!
      

  5.   

    下面的代码可以改变selection里面的字体:
    _Font font;
    font = selection.GetFont();
    font.SetName("Tahoma");
    font.SetSize(24);
    selection.SetFont(font);你说的那两种SetFont方式,我觉得都可以,我用的是前者。
      

  6.   

    _Font font;
    font = selection.GetFont();
    font.SetName("Tahoma");
    font.SetSize(14);
    selection.SetFont(font);你说的两种方法都可以,我用的是前者。
      

  7.   

    谢谢你,我也测试成功了,和你提供的代码一样。还有,我在改变某一行或某一段或某几个字时出现了问题。我用shading改变颜色时,只能对表格中的区域改颜色,而不能对正常文本中的某一行或某一段或某几个字进行改色,请教你是否熟悉怎样设置?谢谢!