执行下面程序后，消息框显示的结果是______。 Dim a As Integer

问题填空题

执行下面程序后，消息框显示的结果是______。
Dim a As Integer
Sub sum(b As Integer)
a=a+b
End Sub
Private Sub Command1_Click()
Call sum(3)
Call sum(4)
Call sum(5)
MsgBox a
End Sub

答案

参考答案：L

解析：在VBA中，变量的作用域共有3个层次：在模块过程内部用Dim或Private定义的变量为局部变量；在标准模块内的变量定义区域用Dim或Private定义的变量为模块变量；在标准模块的变量定义区域用Public定义的变量为全局变量。用Static定义的变量为表态变量。本题中的a就是模块变量，只要不消亡就一直存在。等同于sum过程每执行一次，就向全局变量中加上一个实参，最后结果为3+4+5=12。