三、綜合應(yīng)用題

　　【考點(diǎn)分析】本題考點(diǎn)有：文本框的Text屬性，單選按鈕的Name、Caption和Value屬性，單選按鈕控件數(shù)組，F(xiàn)or循環(huán)語句，If條件判斷語句以及內(nèi)部函數(shù)VM()。

　　【解題思路】單選按鈕數(shù)組常用于提供唯一選擇，Value屬性值決定每個(gè)單選按鈕的選中狀態(tài)：Fise為未選中，True為選中，Caption屬性用于設(shè)置單選按鈕的標(biāo)題。本題在For循環(huán)語句(循環(huán)變量k的初值為0，終值應(yīng)為3)中逐一檢查每個(gè)單選按鈕是否被選中，用變量n記錄選中單選按鈕的索引號。然后取消對當(dāng)前選中單選按鈕的選擇，使單選按鈕數(shù)組中的下一個(gè)按鈕被選中。如果當(dāng)前已經(jīng)選中最后一個(gè)單選按鈕，則將n賦值為0，重新從單選按鈕數(shù)組的第一個(gè)元素開始。

　　【操作步驟】

　　步驟1：打開本題工程文件。

　　步驟2：打開代碼編輯窗口，在指定位置編寫如下代碼。

　　參考答案

　　PrivateSubCommandl_Click()

　　Dima()AsLong

　　DimiAsInteger

　　DimnAsInteger

　　´Opl.Count是單選按鈕數(shù)目，這里用的是控件數(shù)組

　　Forl=0ToOpl.Count-l

　　´判斷哪一項(xiàng)被選擇，把它后面的數(shù)值賦給n，確定n值

　　IfOpl(i).Value=TrueThen

　　n=Val(Opl(i).Caption)

　　ExitFor

　　EndIf

　　Next

　　ReDima(n)´重新申請空間，這里是動(dòng)態(tài)申請

　　a(1)=1

　　a(2)=1´數(shù)列第一項(xiàng)、第--4值確定

　　Fori=3Ton

　　a(i)=a(i-1)+a(i-2)’后一項(xiàng)值是

　　前兩項(xiàng)值之和

　　Next

　　Textl.Text=a(n)

　　EndSub

　　步驟3：調(diào)試并運(yùn)行程序，關(guān)閉程序后按題目要求存盤。

　　【易錯(cuò)提示】在定義數(shù)組a的時(shí)候，要注意定義為長整型Long，可以防止溢出;單選按鈕數(shù)組的Index屬性分別為0,1，2，在編寫循環(huán)語句的時(shí)候要注意循環(huán)變量Opl.Count-1。

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

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

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

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

2018等考各科備考資料

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

　　相關(guān)推薦：

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

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

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

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

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

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

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