三、綜合應用題

　　【考點分析】本題考點有：文本框的Text屬性，單選按鈕的Name、Caption和Value屬性，單選按鈕控件數組，For循環語句，If條件判斷語句以及內部函數VM()。

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

　　【操作步驟】

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

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

　　參考答案

　　PrivateSubCommandl_Click()

　　Dima()AsLong

　　DimiAsInteger

　　DimnAsInteger

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

　　Forl=0ToOpl.Count-l

　　´判斷哪一項被選擇，把它后面的數值賦給n，確定n值

　　IfOpl(i).Value=TrueThen

　　n=Val(Opl(i).Caption)

　　ExitFor

　　EndIf

　　Next

　　ReDima(n)´重新申請空間，這里是動態申請

　　a(1)=1

　　a(2)=1´數列第一項、第--4值確定

　　Fori=3Ton

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

　　前兩項值之和

　　Next

　　Textl.Text=a(n)

　　EndSub

　　步驟3：調試并運行程序，關閉程序后按題目要求存盤。

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

長按二維碼關注即可獲得等考資料

2016各科最新預測試卷

等考歷年真題及答案

2016等考成績查詢時間

2016等考各科通關技巧

微信搜索"考試吧"獲取更多考試資訊、備考資料

　　相關推薦：

　　各地2016年全國計算機等級考試報名時間匯總

　　各地2016年計算機等級考試準考證打印時間匯總

　　各地2016年全國計算機等級考試費用匯總

　　2016年計算機等級考試備考沖刺專題

　　考試吧特別策劃：2016年計算機等級考試報考指南