[問答題] 在考生文件夾下有一個(gè)工程文件sjt5.vbp，相應(yīng)的窗體文件為sjt5.frm。窗體中已經(jīng)給出了所有控件(框架中的3個(gè)單選按鈕構(gòu)成了一個(gè)控件數(shù)組)，如圖3—1所示，請編寫適當(dāng)?shù)氖录^程。程序運(yùn)行后，如果選中某個(gè)單選按鈕，然后單擊“計(jì)算”命令按鈕，則計(jì)算出數(shù)列1，1，2，3，5，8，13，21，…的第n項(xiàng)的值，并在文本框中顯示出來，其中n是選中的單選按鈕標(biāo)題所指定的數(shù)值。要計(jì)算的數(shù)列的變化規(guī)律是：從第3個(gè)數(shù)開始，每個(gè)數(shù)是它前面兩個(gè)數(shù)之和 (提示：由于計(jì)算結(jié)果較大，存放結(jié)果的變量應(yīng)使用長整型)。

注意：

①不得修改已經(jīng)給出的程序和已有的控件的屬性；

②在結(jié)束程序運(yùn)行之前，必須選中一個(gè)單選按鈕，并單擊“計(jì)算”命令按鈕獲得一個(gè)結(jié)果；

③必須通過單擊窗體右上角的“關(guān)閉”按鈕結(jié)束程序，否則無成績。

試題所提供的事件過程如下：

Private Sub Form_Unload(Cancel As Integer)

Open"out5.dat"For Output As #1

Print #1,Op1(0).Value,Op1(1).Value,Op1(2).Value,Va1(Text1.Text)

Close #1

End Sub

① 啟動(dòng)Visual Basic，裝入工程文件sjtE.vbp。 ② 打開代碼窗口，所提供的事件過程如下： Private Sub Form_Unload(Cancel As Integer) Open"outE.dat"For Output As #A Print #A,OpA(0).Value,OpA(A).Value,OpA(B).Value,VaA(TextA.Text) Close # A End Sub 這是窗體的Unload事件過程，用來把每個(gè)單選按鈕當(dāng)前的Va