VB 一次输入1,3,5 输出结果是1 求解释

Private Sub Form_Click()
Dim a(4) As Integer
Dim b(4) As Integer
For k = 0 To 2
a(k + 1) = Val(InputBox("enter data:"))
b(3 - k) = a(k + 1)
Next k
Print b(k)
End Sub

For k = 0 To 2
a(k + 1) = Val(InputBox("enter data:"))
b(3 - k) = a(k + 1)
Next k
'到这里时，循环结束，循环中k最大是2，出循环后，k会加一变成3
Print b(k) 等同于 Print b(3)
又由前面的程序，b(3)=b(3-k),所以对b(3)赋值时，k=0
所以赋值执行的是：b(3)=a(1)
又因为a(1)由已知是1，所以最终结果是：输出1

只要 不发言··不评论，不对话···其实这些操作 不进也可以做的····就由你跟他发起的对话需要你进···或你收听他了···· 单纯进 结果是 不会··

是的

Next k的时候 相当于 k=k+1 所以当循环结束，k=3 就是b（3） 也就是第一次输入的数--->1

不会，如果出现异地登录，他的安全中心会提醒异地登录。 例如：我是青岛的，有人登录我的微博了。他的IP是广东的，我的邮箱就会收到异地登录的提醒。 如果是同一个省的，提醒的几率会小~

输入1是 A1=1 ,B3=A1=1 K=0 输入3时： A2=3 B2=A2=3 K=1 输入5时 ：A3=5 B1=A3=5 K=2 在NEXT K 前 K=K+1 所以 K=3 故 B(K)=B3 =1 所以输出的结果是1

不会，如果出现异地登录，他的安全中心会提醒异地登录。 （不会有任何痕迹的，访问腾讯微博没有访问记录，因为目前腾讯微博还没有这块的设置。）

a(这里是你定义的变量)=val(text1.text) label1.caption= a(这里是你定义的变量) & "级"

不会有任何痕迹的。访问腾讯微博没有访问记录。 因为目前腾讯微博还没有这块的设置。

不会有任何痕迹的。访问腾讯微博没有访问记录。 　　腾讯微博是一个由腾讯公司推出，提供微型博客服务的类Twitter网站。用户目前可以通过网页、手机、QQ客户端、QQ空间以及电子邮箱等途径使用腾讯微博。近日已发布体验版。 　　腾讯微博有网页版、手机版和客户端版，由于智能手机的普及，所以腾讯开发有手机客户端。