【VB开源代码栏目提醒】：网学会员VB开源代码为您提供VB程序代码就保存在窗体模块文件（Frm） - 产品手册参考，解决您在VB程序代码就保存在窗体模块文件（Frm） - 产品手册学习中工作中的难题，参考学习。

    

第七章 过程和变量的作用域7.1 概 述 在第二章我们介绍了VB应用程序（通常称为工程）的组织结构，它由窗体模块、标准模块和类模块组成。

    VB程序代码就保存在窗体模块文件（＊.Frm）、标准模块文件（＊.Bas）或类模块文件（＊.Cls）中。

    它们形成了工程的一种模块层次结构，如下图所示。

    一个应用程序的组成结构7.1.1 窗体模块文件扩展名为 .FRM 窗体模块。

    窗体模块可以包含处理事件的过程、通用过程以及变量、常数、类型和外部过程的窗体级声明。

    如果要在文本编辑器中观察窗体模块，则还会看到窗体及其控件的描述，包括它们的属性设置值。

    写入窗体模块的代码是该窗体所属的具体应用程序专用的；它也可以引用该应用程序内的其它窗体或对象。

    7.1.2 标准模块文件扩展名为．BAS 它们可以包含变量、常数、类型、外部过程和全局过程的全局在整个应用程序范围内有效的声明或模块级声明。

    写入标准模块的代码不必绑在特定的应用程序上，则在许多不同的应用程序中可以重用标准模块。

    7.1.3 类模块文件扩展名为 .CLS 在 Visual Basic 中类模块是面向对象编程的基础。

    可在类模块中编写代码建立新对象。

    这些新对象可以包含自定义的属性和方法。

    实际上，窗体正是这样一种类模块，在其上可安放控件，可显示窗体窗口。

     7.2 过程的作用域概念 PublicPrivate Sub 子过程名形式参数列表 …..End Sub 通用子过程和函数过程既可写在窗体模块中也可写在标准模块中，在定义时可选用关键字Private（局部）和Public（全局），来决定它们能被调用的范围。

     按过程的作用范围来划分，过程可分为： 模块级过程 全局级过程1、窗体/模块级过程： 加Private关键字的过程，只能被定义的窗体或模 块中的过程调用。

    2、全局级过程： 加Public关键字（或缺省）的过程，可供该应用程序的所有窗体和所有标准模块中的过程调用。

     用例7.1来说明过程的作用域总结归纳过程的定义及作用域如下表: 7.3 变量的作用域概述： 在VB中，由于可以在过程中和模块中声明变量，根据定义变量的位置和定义变量的语句不同，变量可以分为：局部变量（过程级变量）窗体/模块级变量（私有的模块级变量，能被本模块的所有过程和函数使用）全局级变量（公有的模块级变量）。

    7.3.1 过程级变量——局部变量局部变量：在过程内用声明的变量，只能在本过程中使用。

     在过程内部使用 Dim 或者 Static 关键字来 声明的变量，只在声明它们的过程中才能被访问 或改变该变量的值，别的过程不可访问。

    所以可 以在不同的过程中声明相同名字的局部变量而互 不影响。

     例： Private Sub Form_Load Dim n n 10 End Sub Private Sub From_Click Dim n Print “n“n End Sub程序运行后单击窗体，其输出结果是什么？ 7.3.2 窗体/模块级变量 窗体/模块级变量：在“通用声明”段中用Dim语句或用Private语句声明的变量，可被本窗体/模块的任何过程访问。

    但其他模块却不能访问该变量。

    例如：在“通用声明”段声明如下变量Private s As String Dim a As Integer，b As Single7.3.3 全局变量 全局变量也称公有的模块级变量，在窗体模块或标准模块的顶部的“通用”声明段用Public关键字声明，它的作用范围是整个应用程序，即可被本应用程序的任何过程或函数访问。

    例如： Public a As Integer，b As single3种变量声明及使用规则如下表：7.3.4 关于多个变量同名一、公用变量与局部变量同名 在不同过程中定义同名变量，它们互不影响，但若在一过程中定义使用了与全局变量同名的变量，则就应注意。

     注意：在过程中，如果定义了与模块级变量（在通 用部分使用Private或Dim声明的变量），则在该过程内 不能引用同名的模块级变量。

    例如，上面的例子中，如 果将定义全局变量的语句Public Temp As Integer改为 Private Temp As Integer 则在Command1的单击事件中就 不使用模块级的Temp变量。

     Public Temp As Integer 定义全局变量Private Sub Form_LoadTemp 1 将全局变量Temp 的值设置成 1End SubPrivate Sub Command1_ClickDim Temp As Integer 定义局部变量Temp 2 将局部变量Temp 的值设置成 2 Print temp Temp Print temp Form1.TempEnd SubPrivate Sub Command2_Click Print temp TempEnd Sub二、全局变量同名 如果不同模块中的全局变量使用同一名字，则通过同时引用模块名和变量名就可以在代码中区分它们。

    例如，如果有一个在 Form1 和 Module1 中都声明了公用的 Integer 变量 intX，则把它们作为Module1.intX 和 Form1.intX 来 引 用 便 得 到 正确值。

    也就是说如果不同模块中的全局变量使用同一名字，引用时就需要使用“模块名.变量名”的形式来区分它们。

     7.3.5 静态变量 概念 除作用域之外，变量还有存活期，在这一期间变量能够保持它们的值。

     在应用程序的存活期内一直保持模块级变量和全局变量的值。

    但是，对于Dim声明的局部变量仅当过程执行期间存在，当一个过程执行完毕，它的局部变量的值就已经不存在，而且变量所占据的内存也被释放。

    当下一次执行该过程时，它的所有局部变量将重新初始化。

     局部变量的存活期由其定义的关键词来决定。

    局部变量声明： Dim声明：随过程的调用而分配存贮单元，变量的初始化；过程体结束，变量的内容自动消失，存贮单元释放。

     Static声明，每次调用过程，变量保持上次调用结束时的值。

     声明形式： Static 变量名 AS 类型 Static Function 函数过程名参数列表 As 类型 Static Sub 子过程名参数列表 注意：过程名前加Static，表示该过程内 的局部变量都是静态变量。

    例7.2 有一个人编了下面一段程序，想用变量n记录单击窗体的次数。

    Private Sub Form_Click Dim n As Integer n n 1 Print 已单击次数： n 次End Sub分析程序运行后多次单击窗体的输出结果： 要记录单击窗体次数，如何实现？并比较使用模块变量和静态变量的差别。

     例7.3 教材P168