如何使用 Range 对象读取 VB.net 中的 Word (*.doc) 文件中复选框的值？

Question

如何使用范围对象读取 VB.net 中的单词 (*.doc) 文件中复选框的值？

这就是我到目前为止所拥有的：

Dim app As New Word.Application
Dim doc As Document
doc = app.Documents.Open("C:\myDoc.doc")
dim chkBox as Bookmark
chkBox = doc.Bookmarks("MyCheckbox")
Dim rng as Range
rng = chkBox.Range

其中“MyCheckbox”是word文档中复选框的书签。

Answer 1

您不使用复选框本身的名称读取复选框的值有什么特殊原因吗？

如果书签定义的范围包含复选框，则根据复选框的插入方式，可以在 InlineShapes 集合（如果复选框与文本内联插入）或 >Shapes 集合（如果作为浮动对象插入。）

然后，您需要遍历 Shapes 或 InlineShapes 集合来查找相关复选框。

迭代 InlineShapes 集合中的控件

Dim ctl As InlineShape
For Each ctl In rng.InlineShapes
    If ctl.Type = wdInlineShapeOLEControlObject Then
        If ctl.OLEFormat.ClassType Like "Forms.CheckBox*" Then
            'current version of ctl is a checkbox, do what you will with it.

        End If
    End If
Next ctl
...

这应该会让您更接近，但如果复选框的名称是可预测的，则最好直接按名称对其进行寻址。