Private Sub Command1_Click()

Dim a As Integer

a = Int(6 * Rnd + 1) * Int(6 * Rnd - 1)

Print a

End Sub

实现上述功能的VB程序代码如下，但加框处语句有误，请改正。

Private Sub Command1_Click()

 Dim i As Integer, n As Integer, s As String

 n = Val(Text1.Text)

 s = “”

 For i = 1 To     ‘①

  If i<= n Then

   s = s + Str(n - i + 1)

  Else

         ‘②

  End If

 Next i

 Text2.Text = s

End Sub

程序中①处应改为{#blank#}1{#/blank#};

程序中②处应改为{#blank#}2{#/blank#}。

小明依据上述描述设计了如下VB程序，在Text1中输入矩阵的行数n (n≤10)，单击“生成”按钮Command1，在List1中显示n×n的螺旋矩阵。请回答下列问题：