怎么使用vb.net修改word文档的页眉

如何使用vb.net修改word文档的页眉
之前没有做过类似的使用，所以对vb.net操作word一窍不通，如何修改word文档中已存在的页眉中的文字，请知道的老师给指点一下，谢谢。
[解决办法]
知道录取宏吗？录制了宏将代码直接复制过来，就可以用了。下面是我录制的，你看着修改

Sub 宏1()
'
' 宏1 宏
'
'
    If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
        ActiveWindow.Panes(2).Close
    End If
    If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
        ActivePane.View.Type = wdOutlineView Then
        ActiveWindow.ActivePane.View.Type = wdPrintView
    End If
    ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
    ActiveDocument.AttachedTemplate.BuildingBlockEntries(" 空白").Insert Where:= _
        Selection.Range, RichText:=True
    Selection.TypeBackspace
    Selection.TypeText Text:="强大的宏"
    ActiveDocument.Save
    ActiveDocument.Save
    ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
End Sub