小編在這教大家使用WPS文字用控件工具箱制作小測驗試卷
安裝VBA環(huán)境
如果你的電腦沒有安裝VBA,則WPS的“控件工具箱”處于不可用狀態(tài)，要用此功能，必須先安裝VBA。但是，可能是由于版權等原因，WPS官方網(wǎng)站并沒有提供VBA的安裝程序。如果要安裝，可以利用AUTOCAD安裝盤，在安裝時只選擇“VBA”即可，另外，也有熱心的網(wǎng)友提取出了VBA的獨立安裝程序。VBA安裝完成后，在WPS文字的工具欄空白區(qū)域右擊鼠標，即可調出“控件工具箱”。
選擇題的制作
第一步：啟動WPS文字2007，在新建的空白文檔合適的位置輸入選擇題題干的內容，如“1、WPS Office 2007是哪個公司的產品?”，然后利用“控件工具箱”中的“選項按鈕”，在題干的下面插入一個單選按鈕。
第二步：右擊剛剛插入的單選按鈕，在右鍵菜單中選擇“屬性”，將(名稱)后面的字符改為“A1”,將“Caption”項改為第一個備選答案(如“微軟公司”)，其他項目保持默認不變(如圖2)。退出編輯狀態(tài)，再次右擊此單選按鈕，在右鍵菜單中選擇“設置對象格式”，在“版式→環(huán)繞方式”中選擇“嵌入型”
第三步：復制單選按鈕A1,粘貼3次，修改這3個單選按鈕界面文字為其他選項，然后將它們的名稱屬性分別修改為B1、C1、D1。
第四步：單擊“控件工具箱”中的命令按鈕，在合適的位置上插入兩個命令按鈕，然后將二者的“名稱”分別修改為“CMD1”和“CMD2”,將界面文字分別修改為“重做”和“判斷”，并將“環(huán)繞方式”修改為“嵌入型”
第五步：右擊“重做”命令按鈕，選擇“查看代碼”，打開代碼編輯窗口，在“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”，點擊一下“控件工具箱”最左側的“退出設計模式”按鈕，此時，文檔中的控件處于應用狀態(tài)，當選擇某個選項后，單擊“判斷”按鈕，系統(tǒng)就會給出相當?shù)奶崾?單擊“重做”按鈕，則可以取消剛才所做的選擇。
填空題的制作
除了選項題，填空題也是常用的題型之一。用WPS文字制作填空題也非常容易。
第一步：打開前面保存過的“測試練習.wps”，在適當位置輸入填空題的題干，如“WPS Office 2007的三個組件是：WPS文字、WPS表格和”，接著選中“控件工具箱”中的文本框，在題干末尾插入一個文本框，根據(jù)需要填寫內容的多少，調節(jié)好文本框的大小，并將其“環(huán)繞方式”設置成“嵌入型”
第二步：右擊插入的文本框，選擇“屬性”，將文本框的名稱屬性修改為“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