Запись из TextBox в Microsoft Word 2010 с последующим сохранением документа - VB

Формулировка задачи:

Как реализовать запись информации из элемента Textbox в документ docx?

Решение задачи: «Запись из TextBox в Microsoft Word 2010 с последующим сохранением документа»

textual
                            Листинг программы 
                        

                            Private Sub Command6_Click()
  ' Activating document
objDoc.Activate
 
With objDoc.ActiveWindow.Selection
  .InsertAfter Text1.Text
  .InsertParagraphAfter
  .Font.Bold = True
  .ParagraphFormat.Alignment = wdAlignParagraphCenter
  .EndOf 'Snimaet Videlenie
 
' Vstavliaet noviy abzati
  .InsertParagraphAfter
  .InsertAfter Text2.Text
  .ParagraphFormat.Alignment = wdAlignParagraphCenter
  .Font.ColorIndex = wdBlue
  .Font.Size = 20
  .EndOf 'Snimaet videlenie
End With
End Sub
                        