微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

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

如何使用范围对象读取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文档中复选框的书签.

解决方法

您是否有任何特殊原因使用复选框本身的名称来读取复选框的值?

如果您的书签定义的范围包含一个复选框,那么,根据复选框的插入方式,它将在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
...

这应该让你更接近,但如果复选框的名称是可预测的,最好直接通过名称解决它.

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 [email protected] 举报,一经查实,本站将立刻删除。

相关推荐