VB编程 要结果和步骤
private sub command1_click()x=0
n=inputbox(”“)
for i=1 to n
for j= 1 to i
x=x+1
next j
next i
msgbox x
end sub 输入八结果是多少
追问:来自手机问问为什么i执行一次j全部执行
追问:来自手机问问为什么i执行一次j全部执行
答案:1. 输入8, n=82. 执行循环,首先需要懂得,i循环执行一次,j循环将要全部执行:
For i = 1 To 8
For j = 1 To i
x = x + 1
Next j, i
1) i = 1, j=1 to 1,循环执行1次,得到x=0+1=1
2) i = 2, j=1 to 2,循环执行2次,得到x=1+1=2, x=2+1=3
3) i = 3, j=1 to 3,循环执行3次,得到x=3+3=6
4) i = 4, j=1 to 4,循环执行4次,得到x=6+4=10
5) i = 5, j=1 to 5,循环执行5次,得到x=10+5=15
6) i = 6, j=1 to 6,循环执行6次,得到x=15+6=21
7) i = 7, j=1 to 7,循环执行7次,得到x=21+7=28
8) i = 8, j=1 to 8,循环执行8次,得到x=28+8=36
3. 最后输出x的值:36
上一个:VB编程-数组排序问题
下一个:关于VB编程的问题