Dim a(1 To 10) As Integer

 Dim s(1 To 10) As Integer

 Private Sub Form_Load()

  a(1) = 3: a(2) = 6: a(3) = 8: a(4) = 4: a(5) = 9

  a(6) = 5: a(7) = 3: a(8) = 3: a(9) = 10: a(10) = 5

 End Sub

 Private Sub Command1_Click()

 Dim i As Integer, t As Integer

 s(1) = a(1)

 For i = 2 To 10

  s(i) = s(i - 1) + a(i)

 Next i

 t = s(8) - s(4)

 Text1.Text = Str(t)

End Sub

程序运行后，文本框Text1显示的内容是（  ）

a(1)=68: a(2)=88: a(3)=76: a(4)=60: a(5)=98: a(6)=100: a(7)=64: a(8)=85: a(9)=99:a(10)=59

For i = 1 To 9

 b(i) = Abs(a(i + 1) - a(i))

 c(b(i) \ 10) = c(b(i) \ 10) + 1

Next i

For i = 0 To 10

 If c(i) > 0 Then Label1.Caption = Label1.Caption + “” + Str(c(i))

Next i

数组c各元素初值为0，执行该程序段，标签Label1上显示的内容是（  ）

 Dim a(3, 3) As Integer

 For m = 1 To 3

 For n = 1 To 3

   a(m, n)=(m-1)*3+n

 Next n

 Next m

   For m = 2 To 3

For n = 1 To 2

   Print a(n, m);

Next n

Next m

运行后输出结果是（  ）