Dim a,b,c As Integer

   Dim s AS string

   a=9

   b=41

   c=2*(a+b)

   s=str(b+c)

s = "123456789"

g = ""

For i = 1 To 3

n = Len(s)

x = Int(Rnd() * n) + 1

g = g + Mid(s, x, 1)

s = Mid(s, 1, x - 1) + Mid(s, x + 1, n - x)

Next i

在程序执行时，若变量 x 的值依次为3,3,6，则最终变量g的值为（   ）

Private Sub Command1_Click()

 i＝1

 j＝7

 Do While ____①____

i＝____②____

j＝____③____

 Loop

 Text1.Text＝Str(i)

 Text2.Text＝Str(j)

End Sub

则下列说法正确的是（  ）

m = Val(Text1.Text)

Do While m <> 0

x = m Mod 8

m = m \ 8

a(x) = a(x) + 1

If a(x) = 1 Then n = n + 1

Loop

数组a各元素的初始值都为0，在文本框Text1中输入“529”，执行程序后，变量n的值为（  ）

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