VBA简单代码求解释。请高手逐句解释啊。

Question

1.x=12
y=1
if x<>0 then y=2
text1 .value=y
（结果多少）

2.private sub command1_cick()
for i=1 to 4
x=3
for j=1 to3
for k=1 to 2
x=x+3
next k
next j
next i
text1.value=str(x)
end sub
（结果等于多少，求解释）

Answer 1

1.x=12 //变量x赋值12

y=1 //变量y赋值1

if x<>0 then y=2 //条件判断，如果变量x不为0则变量y为2，由于前面x已赋值12，所以y为2

text1 .value=y //在text1文本框中显示变量y，即显示为2

2.private sub command1_cick() //command1按钮按下的事件（应该是private sub command1_click()）

for i=1 to 4 //循环i从1到4

x=3 //变量x赋值3

for j=1 to3 //循环j从1到3

for k=1 to 2 //循环k从1到2

x=x+3 //每次循环到这变量x都加3

next k
next j
next i
text1.value=str(x) //由于每次i循环时x都恢复成3，所以只需要考虑j和k的循环，j循环3次，k循环2次，即共循环6次，所以最后x=3+6*3=21，在text1文本框中显示21。

end sub