Question

vba程序，n=0 For i=1 to 3 For j=-4 to -1 n=n+1 next j next i 运行结束后 ，变量n的值是？

请详细说明一下，解释下语句的意思

Answer 1

n=0 ; n初始化为0
For i=1 to 3 ; for 循环 1-3 共3次
For j=-4 to -1 ;for循环 -4至-1 共4次
n=n+1 ;在循环中 n自加1
next j ; 下一个j 也就是 j=j+1 进入For j=-4 to -1 的For循环判断
next i ;下一个i

这里 i从1-3 每取一个值 j就从-4 至 -1 循环4次， n自加1
所以n=3x4=12

追问

Private Sub Command1_Click() Dim i,j,x for i=1 to 20 step 2 x=0 for j =i to 20 step 3 x=x+1 next j next i text 1.value=str(x) end sub 打开窗体运行后，点击命令按钮，文本框中显示的结果是？
这个呢？？麻烦快点，我会加分的

追答

Private Sub Command1_Click()
Dim i,j,x
for i=1 to 20 step 2 //这个step 2表示 每次next 时 i=i+2 默认是i=i+1
x=0 //这里 每次循环 x都赋为0 所以只算i=19 下面 for j的循环就是结果了,所以相当于 for j=19 to 20 step 3 这个就只运行一次 x=x+1 所以结果是 x=1
for j =i to 20 step 3
x=x+1
next j
next i
text 1.value=str(x)
end sub

结果是 x=1

Answer 2

建议学习编程的同时，弄一本《计算方法》来看看。