请问如何获取word的内容控件组合框的值

vixmi

请问如何获取word的 内容控件 组合框的值

是 内容控件 不是Active控件，就是工具栏 处点选鼠标，找到“窗体”并选中它，将会弹出“窗体”工具栏里面那个 组合框

如果用 doc.bookmarks(i).Range.Text  基于内容控件的书签不能提取，而同时内容控件的 文本域(对应Active控件的文本框的) 可以提取

请各位高手指教

守柔

QUOTE:

以下是引用vixmi在2007-12-25 16:49:44的发言：

请问如何获取word的 内容控件 组合框的值

是 内容控件 不是Active控件，就是工具栏 处点选鼠标，找到“窗体”并选中它，将会弹出“窗体”工具栏里面那个 组合框

如果用 doc.bookmarks(i).Range.Text  基于内容控件的书签不能提取，而同时内容控件的 文本域(对应Active控件的文本框的) 可以提取

请各位高手指教

请参考：

  MsgBox ActiveDocument.FormFields(1).Result

vixmi

QUOTE:

以下是引用守柔在2007-12-25 18:41:49的发言：

请参考：

  MsgBox ActiveDocument.FormFields(1).Result

谢谢守柔 兄指教 不过已经试了 这个也不行呢

 如果用  ActiveDocument.FormFields(1).Result 返回 文本域正常 ，不过 组合框 返回的值是 空

  之前我用 doc.bookmarks(i).Range.Text  返回 组合框 的值是倒着写的"T" 呢

[此贴子已经被作者于2007-12-25 21:50:09编辑过]

守柔

QUOTE:

以下是引用vixmi在2007-12-25 21:49:42的发言：

谢谢守柔 兄指教 不过已经试了 这个也不行呢

 如果用  ActiveDocument.FormFields(1).Result 返回 文本域正常 ，不过 组合框 返回的值是 空

  之前我用 doc.bookmarks(i).Range.Text  返回 组合框 的值是倒着写的"T" 呢

呵呵，是嘛？

如果楼主觉得有疑问，可以把附件上传，我看一下，究竟问题在哪？

vixmi

QUOTE:

以下是引用守柔在2007-12-26 6:06:20的发言：

呵呵，是嘛？

如果楼主觉得有疑问，可以把附件上传，我看一下，究竟问题在哪？

守柔 兄，那就麻烦你帮忙看看了   附件上传了

附：现在文档没有加保护，组合框，和文本域 不能改变值，如果要改变值 需要启用文件保护，并且选择 仅允许在文档中进行此类编辑:填写窗体

Xh2Z3z6K.rar (16.66 KB, 下载次数: 141)

2007-12-26 09:34 上传

点击文件名下载附件
请问如何获取word的内容控件组合框的值

[此贴子已经被作者于2007-12-26 9:43:09编辑过]

守柔

QUOTE:

以下是引用vixmi在2007-12-25 21:49:42的发言：

谢谢守柔 兄指教 不过已经试了 这个也不行呢

 如果用  ActiveDocument.FormFields(1).Result 返回 文本域正常 ，不过 组合框 返回的值是 空

  之前我用 doc.bookmarks(i).Range.Text  返回 组合框 的值是倒着写的"T" 呢

谢谢vixmi，我想我应该知道如何保护文档。

附件中：

MsgBox ("信息是:" & ActiveDocument.Fields(6).Result)

正确的代码：

MsgBox ("信息是:" & ActiveDocument.FormFields(6).Result)

不要把field对象与Formfield对象混为一谈，更要注意.Formfields.item的索引号，1是1，6是6，关乎你的目标窗体域在文档中的实际位置（编号）。

vixmi

QUOTE:

以下是引用守柔在2007-12-27 6:33:12的发言：

谢谢vixmi，我想我应该知道如何保护文档。

附件中：

MsgBox ("信息是:" & ActiveDocument.Fields(6).Result)

正确的代码：

MsgBox ("信息是:" & ActiveDocument.FormFields(6).Result)

不要把field对象与Formfield对象混为一谈，更要注意.Formfields.item的索引号，1是1，6是6，关乎你的目标窗体域在文档中的实际位置（编号）。

问题解决了

     万分感谢 守柔 兄的指教~~~

    小弟愚笨，给守柔 兄添麻烦了

    现在我对守柔 兄的景仰犹如那黄河犯难，一发不可收拾[em02]~~~~~~~~~~~~~~

锦天救世大英雄

您好，打扰一下   请问这个是最后怎么解决的，我也遇到了  很着急，有完整的项目代码吗？盼复   麻烦您了

锦天救世大英雄

您好，打扰一下   请问这个是最后怎么解决的，我也遇到了  很着急，有完整的项目代码吗？盼复   麻烦您了

锦天救世大英雄

守柔 发表于 2007-12-26 06:06
QUOTE:以下是引用vixmi在2007-12-25 21:49:42的发言：谢谢守柔 兄指教 不过已经试了 这个也不行呢 如 ...

求大佬帮助，，，我扣扣：582146169，跪求。。。麻烦了。。