如何使用Word的ActiveX控件制作调查问卷(下)

 时间:2024-10-12 10:27:11

在《如何使用Word的ActiveX控件制作调查问卷(上)》中,已经介绍了如何使用皮薹匆热控件实现单项和多项选择。接下来会使用程序实现根据选择实现文本框的激活与否。以及文档的自动发送和保护设置。

如何使用Word的ActiveX控件制作调查问卷(下)

工具/原料

Microsoft Word 2013

复杂的命令

1、在“你零花钱会比以往更多吗?”右侧插入,选项控件和文本框控件。选项控件分别设置Caption属性“会”和“不会”,GroupName为group4.

如何使用Word的ActiveX控件制作调查问卷(下)

2、设置文本框的名称属性为,money(你可以设置其他名称,不改也行,只要知道名称。)

如何使用Word的ActiveX控件制作调查问卷(下)

3、设置“会”的选项按钮名称为,havesite, 设置“不会”的选项按钮名称为,nosite.

如何使用Word的ActiveX控件制作调查问卷(下)

4、希望选择 “会”的时候,文本框为可以编辑状态,选择 “不会”的时候文本框不可编辑,并且变成灰色。进入VB编辑,输入以下内容(瞧遭蓬纺绿色内容为解释,可以不输入):Private Sub havesite_Click() '单击会money.Enabled = True '激活文本框money.BackColor = &HFFFFFF '文本框背景为白色End SubPrivate Sub nosite_Click() '单击不会money.Enabled = False '文本框禁止输入money.BackColor = &HC0C0C0 '文本框背景为灰色End Sub

如何使用Word的ActiveX控件制作调查问卷(下)

5、退出设计模式,观看效果。

如何使用Word的ActiveX控件制作调查问卷(下)

命令按钮/自动发送

1、插入命令按钮,打开属性框,Caption属性设置为提交调查表,Font属性可以考虑换个字体。Autosize选择true可以自动调整按钮大小。

如何使用Word的ActiveX控件制作调查问卷(下)

2、双击按钮,进入VB编辑,输入以下内容:Private Sub CommandButton1娄多骋能_Click()ThisDocument.SaveAs2 "调查问卷"ThisDo艘早祓胂cument.SendForReview "http://[email protected];", "调查问卷"End Sub

如何使用Word的ActiveX控件制作调查问卷(下)

3、关于代码含义:绿色文字为注释不需要输入。发送邮箱是什么就填什么。不过这真的不好用,小编现在都没有收到那封调查问卷的邮件……退出设计模式,点击按钮,出现发送邮件界面。

如何使用Word的ActiveX控件制作调查问卷(下)

保护文档

1、调查表完成之后,退出设计模式。防止误删,限制编辑。

如何使用Word的ActiveX控件制作调查问卷(下)

2、勾选编辑限制,选择只允许填写窗体。

如何使用Word的ActiveX控件制作调查问卷(下)

3、单击,“是,启动强制保护”。设置密码即可。

如何使用Word的ActiveX控件制作调查问卷(下)

4、最终成果如下。

如何使用Word的ActiveX控件制作调查问卷(下)
  • 邮政EMS提交问卷调查
  • 谷歌浏览器如何还原浏览器默认设置
  • 怎么使用EXCEL中的DATEDIF函数计算日期间隔
  • 如何在Word中自定义功能区设置选项卡位置
  • EXCEL如何更改双箭头后端类型为圆形箭头
  • 热门搜索
    欢庆六一手抄报图片 关于食品安全的手抄报 母亲节手抄报内容 我的中国梦手抄报内容 端午节的手抄报图片 养成教育手抄报 小学一年级手抄报 手抄报中秋节 交通规则手抄报 七夕手抄报