⑴用户通过输入n，点击按钮Command2生成规模为n×n的数字矩阵；

  ⑵矩阵元素随机生成，并按数组顺序保存，如规模为3×3的矩阵，元素对应数组的排列方式如图a所示；

  ⑶点击按钮Command1后输出主对角线上的元素以及其元素之和。

程序界面如图b所示，程序代码如下：

Dim a(100)As Integer，n As Integer

Private Sub Command1_Click()    ‘输出主对角线数据及其之和

  Dim i As Integer，j As Integer，t As Integer，sum As Integer

  t=1：sum=0

  For i=1 To n

    For i= 1 To n

      If    ①    Then

      List2．AddItem Str(a(t))

      sum=sum+a(t)

    End If

    Next i

    ②   

  Next i

  List2．Addltem“和：  ”+Str(sum)

End Sub

Private Sub Command2_Click()        ‘生成数组矩阵

  Dim i As Integer，s As String

  n=Val(Text1．Text)            ‘获取矩阵规模

  List1．Clear：List2．Clear

  Randomize

  For i=1 To n2

    a(i)=99-Int(Rnd*90)

    s=s+Str(a(i))

    If   ③    Then

    List1．AddItem s

    s=“”

    End If

  Next i

End Sub

Dim i As Integer, s As String

i = 0

Do While i < 5

  s = Str(i) + s

  i = i + 1

Loop

Dim f1 as long, f2 as long, f as long

 n=val(Text1.Text)

 f1=1

 f2=1

 For k=3 to n

Next k

Label1.Caption=“斐波那契数列第”+str(n)+“项的值为”+str(f)

方框中的代码由以下三部分组成：

①f2=f  ②f1=f2  ③f=f1+f2

代码顺序正确的选项是（  ）

  Privat Sub Command1 Click

      Dim array1(10,10) As Integer

      Dim i AS integer, j As Integer

      For i = 1 To 3

          For j = 2 To 4

              array1(i,j) = i + j

          Next j

      Next i

  Text1.Text=array1(2, 3)+array1(3, 4)

  End Sub

程序运行后，单击命令按钮，在文本框中显示的值（  ）