3 Declare o seguinte namespace , adicionando-o como a primeira linha de código em seu módulo.
Imports Microsoft.Office.Interop
4
Crie as variáveis de objeto do Word , adicionando o seguinte código: Dim
wordApp as New Word.Application
Dim WordDoc as New Word.Document
Dim newPrgrh Como Word.Paragraph
5
Definir o caminho eo nome do arquivo e abra-o
WordDoc = wordApp.Documents.Open ("C: . \\ WordText.doc " )
wordApp.WindowState = Word.WdWindowState.wdWindowStateNormal
wordApp.Visible = True
6
Acrescentar um novo parágrafo para o arquivo , adicionando a seguinte linha de código:
wordDoc.Paragraphs.Add ()
newPrgrh = wordDoc.Content.Paragraphs.Add
newPrgrh.Range.Text = " novo parágrafo "
newPrgrh.Range.Font.Bold = True
newPrgrh.Format.SpaceAfter = 26
newPrgrh.Range.InsertParagraphAfter ()
7
Feche o Word quando terminar a programação e solte o objeto " wordApp " da memória do computador .
wordApp.Quit ()
wordApp = Nothing
8
Pressione F5 " "para executar o programa. Isto irá abrir o arquivo definido no Passo 4.