private sub command1_click()
a=0:b=5:c=6
a=b+c
msgbox a
end sub
这个的结果是11,a=b+c是算术表达式,把b+c的结果赋给a,然后msgbox时显示出a
******************************************************
private sub command1_click()
a=0:b=5:c=6
msgbox a=b+c
end sub
这个的结果是false,a=b+c在这里是逻辑表达式,返回布尔值,如果a和b+c的结果相等的话,返回真(true),不相等则返回假(false)。
Private Sub s2()
Dim x As Integer
x = x + 20
End Sub
这段代码的第二行去掉,在s2中定义的x,其作用范围仅限s2
a=b+c 在这里是比较,而不是赋值
先计算b+c赋值给a,然后再显示
a=b+c
msgbox a