请教一下关于VB控制WORD的问题

Set varWdApp = New Word.Application
    '显示word.application，即word文字处理系统界面
    varWdApp.Visible = False
    
    '在word文字处理系统中添加一个文档
    Set vardoc = varWdApp.Documents.Add()
    With varWdApp.Selection
        
        '第一级标题
        .TypeText Text:="word文件"
        '应用标题1 样式
        .Style = wdStyleHeading1
        '增加两个段落
        .TypeParagraph
        .TypeParagraph        '第二级标题
        .TypeText Text:="Text1的内容"
        '应用标题2 样式
        .Style = wdStyleHeading2
        '新增一行
        .TypeParagraph
        '正文内容
        .Text = Text1.Text
        '正文首行缩进样式
        .Style = wdStyleBodyTextFirstIndent
        .TypeParagraph
   end with
....