（加试题）用绳索围成回字迷宫图（左图所示），迷宫路宽是 1 米，如果绳索长为 X 米，则可以构成多少个边长为1米并且至少两边在绳索上的正方形。程序效果如右图所示。

Dim X As Integer, L As Integer, i As Integer
Dim n As Integer, a As Integer, b As Integer
X = Val(Text1.Text)
If X < 2 Then
　n = 0
ElseIf X >= 2 And X <= 4 Then
　n = 1
Else
　i = 1: L = 3
　Do While　   ①

i = i + 2

L = L + 4 * i

　Loop
　If L = X Then
　　n = i ^ 2
　Else
　　L = L - 4 * i
　　a =　    ②   
　　b = ((X - L) \ i) * (i - 1) - 1 + (X - L) Mod i
　　n = a + b
　End If
End If
　Label1.Caption = " 绳索长度为 " + Str(X) + " 米，可以构成 " + Str(n) + " 个边长为 1 米的正方形。"
（1）为实现该程序的功能，画线处的语句应填写为：
①________________________
②_________________________
（2）如果绳索长度 X 为 15 米，则可以构成相应的正方形个数为________。

下列For/Next循环语句中,循环体语句可以被多次执行的是(   )。

A．

B．

C．

D．

有如下VB程序段：
For i = 1 To 8
a(i) = Int(Rnd * 2)
Next i
sum = 0
For i = 1 To 8 Step 3
For j = i To 8
a(j) = 1 - a(j)
Next j
sum = sum + a(i)
Next i
Text1.Text = Str(sum)
执行程序段后，文本框Text1中显示的内容不可能是

A．0

B．2

C．3

D．4

小红编写了一个将5位以内的十六进制正整数转换成十进制数的VB程序，功能如下：在文本框Text1中输入一个十六进制正整数，单击“转换”按钮Command1，在标签Label3中显示结果。程序运行界面如图所示。

（1）要使窗体Form1标题显示“数制转换”，则需修改窗体的________（单击，填字母：A.Font/B.Caption/C.BackColor）属性。
（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
Private Sub Command1_Click()
Dim x As String, ch As String
Dim flag As Boolean, i As Integer, result As Long
x=_________
i=1
result=0
flag=True
ch=Mid(x,1,1)
Do While i <=Len(x) And flag=True
If ch>= “0” And ch<= “9” Then
result=result * 16+Val(ch)
ElseIf ch>= “A” And ch <= “F” Then
result=result * 16+(Asc(ch)-Asc (“A”)+10)
ElseIf ch>= “a” And ch <= “f” Then
result=result * 16+(Asc(ch)-Asc (“a”)+10)
Else
flag=False
End If
i=i+1
ch=_________

Loop

If flag=True Then

Label3.Caption=Str(result)

Else

Label3.Caption= “输入错误”

End If

End Sub
（3）若在文本框Text1中输入5+9，单击“转换”按钮后，标签Label3中显示的内容是______（单选，填字母：A.14/B.E/C.输入错误）。

采用拉锯式排序法对无序数组元素实现降序排序，即前一遍把最大的元素从右到左送到最左的位置，后一遍把最小的元素是从左到右送到最右的位置，实现该功能的 VB 程序段如下：

c = 1: s = 10
Do While c <= s
For i = s To c + 1 Step -1
If      Then
t = a(i - 1): a(i - 1) = a(i): a(i) = t
End If
Next i
For i = 
If Then
t = a(i + 1): a(i + 1) = a(i): a(i) = t
End If
Next i
c = c + 1
s = s - 1
Loop
上述程序段三个方框处的语句分别为（ ）

A．①   a(i - 1) < a(i)    ②    c +1 To s – c    ③ a(i) <a(i + 1)

B．①   a(i - 1) > a(i)    ②    c +2 To s – c    ③ a(i) >a(i + 1)

C．①   a(i - 1) < a(i)   ②    c +1 To s – c-1    ③ a(i) <a(i + 1)

D．①   a(i - 1) > a(i)    ②    c+ 2 To s – c+1    ③ a(i) >a(i + 1)