下列程序在调试时，文本框Text2不能输出最后的结果，已知①和②处存在唯一错误，请问错误出在 （填①或②）处，该处正确的语句应该为 。
Dim x As Integer, max As Integer
Dim a As Integer, b As Integer, c As Integer, t As Integer
x = Val(Text1.Text)    ' ①
a =" x" \ 100
b =" x" \ 10 Mod 10
c =" x" Mod 10
If a < b Then t =" a:" a =" b:" b = t
If a < c Then t =" a:" a =" c:" c = t
If b < c Then t =" c:" c =" b:" b = t
max =" a" * 100 + b * 10 + c
Text2.Text =max    ' ②

程序运行后，单击Command1命令按钮，变量x=(    )。
Private Sub Command1_Click()
n =" 5"
x =" 1"
For i =" 1" To n
x =" x" * i
Next i
End Sub

A．5

B．15

C．24

D．120

下面程序执行的结果是（  ）
Private Sub Form_Load()
A="123":B="456"
C=Val(A)+Val(B)
Print C\100
End Sub

A．123

B．3

C．5

D．579

有如下Visual Basic程序段：
a="2"
b=5
c=4
If a>b or c<b Then m="a-b" Else m=b-c
该程序段运行后,变量m的值为_______。

由于月球上没有大气，嫦娥三号无法依靠降落伞着陆，只能靠变推力发动机，才能完成中途修正、近月制动、动力下降、悬停段等软着陆任务，物体在月球上的重力加速度g=1.63m/s²，m为嫦娥三号的自身质量，N表示嫦娥三号产生的推力，并且推力会随着距离x的变化而改变，恒月运动数率具体公式如下：

算法流程图如下：

图中判断框②处应填入的是（   ）

A．x≤100

B．x≥4

C．x≤4

D．x>100

某算法的流程图如下所示：

下列说法错误的是（   ）

A．该流程图中包含的算法模式有：顺序模式、分支模式和循环模式

B．当输入x的值为-100时，输出的n的值为1

C．只要输入的x的值不小于0，该程序就不会结束

D．当输入 x的值依次为1、2、3、－1时，输出的结果为4

有如下Visual Basic程序段：
a=2
b=3
c=0
b=a
c=a+b
该程序段运行后,变量c的值为_______。

下面是一段Visual Basic程序：
Private Sub Command1_Click()
Dim sum As Double，i As Integer
sum = 0
For i =" 1" To 5
sum = 2
sum = sum+i
Next i
Text1.Text = Str(sum)
End Sub
该程序运行后，语句sum=sum+i共执行了____    ____次，sum的值为 ，i的值为     。

下列Visual Basic程序段运行后，变量x的值为（    ）
x="3:" y=50
Do while x < sqr(y)
x=x+2
Loop

A．7

B．8

C．9

D．10

有如下VB程序段
X=0
For i =" 1" to 8 step 2
X=x+i
Next i
该程序段执行后，变量x的值是（   ）

A．9

B．16

C．25

D．36