【摘要】:Msg Box"欢迎使用窗体按钮单击事件建立VBA模块程序",vb Information,"事件模块"
例1: Subsub1()
Msgbox(“欢迎使用sub过程”)
End Sub
结果如图9.3所示。
图9.3 Sub过程结果
例2: 通用模块中子过程调用程序如下所示。
Sub Sub2()
Dimx As Integer,y As Integer
x=12
y=32
Call Proc(x,y)
Msg Box(x)
Msg Box(y)
End Sub
Public Sub Proc(n As Integer,m As Integer)
n=n Mod5
m=m Mod7
Endsub
编辑及运行结果如图9.4所示。
图9.4 过程调用结果
例3: 事件模块编辑及运行。
在窗体的设计视图中, 通过右击按钮 “事件生成器” 编写下列程序产生消息框:
Private Sub Command0_Click()
Msg Box"欢迎使用窗体按钮单击事件建立VBA模块程序",vb Information,"事件模块"
End Sub
编辑运行结果如图9.5所示。
图9.5 事件模块调用结果
免责声明:以上内容源自网络,版权归原作者所有,如有侵犯您的原创版权请告知,我们将尽快删除相关内容。