提取Word InlinShapes中各种类型数据

林慈盛

于 2014-01-11 02:17:26 发布

阅读量2.9k

点赞数

分类专栏： Word操作文章标签： vb.net Word

本文链接：https://blog.csdn.net/smallmumu/article/details/18110141

版权

本文介绍如何使用VB.NET从Word的InlinShapes中提取各种类型的数据，经过一晚上的研究，作者成功解决了这个问题。

摘要由CSDN通过智能技术生成

妈的，研究了一个晚上，终于搞定了。

代码如下：

'开始别忘了导入这两个东东

'导入Word类库
Imports Microsoft.Office.Core
Imports Word


Public Class Form1

    '提取过程
    Sub FuckWord()

        '定义Word程序
        Dim oWordApplic As Word.Application = New Word.Application

        '定义文档
        Dim oDocument As Word.Document

        '定义区域
        'Dim oRange As Word.Range

        '定义文件路径
        Dim WordFilePath As String = "D:\客观题.doc"

        '默认的参数
        Dim isReadOnly As Boolean = False '只读
        Dim isVisible As Boolean = True '程序是否可见
        Dim missing = System.Reflection.Missing.Value

        '打开Word文档

        oDocument = oWordApplic.Documents.Open(WordFilePath, missing, isReadOnly, missing, missing, missing, missing, missing, missing, missing, missing, isVisible, missing, missing, missing, missing)
        '激活程序
        o