Microsoft Office，VB.NET编程 PIA使用小程序

在微软下载PIA COM组件包oxppia.exe。

安装后注册

在VB.NET中Console应用项目中添加引用COM组件：Microsoft Word 10.0 Object Library

源代码如下，将输入word文档内容输出到控制台。

Imports Microsoft.Office.Interop.Word
Module Module1

Sub Main()
Dim wdApp As New Microsoft.Office.Interop.Word.Application
Console.WriteLine("The version of Microsoft Word installed " & _
"on this computer is " & wdApp.Version & ".")
Console.WriteLine("Please input word filename with full path")
Dim FileName As String
FileName = Console.ReadLine()
Dim doc As Document
doc = wdApp.Documents.Open(FileName, Nothing, True)
If Not doc Is Nothing Then
Console.Write(doc.Content.Text)
End If
Console.WriteLine("input return key to end")
Console.ReadLine()
End Sub

End Module