vb语言的一个问题

来源:百度知道 编辑:UC知道 时间:2024/05/01 11:56:35
option base 0
private sub command1_click()
dim A(4) as integer,B(4) as integer
for k=0 to 2
a(K+1)= inputbox("请输入一个整数")
b(3-k)=A(K+1)
next t
print b(k)
end sub

option base 0
private sub command1_click()
dim A(4) as integer,B(4) as integer '此时b(3)=0,b(2)=0,b(1)=0,b(0)=0
for k=0 to 2
a(K+1)= inputbox("请输入一个整数")
b(3-k)=A(K+1)
next t '此处多个t
print b(k)
end sub

K=0时 b(3-k)=b(3)=a(1)
K=1时 b(3-1)=b(2)=a(2)
K=2时 b(3-2)=b(1)=a(3)
k=3时 退出循环
输出b(3)=a(1)

除了作为试题之外,这个过程没有什么意义吧.

这行代码应该是出错的吧。
首先,第七行,应该是 next k 吧
到第八行k应该是失效了。

next t,这里多了一个t