| 第 1 頁(yè)：試題 |
| 第 2 頁(yè)：參考答案 |
二、簡(jiǎn)單應(yīng)用題
(1)【考點(diǎn)分析】本題考點(diǎn)有：?jiǎn)芜x按鈕數(shù)組的Name、Caption和Index屬性，文本框的Name屬性，SelectCase選擇語(yǔ)句，“+”字符連接。
【解題思路】通過Name屬性設(shè)置對(duì)象名稱;通過Caption屬性設(shè)置對(duì)象的標(biāo)題;設(shè)置兩個(gè)字符型變量a、b，a："我坐"，b="我開"，用于SelectCase選擇語(yǔ)句的字符串連接;通過對(duì)單選按鈕數(shù)組Index屬性的查詢，實(shí)現(xiàn)單擊單選按鈕完成字符串連接和文本框顯示操作的功能。
【操作步驟】
步驟1：打開本題工程文件，按照題目要求建立單選按鈕數(shù)組，如圖3.9所示。
步驟2：按照題目要求建立其他控件并設(shè)置其屬性，見表3.4。
步驟3：打開代碼編輯窗口，去掉程序中的注釋符“´”，將問號(hào)改為正確的內(nèi)容。
參考答案(橫線部分是需考生填入的內(nèi)容)
PrivateSubOplclick(IndexAsInteger)
DimaAsStrin9，bAsString，CAsString
a="我坐"
b="我開"
SelectCase__________
´通過Index值決定響應(yīng)哪一個(gè)控件數(shù)組
CaSeO
Textl.Text=a+Me.Op1(O).Caption+"去"
CaSel
Textl.Text=__________+Me.Opl(1).Caption+"去"
´當(dāng)Index值為1時(shí)，選擇"我坐"
CaSe2
Textl.Text=b+Me.Opl(2).Caption+"去"
EndSelect
EndSub
步驟4：調(diào)試并運(yùn)行程序，關(guān)閉程序后按題目要求存盤。
【易錯(cuò)提示】在窗體上復(fù)制一個(gè)控件時(shí)，如果需要?jiǎng)?chuàng)建控件數(shù)組，則在提示框中單擊“是”即可，如果不需要，則直接單擊“否”。
(2)【考點(diǎn)分析】本題考點(diǎn)有：?jiǎn)芜x按鈕的Name、Caption和Value屬性，框架的Name和Caption屬性，命令按鈕的Name和Caption屬性，文件操作(Open、Cbse、Output)以及判斷語(yǔ)句。
【解題思路】在窗體上建立好控件后，先設(shè)置控件屬性，再編寫事件過程。本題需注意容器中控件的畫法。命令按鈕標(biāo)題由caption屬性設(shè)置，單擊命令觸發(fā)Chck事件;單選按鈕的標(biāo)題由Caption屬性設(shè)置，程序中需要檢測(cè)單選按鈕的狀態(tài)，通過Value屬性來(lái)實(shí)現(xiàn)，如果單選按鈕被選中，則VMue值為l，否則Value值為0。在文本框中顯示內(nèi)容通過Text屬性實(shí)現(xiàn)，其形式為：文本框名.Ten=顯示的內(nèi)容。在VisuMBasic程序中，0pen語(yǔ)句用于打開順序文件，打開順序文件的基本格式為：0penFileNameForModeAs#Ele-Number。其中，F(xiàn)ileName表示要打開的文件的路徑;Mode為打開模式，OutPut用于輸出，Append用于追加寫入，Input用于讀取;EleNumber為打開文件時(shí)指定的句柄。讀文件操作在窗體的Load事件過程中完成，寫文件操作在命令按鈕的Click事件過程中完成。
【操作步驟】
步驟1：打開本題工程文件，按照題目要求建立框架控件并設(shè)置其屬性，如圖3.10所示。
步驟2：按照步驟1建立其他控件并設(shè)置相關(guān)屬性，程序中用到的控件及屬性見表3.5和表3.6。
步驟3：打開代碼編輯窗口，在指定位置編寫如下代碼。
參考答案
PrivateSubCl_Click()
Textl.Text="我是"´首先確定不論選什么情況
Textl的內(nèi)容一定以”我是”開頭
IfOpl.ValueThen
Textl.Text=Textl.Text&Opl.Caption
ElSe
Textl.Text=Textl.Text&Op2.Caption
EndIf’通過單選按鈕的Value值(選擇為true，否則為false)確認(rèn)性別，最后把其Caption值接至Textl后
IfOp3.ValueThen
Textl.Text=Textl.Text&Op3.Caption
Else
Textl.Text=Textl.Text&Op4.Caption
EndIf'確認(rèn)身份，思路同上
EndSub
步驟4：調(diào)試并運(yùn)行程序，關(guān)閉程序后按題目要求存盤。
微信搜索"考試吧"獲取更多考試資訊、備考資料
相關(guān)推薦：
各地2016年全國(guó)計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間匯總
各地2016年計(jì)算機(jī)等級(jí)考試準(zhǔn)考證打印時(shí)間匯總
各地2016年全國(guó)計(jì)算機(jī)等級(jí)考試費(fèi)用匯總
| 北京 | 天津 | 上海 | 江蘇 | 山東 |
| 安徽 | 浙江 | 江西 | 福建 | 深圳 |
| 廣東 | 河北 | 湖南 | 廣西 | 河南 |
| 海南 | 湖北 | 四川 | 重慶 | 云南 |
| 貴州 | 西藏 | 新疆 | 陜西 | 山西 |
| 寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
| 黑龍江 | 內(nèi)蒙古 |
