下列为部分VB程序语句代码：(    )
s=32
For i="1" To 10 Step
s=s/2
Next i
上述程序语句执行结束后，s的值为2，则循环语句的步长（划横线处）应填(    )

A．1

B．2

C．3

D．4

当输入21，输出结果是 。
Dim x as long
x=inputbox(“输入x的值”)
if x mod 10="1" then
if x mod 8="3" then
x=x-12
end if
else
x=x-7
end if
print x

人们常使用计算机程序解决一些实际问题。下面的程序可以找出能被3、5、7除，余数为1的最小的五个正整数。请分析程序回答问题。
Private Sub Command1_Click（）
Dim CountN%,n%
CountN=0
n=1
Do
n=n+1
If ①     Then
Print n
CountN=Countn+1
End If
Loop ②
End Sub
（1）变量CountN 的数据类型定义为（ ）

A．integer

B．single

C．double

D．string

（2）这是一段    结构程序。
（3）认真阅读程序，在带序号的空白处补充恰当的语句，完善程序。
___________________________________________________________
____________________________________________________________
（4）在编写程序时，首先需要找出解决问题的方法和步骤，此过程就是通常所说的

设计流程图应在编程解决问题的那一个环节完成（   ）

A．分析问题

B．设计算法

C．编写程序

D．调试运行

阶乘是一种累乘积的计算方法，用“!”来表示阶乘，n!=1×2×3×……×n。如：8!=1×2×3×…×8=40320。小王为了求10! 的值，编写了如下Visual Basic代码：

Private Sub Command1_Click()

Dim i As Integer, s As Integer   ①

s = 0 ②

i = 1

Do While i < 10       ③   

i = i + 1
s = s * i ④

Loop

    Print s

End Sub

运行该程序，小王单击命令按钮Command1后，出现如第38题图对话框，已知序号①划线处的代码有错误，正确的代码应该是___________________________。经过代码修改后，小王重新运行该程序，单击命令按钮Command1，出现的结果是“0”， 那么序号_____（填①/②/③/④）划线处的代码有错误，正确的代码应该是________________。