word中的控件工具箱是做什么的，如何使用？IT部落窩在本文就為大家講講控件工具箱的使用方法。

Word的控件工具箱在哪里呢？單擊菜單“視圖——工具欄””項(xiàng)中點(diǎn)“控件工具箱”就可以調(diào)出控件工具箱。

Word控件工具箱是做什么的呢?word控件工具箱主要在VBA中窗體內(nèi)使用，每個(gè)控件都是一個(gè)工具模塊，具體功能通過設(shè)置屬性和寫入VB代碼來實(shí)現(xiàn)。有些控件也可以在word文檔中使用。

word控件工具箱其實(shí)就是VBA的可視化界面，需要掌握一定的VBA知識，懂一些代碼，才能更好的駕馭Word的控件工具箱。

舉一個(gè)很簡單的例子，打開word后，打開控件工具箱，雙擊命令按鈕，頁面上就會多出一個(gè)Commandbutton，雙擊“commandbutton”，在end sub上面加這樣一行MsgBox "IT部落窩網(wǎng)站（www.ittribalwo.com），歡迎大家訪問學(xué)習(xí)！"

保存退出VBA編輯器，單擊一下控件工具箱上第一個(gè)鈕退出設(shè)計(jì)模式，現(xiàn)在單擊一下頁面上的Commandbutton按鈕，就會彈出一個(gè)提示框“IT部落窩網(wǎng)站（www.ittribalwo.com），歡迎大家訪問學(xué)習(xí)！”

下面我們就利用Word的控件工具箱來制作一道多項(xiàng)選擇題。下面是具體操作步驟：

第一步，啟動Word，新建一空白文檔，輸入 “計(jì)算機(jī)的軟件系統(tǒng)包括( )”并根據(jù)情況設(shè)置好字體、字號和顏色。

第二步，依次單擊菜單欄中的“視圖→工具欄→控件工具箱”命令，在彈出的控件工具箱中選中“復(fù)選框”按鈕 ，然后在文檔拖拉出一個(gè)復(fù)選框。

第三步，在拖拉出的復(fù)選框(checkbox1)上單擊鼠標(biāo)右鍵選擇屬性，打開“屬性”對話框，將其中“名稱”修改為“duoxt11”，“Caption”后面的字符修改為題目相應(yīng)選項(xiàng)字符(如“系統(tǒng)軟件”)，然后再設(shè)置“font”選項(xiàng)設(shè)置合適的字體、字號等。其他屬性可采用默認(rèn)值。

第四步，將上面設(shè)置好的復(fù)選框復(fù)制三個(gè)，分別將“名稱”修改為“duoxt12”、“duoxt13”、“duoxt14”，“Caption”屬性分別修改為“應(yīng)用軟件”、“殺毒軟件”和“工具軟件”。

第五步，選擇“控件工具箱”的“命令按鈕” ，在文檔中添加一個(gè)按鈕，和上面3中的操作一樣將其“名稱”修改為“duopd11”，“caption”屬性修改為“判斷”(也可以修改“font”屬性來設(shè)置字體、字號等)。然后雙擊該按鈕，進(jìn)入“VisualBasic編輯器”狀態(tài)，將下述代碼輸入到Private Sub Private Sub

duopd11_Click()和End Sub代碼中間，輸入完成后，關(guān)閉窗口返回。

If duoxt11.Value = True And duoxt12.Value = True And duoxt13.Value = False And duoxt14.Value = False Then

MsgBox "恭喜你，選擇正確。", vbOKOnly, "結(jié)果"

Else

If duoxt11.Value = True And duoxt12.Value = False And duoxt13.Value = False And duoxt14.Value = False Or duoxt11.Value = False And duoxt12.Value = True And duoxt13.Value = False And duoxt14.Value = False Then

MsgBox "選對了一個(gè)，還有一個(gè)，再努力一下就勝利了。", vbOKOnly, "提示"

Else

MsgBox "選擇錯誤!還需要繼續(xù)努力啊!", vbOKOnly, "提示"

End If

End If

上述代碼含義是如果選擇第一項(xiàng)和第二項(xiàng)并且第三和第四項(xiàng)不選時(shí)，按下判斷按鈕則彈出“恭喜你，選擇正確”消息框，如果僅僅選擇了第一項(xiàng)或第二項(xiàng)則彈出“選對了一個(gè)，還有一個(gè)再努力一下就勝利了。”消息框，如果選擇了第三或第四項(xiàng)中的任何一項(xiàng)都會彈出“選擇錯誤!還需要繼續(xù)努力啊!”消息框。

第六步，將命令按鈕復(fù)制一份，將其“名稱”修改為“duopd12”，“caption”屬性修改為“重選”，雙擊該按鈕，進(jìn)入“VisualBasic編輯器”狀態(tài)，將下述代碼輸入到Private Sub duopd12_Click()和End Sub代碼中間，輸入完成后，關(guān)閉窗口返回。

duoxt11.Value = False

duoxt12.Value = False

duoxt13.Value = False

duoxt14.Value = False

第七步，單擊“控件工具箱”中的“退出設(shè)計(jì)模式”按鈕關(guān)閉“控件工具箱”。這一步很重要，否則不能出現(xiàn)預(yù)期的效果。

經(jīng)過上面的不再，利用word控件工具箱就制作好了一個(gè)多項(xiàng)選題，制作好的效果如上圖所示。

大家制作好后，可以自己檢測一下，自己勾選前面的框作出選擇，系統(tǒng)就會彈出相應(yīng)的對話框，根據(jù)選擇的不同給出不同的提示。

來源：IT部落窩                              作者：IT部落窩