為教師，您一定會經常制作試卷測試學生的成績。那么，你有沒有想過每一階段課程結束后，制作一份電子試卷，放到自己的博客中供學生下載，練習鞏固所學到的知識呢？利用新版WPS 文字 2007的“控件工具箱”，很容易就可以做出具有交互功能的選擇出議居越府次光專題和填空題(見圖1)。
相關精彩文章
金山巨資購公式編輯器 回饋WPS用戶
WPS 2007輸入偏旁部首和生僻字技巧
圖1 WPS制作的試卷
安裝VBA環境
如果你的電腦沒有安裝VBA,則WPS的“控件工具箱”處于不可用狀態，要用此功能，必須先安裝VBA。 但是，可能是由于版權等原因，WPS官方網站并沒有提供VBA的安裝程序。如果要安裝，可以利用AUTOCAD安裝盤，在安裝時只選擇“VBA”即可，另外，也有熱心的網友提取出了VBA的獨立安裝程序，大家可以自己在WPS OFFICE論壇中搜索一下。VBA安裝完成后，在WPS文字的工具欄空白區域右擊鼠標，即可調出“四硫推十或討研控件工具箱”。
選擇題的制作
第一步：啟動WPS文字2007，在新建的空白文檔合適的位置輸入選擇題題干的內容，如“1、WPS Office 2007是哪個公司的產品？”，然后利用“控件工具箱”中的“選項按鈕”，在題干的下面插入一個單選按鈕。
第二步：右擊剛剛插入的單選按鈕，在右鍵菜單中選擇“屬性”，將（名稱）后面的字符改為“A1”,將“Caption存內趕行沿漸章”項改為第一個備選答案（如“微軟公司”），其他項目保持默認不變（如圖2）。
圖2 WPS控件屬性
退出編輯狀態，再次右擊此單選按鈕，在右鍵菜單中選擇“設置對象格式”，在“版式→環繞方式”中選擇“嵌入型”（如圖3）。
圖各例長3 WPS設置對象格式
上開查構以必職下第三步：復制單選按鈕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
再打開“判斷”按鈕的代碼窗口，在“Priva的片意初題燒始慢馬眾te 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）,單擊“重做”按鈕，則可以取消剛才所做的選擇。
圖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所示的“安全警告”,記得此時一定要點“啟用宏”按鈕，否則所有控件都不會正常工作。
