[問答題] 以下數(shù)列：1，1，2，3，5，8，13，21，…，的規(guī)律是從第三個數(shù)開始，每個數(shù)是它前面兩個數(shù)之和。

在考生文件下有一個工程文件sjt5.vbp。窗體中已經(jīng)給出了所有控件，如圖4所示。請編寫適當(dāng)?shù)氖录^程完成以下功能：選中一個單選按鈕后，單擊“計算”按鈕，則計算出上述數(shù)列的第n項的值，并顯示在文本框中，n是選中的單選按鈕后面的數(shù)值。(提示：因計算結(jié)果較大，應(yīng)使用長整型變量。)

注意：不能修改已經(jīng)給出的程序和已有的控件屬性；在結(jié)束程序運行之前，必須選中一個單選按鈕，并單擊“計算”按鈕獲得一個結(jié)果；必須使用窗體右上角的關(guān)閉按鈕結(jié)束程序，否則無成績。最后把修改后的文件按原文件名存盤。

[操作步驟] 第1步：打開題目對應(yīng)工程文件sjt5.vbp。 第2步：雙擊“計算”按鈕進(jìn)入代碼編寫窗口，編寫代碼。 參考代碼如下： Private Sub Command1_Click() Dim SL() As Long Dim n As Integer ’通過被選中的單選按鈕的標(biāo)題屬性得到需要計算的項數(shù) If Op1(0).Value=True Then n=Val(Op1(0).Caption) Elself Op1(1).Value=True Then n=Val(Op1(1

題目中所指的數(shù)列就是著名的斐波那契數(shù)列。可以有多種方法求出斐波那契數(shù)列，其中一種方法是用數(shù)組來存儲數(shù)列的各個值，因為數(shù)組的下標(biāo)可以方便地表示出前后數(shù)之間的關(guān)系。 題目中要求：“單擊‘計算’按鈕，則計算出上述數(shù)列的第n項的值”，所以應(yīng)該在“計算”按鈕的單擊事件過程完成數(shù)列的計算。計算時可以根據(jù)當(dāng)前選中的單選按鈕的標(biāo)題得到應(yīng)該計算的項數(shù)。