二、簡(jiǎn)單應(yīng)用題

　　(1)【考點(diǎn)分析】本題考點(diǎn)有：?jiǎn)芜x按鈕數(shù)組的Name、Caption和Index屬性，文本框的Name屬性，SelectCase選擇語(yǔ)句，“+”字符連接。

　　【解題思路】通過(guò)Name屬性設(shè)置對(duì)象名稱;通過(guò)Caption屬性設(shè)置對(duì)象的標(biāo)題;設(shè)置兩個(gè)字符型變量a、b，a："我坐"，b="我開(kāi)"，用于SelectCase選擇語(yǔ)句的字符串連接;通過(guò)對(duì)單選按鈕數(shù)組Index屬性的查詢，實(shí)現(xiàn)單擊單選按鈕完成字符串連接和文本框顯示操作的功能。

　　【操作步驟】

　　步驟1：打開(kāi)本題工程文件，按照題目要求建立單選按鈕數(shù)組，如圖3.9所示。

　　步驟2：按照題目要求建立其他控件并設(shè)置其屬性，見(jiàn)表3.4。

　　步驟3：打開(kāi)代碼編輯窗口，去掉程序中的注釋符“´”，將問(wèn)號(hào)改為正確的內(nèi)容。

　　參考答案(橫線部分是需考生填入的內(nèi)容)

　　PrivateSubOplclick(IndexAsInteger)

　　DimaAsStrin9，bAsString，CAsString

　　a="我坐"

　　b="我開(kāi)"

　　SelectCase__________

　　´通過(guò)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è)置控件屬性，再編寫事件過(guò)程。本題需注意容器中控件的畫法。命令按鈕標(biāo)題由caption屬性設(shè)置，單擊命令觸發(fā)Chck事件;單選按鈕的標(biāo)題由Caption屬性設(shè)置，程序中需要檢測(cè)單選按鈕的狀態(tài)，通過(guò)Value屬性來(lái)實(shí)現(xiàn)，如果單選按鈕被選中，則VMue值為l，否則Value值為0。在文本框中顯示內(nèi)容通過(guò)Text屬性實(shí)現(xiàn)，其形式為：文本框名.Ten=顯示的內(nèi)容。在VisuMBasic程序中，0pen語(yǔ)句用于打開(kāi)順序文件，打開(kāi)順序文件的基本格式為：0penFileNameForModeAs#Ele-Number。其中，F(xiàn)ileName表示要打開(kāi)的文件的路徑;Mode為打開(kāi)模式，OutPut用于輸出，Append用于追加寫入，Input用于讀取;EleNumber為打開(kāi)文件時(shí)指定的句柄。讀文件操作在窗體的Load事件過(guò)程中完成，寫文件操作在命令按鈕的Click事件過(guò)程中完成。

　　【操作步驟】

　　步驟1：打開(kāi)本題工程文件，按照題目要求建立框架控件并設(shè)置其屬性，如圖3.10所示。

　　步驟2：按照步驟1建立其他控件并設(shè)置相關(guān)屬性，程序中用到的控件及屬性見(jiàn)表3.5和表3.6。

　　步驟3：打開(kāi)代碼編輯窗口，在指定位置編寫如下代碼。

　　參考答案

　　PrivateSubCl_Click()

　　Textl.Text="我是"´首先確定不論選什么情況

　　Textl的內(nèi)容一定以”我是”開(kāi)頭

　　IfOpl.ValueThen

　　Textl.Text=Textl.Text&Opl.Caption

　　ElSe

　　Textl.Text=Textl.Text&Op2.Caption

　　EndIf’通過(guò)單選按鈕的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)閉程序后按題目要求存盤。

掃描/長(zhǎng)按二維碼幫助考試通關(guān)

2018年等考報(bào)考資訊

2018等考各科通關(guān)技巧

2018各科最新預(yù)測(cè)試卷

2018等考各科備考資料

微信搜索"考試吧"了解更多考試資訊、下載備考資料

　　相關(guān)推薦：

　　2018年全國(guó)計(jì)算機(jī)等級(jí)考試必做試題匯總(各科目)

　　2018年全國(guó)計(jì)算機(jī)等級(jí)考試復(fù)習(xí)知識(shí)點(diǎn)匯總(各科目)

　　2018計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間|各地報(bào)名入口|報(bào)名條件

　　2018年全國(guó)計(jì)算機(jī)等級(jí)考試時(shí)間|教材目錄（2018年版）

　　2018全國(guó)計(jì)算機(jī)等級(jí)考試備考經(jīng)驗(yàn)及應(yīng)試技巧匯總

　　報(bào)名方法|考試內(nèi)容|考試大綱|2018計(jì)算機(jī)等級(jí)考試科目

　　歷年真題匯總|考試吧策劃：2018年計(jì)算機(jī)等級(jí)考試報(bào)考指南