Question

VB中if语句运算

Dim i As Integer, x As Integer
For i = 1 To 6
If i = 1 Then x = i
If i <= 4 Then
x = x + 1
Else
x = x + 2
End If
Next i
Print x

运行之后输出结果为9
可我算的是8
请明白的朋友帮忙解答一下，谢谢。

Answer 1

dim
a
as
long
dim
b
as
long
a=1
'这是赋值语句
b=2
'这是赋值语句
if
a=b
then
'这是关系运算，按语法，这里是条件
......
else
......
end
if
if
a=b
then
'按语法，这里是条件,所以是关系运算
上句执行后不会使a=2,只是比较a是否等于b
if
a=3
then
'按语法，这里是条件,所以也是关系运算
上句执行后不会使a=3,只是比较a是否等于3

Answer 2

i=1时，执行If i = 1 Then x = i，x=1
然后执行x = x + 1，x=2
i=2时，执行x = x + 1，x=3
i=3时，执行x = x + 1，x=4
i=4时，执行x = x + 1，x=5
i=5时，执行x = x + 2，x=7
i=6时，执行x = x + 2，x=9
所以结果是9

注意，当i=1的时候，有两个条件是成立的

Answer 3

运行VB单步执行，再不懂再问

Answer 4

还有个END IF 在哪儿