1、如何获取安装权限
1）WPS Office 中VBA部分仅在WPS企业版中提供。
2）若您是WPS企业版用户，可在WPS中登录您的企业账号，或输入序列号激活WPS，获取VBA支持库的安装权限。
2、启用宏
登录企业账号或输入序列号激活WPS后，点击「启用宏」按钮，获取VBA安装权限，进一步安装VBA。
3、已有VBA安装包
若您已有VBA安装包，安装完成后，重新启动WPS即可使用。
WPS目前已支持VBA 7.1版本
温馨提示：答案为网友推荐，仅供参考
第1个回答 2013-08-30
利用新版WPS 文字 2007的“控件工具箱”，很容易就可以做出具有交互功能的选择题和填空题(见图1)。
安装VBA环境
如果你的电脑没有安装VBA,则WPS的“控件工具箱”处于不可用状态，要用此功能，必须先安装VBA。 但是，可能是由于版权等原因，WPS官方网站并没有提供VBA的安装程序。如果要安装，可以利用AUTOCAD安装盘，在安装时只选择“VBA”即可，另外，也有热心的网友提取出了VBA的独立安装程序，大家可以自己在WPS OFFICE论坛中搜索一下。VBA安装完成后，在WPS文字的工具栏空白区域右击鼠标，即可调出“控件工具箱”。
选择题的制作
第一步：启动WPS文字2007，在新建的空白文档合适的位置输入选择题题干的内容，如“1、WPS Office 2007是哪个公司的产品？”，然后利用“控件工具箱”中的“选项按钮”，在题干的下面插入一个单选按钮。
第二步：右击刚刚插入的单选按钮，在右键菜单中选择“属性”，将（名称）后面的字符改为“A1”,将“Caption”项改为第一个备选答案（如“微软公司”），其他项目保持默认不变。
退出编辑状态，再次右击此单选按钮，在右键菜单中选择“设置对象格式”，在“版式→环绕方式”中选择“嵌入型”（如图3）。
第三步：复制单选按钮A1,粘贴3次，修改这3个单选按钮界面文字为其他选项，然后将它们的名称属性分别修改为B1、C1、D1。
第四步：单击“控件工具箱”中的命令按钮，在合适的位置上插入两个命令按钮，然后将二者的“名称”分别修改为“CMD1”和“CMD2”,将界面文字分别修改为“重做”和“判断”，并将“环绕方式”修改为“嵌入型”。
第五步：右击“重做”命令按钮，选择“查看代码”，打开代码编辑窗口，在“Private Sub CMD1_Click()”和“End Sub”之间插入以下代码：
A1.Value = False
B1.Value = False
C1.Value = False
D1.Value = False
再打开“判断”按钮的代码窗口，在“Private Sub CMD2_Click()”和“End Sub”之间插入以下代码：
If B1.Value = True Then
MsgBox "恭喜您，答对了！", 64, "温馨提示"
Else
MsgBox "再想想，相信你一定能答对！", 64, "温馨提示"
End If
其中“ if B1.Value=true ”表示这道题的正确选项是B(即“金山公司”)，“ MsgBox "恭喜您，答对了！", 64, "温馨提示" ” 表示弹出标题为“温馨提示”，内容为“恭喜你，答对了！”的弹出对话框，而“64”则表示显示信息图标。 将这个包含选择题的WPS文档保存为“测试练习.wps”，点击一下“控件工具箱”最左侧的“退出设计模式”按钮，此时，文档中的控件处于应用状态，当选择某个选项后，单击“判断”按钮，系统就会给出相当的提示（如图4）,单击“重做”按钮，则可以取消刚才所做的选择。
填空题的制作
除了选项题，填空题也是常用的题型之一。用WPS文字制作填空题也非常容易。
第一步：打开前面保存过的“测试练习.wps”，在适当位置输入填空题的题干，如“WPS Office 2007的三个组件是：WPS文字、WPS表格和”，接着选中“控件工具箱”中的文本框，在题干末尾插入一个文本框，根据需要填写内容的多少，调节好文本框的大小，并将其“环绕方式”设置成“嵌入型”。
第二步：右击插入的文本框，选择“属性”，将文本框的名称属性修改为“text1”,然后复制选择题目中的“重做”和“判断”命令按钮到填空题的末尾，将其名称分别修改为“CMD21”和“CMD22”并调整好它们的位置。
第三步：右击填空题后面的“重做”按钮，在右键菜单中选择“查看代码”，在“Private Sub CMD21_Click()”和“End Sub”之间输入下列代码：
Text1.Text = ""
再打开填空题后面的“判断”命令按钮的代码窗口，在“Private Sub CMD22_Click()”和“End Sub”之间输入下列代码：
If Text1.Text = "WPS演示" Or Text1.Text = "WPS 演示" Then
MsgBox "恭喜您，答对了！", 64, "温馨提示"
Else
MsgBox "再想想，相信你一定能答对！", 64, "温馨提示"
End If
其中第一行判断文本框中的内容是否“WPS演示”或“WPS 演示”（“WPS”与“演示”之间有一半角空格），如果是，则提示“恭喜您,答对了!”,否则提示“再想想，相信你一定能答对！”
最后，点一下“控件工具箱”左侧的“退出设置模式”就可以看到效果了。文档保存后，再次打开时，会有如图5所示的“安全警告”,记得此时一定要点“启用宏”按钮，否则所有控件都不会正常工作。
安装VBA环境
如果你的电脑没有安装VBA,则WPS的“控件工具箱”处于不可用状态，要用此功能，必须先安装VBA。 但是，可能是由于版权等原因，WPS官方网站并没有提供VBA的安装程序。如果要安装，可以利用AUTOCAD安装盘，在安装时只选择“VBA”即可，另外，也有热心的网友提取出了VBA的独立安装程序，大家可以自己在WPS OFFICE论坛中搜索一下。VBA安装完成后，在WPS文字的工具栏空白区域右击鼠标，即可调出“控件工具箱”。
选择题的制作
第一步：启动WPS文字2007，在新建的空白文档合适的位置输入选择题题干的内容，如“1、WPS Office 2007是哪个公司的产品？”，然后利用“控件工具箱”中的“选项按钮”，在题干的下面插入一个单选按钮。
第二步：右击刚刚插入的单选按钮，在右键菜单中选择“属性”，将（名称）后面的字符改为“A1”,将“Caption”项改为第一个备选答案（如“微软公司”），其他项目保持默认不变。
退出编辑状态，再次右击此单选按钮，在右键菜单中选择“设置对象格式”，在“版式→环绕方式”中选择“嵌入型”（如图3）。
第三步：复制单选按钮A1,粘贴3次，修改这3个单选按钮界面文字为其他选项，然后将它们的名称属性分别修改为B1、C1、D1。
第四步：单击“控件工具箱”中的命令按钮，在合适的位置上插入两个命令按钮，然后将二者的“名称”分别修改为“CMD1”和“CMD2”,将界面文字分别修改为“重做”和“判断”，并将“环绕方式”修改为“嵌入型”。
第五步：右击“重做”命令按钮，选择“查看代码”，打开代码编辑窗口，在“Private Sub CMD1_Click()”和“End Sub”之间插入以下代码：
A1.Value = False
B1.Value = False
C1.Value = False
D1.Value = False
再打开“判断”按钮的代码窗口，在“Private Sub CMD2_Click()”和“End Sub”之间插入以下代码：
If B1.Value = True Then
MsgBox "恭喜您，答对了！", 64, "温馨提示"
Else
MsgBox "再想想，相信你一定能答对！", 64, "温馨提示"
End If
其中“ if B1.Value=true ”表示这道题的正确选项是B(即“金山公司”)，“ MsgBox "恭喜您，答对了！", 64, "温馨提示" ” 表示弹出标题为“温馨提示”，内容为“恭喜你，答对了！”的弹出对话框，而“64”则表示显示信息图标。 将这个包含选择题的WPS文档保存为“测试练习.wps”，点击一下“控件工具箱”最左侧的“退出设计模式”按钮，此时，文档中的控件处于应用状态，当选择某个选项后，单击“判断”按钮，系统就会给出相当的提示（如图4）,单击“重做”按钮，则可以取消刚才所做的选择。
填空题的制作
除了选项题，填空题也是常用的题型之一。用WPS文字制作填空题也非常容易。
第一步：打开前面保存过的“测试练习.wps”，在适当位置输入填空题的题干，如“WPS Office 2007的三个组件是：WPS文字、WPS表格和”，接着选中“控件工具箱”中的文本框，在题干末尾插入一个文本框，根据需要填写内容的多少，调节好文本框的大小，并将其“环绕方式”设置成“嵌入型”。
第二步：右击插入的文本框，选择“属性”，将文本框的名称属性修改为“text1”,然后复制选择题目中的“重做”和“判断”命令按钮到填空题的末尾，将其名称分别修改为“CMD21”和“CMD22”并调整好它们的位置。
第三步：右击填空题后面的“重做”按钮，在右键菜单中选择“查看代码”，在“Private Sub CMD21_Click()”和“End Sub”之间输入下列代码：
Text1.Text = ""
再打开填空题后面的“判断”命令按钮的代码窗口，在“Private Sub CMD22_Click()”和“End Sub”之间输入下列代码：
If Text1.Text = "WPS演示" Or Text1.Text = "WPS 演示" Then
MsgBox "恭喜您，答对了！", 64, "温馨提示"
Else
MsgBox "再想想，相信你一定能答对！", 64, "温馨提示"
End If
其中第一行判断文本框中的内容是否“WPS演示”或“WPS 演示”（“WPS”与“演示”之间有一半角空格），如果是，则提示“恭喜您,答对了!”,否则提示“再想想，相信你一定能答对！”
最后，点一下“控件工具箱”左侧的“退出设置模式”就可以看到效果了。文档保存后，再次打开时，会有如图5所示的“安全警告”,记得此时一定要点“启用宏”按钮，否则所有控件都不会正常工作。
第2个回答 2013-09-05
您好，很高兴为您解答！
WPS个人版是没有自带VBA的，如果需要控件工具，需要安装VBA，在开发工具中可以找到，直接点击插入即可。
如有疑问，请点击我的头像提问或访问WPS官方论坛，祝您生活愉快！本回答被网友采纳
WPS个人版是没有自带VBA的，如果需要控件工具，需要安装VBA，在开发工具中可以找到，直接点击插入即可。
如有疑问，请点击我的头像提问或访问WPS官方论坛，祝您生活愉快！本回答被网友采纳
相似回答