vb msgbox给按钮caption_VB标准模块

我们知道，VB中所有的代码都是依附于模块的，而模块在VB中可以分为3种类型：窗体模块、标准模块和类模块。窗体模块我们在VB入门教程中已经学习过了。本节课程我们在来一起学习标准模块和类模块。 标准模块 标准模块是应用程序内供其它模块访问的公共过程和声明的容器。它可以包括变量、常量、类型、外部过程和全局过程的声明。 也就是说，在多窗体应用程序中，对于在多个窗体中需要用到的变量、函数过程等，我们可以在标准模块中声明，这样就可以在其它窗体中调用。 类模块 类模块可以创建自定义的类，该类包括自己的属性、方法和事件。自定义的类相当于一个没有实体的控件。 比如一个命令按钮，是VB系统中已经定义好的类，它具有自己的属性、方法和事件，它也有实体。而类模块创建的类除了没有实体外，其余性质与控件类似。 类模块在进阶教程中暂不做深入介绍。 一、添加标准模块 在工程资源窗口，鼠标右键——添加——添加模块，即可添加一个标准模块了。 标准模块只有代码编辑界面，而没有窗体。 二、举例 下面我们来举个例子深入理解标准模块的作用。 1，首先创建一个工程，工程中包含一个窗体模块form1和一个标准模块Module1，如下图所示： 2，进入标准模块Module1，编写代码，如下所示：

Option ExplicitPublic a%   Dim b% Sub test1()    b = b + a    MsgBox bEnd SubFunction test2(c%) As Long    b = b + c    test2 = bEnd Function

注意： 在代码区顶部，声明变量a和变量b。 变量a使用public关键字声明： 其表示全局变量，可以在本工程内所有窗体模块、标准模块、类模块中使用。 变量b使用dim关键字声明： 其表示模块级变量，仅在本模块中使用 在form1窗体上绘制两个命令按钮，并修改其Caption属性，如下所示： 进入代码编辑界面，编写两个按钮的单击事件：

Private Sub Command1_Click()        a = 2           Call test1  '调用子过程test1End SubPrivate Sub Command2_Click()        MsgBox test2(2) '调用函数过程test2，并用msgbox输出结果End Sub

注意： 可以直接使用变量a，因为它被定义为全局变量，而不可以使用模块级变量b，仅能在标准模块中使用。 运行程序，多次单击两个按钮，观察结果。