Question

vb输出结果判断

private x as integer

private sub command1_click()
static y as integer
dim z as integer
n=10
z=n+z
y=y+z
x=x+z
label1.caption=x
label2.caption=y
label3.caption=z
end sub
为什么结果是30 30 10而不是10 30 10
不是只有y能累加吗

Answer 1

private x as integer 全局变量 也可累加
虽然你写 private 私有化 在其他窗体无法引用，但在这个窗体里 是全局

Answer 2

n是哪里定义的？

x是全局的，在整个程序执行中都不会被归零。

 

private sub command1_click()
    static y as integer
    Private x as integer
    Dim z as  integer
    n=10
    z=n+z
    y=y+z
    x=x+z
    label1.caption=x
    label2.caption=y
    label3.caption=z
End Sub

  这样就是10 30 10