VisualBasic过程和变量的作用域.pptx

《VisualBasic过程和变量的作用域.pptx》由会员分享，可在线阅读，更多相关《VisualBasic过程和变量的作用域.pptx（15页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、前面我们介绍了VBVB应用程序（通常称为工程）的组织结构，它由窗体模块、标准模块和类模块组成。VBVB程序代码就保存在窗体模块文件（.Frm.Frm）、标准模块文件（.Bas.Bas）或类模块文件（.Cls.Cls）中。它们形成了工程的一种模块层次结构，如下图所示。1概概述述第1页/共15页2过程的作用域过程的作用域Public|Private Sub 子过程名(形式参数列表).EndSub概念通用子过程和函数过程既可写在窗体模块中也可写在标准模块中，在定义时可选用关键字PrivatePrivate（局部）和PublicPublic（全局），来决定它们能被调用的范围。第2页/共15页1、窗体/

2、模块级过程：加Private关键字的过程，只能被定义的窗体或模块中的过程调用。2、全局级过程：加Public关键字（或缺省）的过程，可供该应用程序的所有窗体和所有标准模块中的过程调用。按过程的作用范围来划分，过程可分为：模块级过程全局级过程用例1来说明过程的作用域2过程的作用域过程的作用域第3页/共15页总结归纳过程的定义及作用域如下表2过程的作用域过程的作用域第4页/共15页Sub Main过程(P96)第5页/共15页3变量的作用域变量的作用域概述：在VB中，由于可以在过程中和模块中声明变量，根据定义变量的位置和定义变量的语句不同，变量可以分为：局部变量（过程级变量）窗体/模块级变量（私有

3、的模块级变量，能被本模块的所有过程和函数使用）全局级变量（公有的模块级变量）。第6页/共15页3.1过程级变量过程级变量局部变量局部变量局部变量：在过程内用声明的变量，只能在本过程中使用。在过程内部使用Dim或者Static关键字来声明的变量，只在声明它们的过程中才能被访问或改变该变量的值，别的过程不可访问。所以可以在不同的过程中声明相同名字的局部变量而互不影响。3变量的作用域变量的作用域第7页/共15页例：PrivateSubForm_Load()Dimn%n=10EndSubPrivateSubFrom_Click()Dimn%Print“n=“;nEndSub程序运行后单击窗体，其输出结

4、果是什么？3变量的作用域变量的作用域第8页/共15页3.2窗体窗体/模块级变量模块级变量窗体/模块级变量：在“通用声明”段中用Dim语句或用Private语句声明的变量，可被本窗体/模块的任何过程访问。但其他模块却不能访问该变量。例如：在“通用声明”段声明如下变量:PrivatesAsStringDimaAsInteger3变量的作用域变量的作用域例：Dimn%PrivateSubForm_Load()n=10EndSubPrivateSubFrom_Click()Print“n=“;nEndSub第9页/共15页3.3全局变量全局变量全局变量也称公有的模块级变量，在窗体模块或标准模块的顶部的

5、“通用”声明段用Public关键字声明，它的作用范围是整个应用程序，即可被本应用程序的任何过程或函数访问。例如：PublicaAsInteger，bAssingle3变量的作用域变量的作用域第10页/共15页3种变量声明及使用规则如下表：3变量的作用域变量的作用域第11页/共15页一、公用变量与局部变量同名一、公用变量与局部变量同名在不同过程中定义同名变量，它们互不影响，但若在一过程中定义使用了与全局变量同名的变量，则就应注意。3.4 3.4 关于多个变量同名3变量的作用域变量的作用域第12页/共15页Public Temp As Integer 定义全局变量Private Sub Form_

6、Load()Temp=1 将全局变量Temp 的值设置成 1End SubPrivate Sub Command1_Click()Dim Temp As Integer 定义局部变量Temp=2 将局部变量Temp 的值设置成 2 Print temp=;Temp End SubPrivate Sub Command2_Click()Print temp=;Temp End Sub3变量的作用域变量的作用域第13页/共15页PrivateSubForm_Click()Dimi%，isum%Fori=1To5isum=sum(i)Printisum，NextiEndSubPrivateFunctionsum(nAsInteger)DimjAsIntegerj=j+nsum=jEndFunction12345StaticjAsInteger结果如何？补充例题：3变量的作用域变量的作用域第14页/共15页感谢您的观看！第15页/共15页