打印本文 打印本文 关闭窗口 关闭窗口
Microsoft Office,VB.NET编程 PIA使用小程序
作者:武汉SEO闵涛  文章来源:敏韬网  点击数1192  更新时间:2009/4/23 19:00:06  文章录入:mintao  责任编辑:mintao

在微软下载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

打印本文 打印本文 关闭窗口 关闭窗口