计算机基础概论与VB程序设计第四章 B. 作用域.pptxVIP

VB6.0 程序设计教程 ——作用域回顾上一讲内容事件过程SUB子过程自定义子过程过程内部函数函数过程自定义函数问题：子过程与函数过程有什么区别？问题：参数传递的两种方式？ Private Sub Form_Click() Dim x As Integer, y As Integer x = 1 Call AA(x) Print x y = BB(x) Print x, yEnd SubPublic Sub AA(ByVal a As Integer) a = a + 1End SubPublic Function BB(ByRef b As Integer) as Integer b = b + 1 BB = b + 1End Function 模块设计模块（Module）：一般由全局变量、函数(Function)、子过程(Sub)构成的一个独立容器。VB中有3种类型：窗体模块、标准模块、类模块窗体模块：每个窗体对应一个窗体模块，除了一般模块所具有的内容外，还具有界面信息。与扩展名为.frm的同名窗体文件相对应。类模块：用于创建新的对象类的属性、方法等。标准模块中保存的自定义的全局变量、函数、子过程大多是可共享的、通用的。与扩展名为.bas的文件相对应。标准模块的创建方法模块调用/工程1.vbp跨模块调用 窗体模块(.frm)文件类模块(.cls)文件标准模块(.bas)文件变量a变量c变量b变量a变量c变量a变量c变量b变量b模块2模块3过程1过程2过程3过程1过程2过程3过程1过程2过程3模块1…………作用域和生存期工程(*.vbp) 过程的作用域过程的执行：事件的驱动:单击事件过程调用:内部函数的调用、事件过程的调用code/prg1/工程1.vbp[code/prg1/工程1.vbp例code/prg1/工程1.vbp1]过程的作用域：过程可被访问，起作用的范围。限定词 Function 函数名([形参列表]) [As类型]……End Function限定词 Sub 子过程名([形参列表])……End Sub 过程的作用域可以通过Public和Private两个限定词对过程起作用的范围加以区分。当过程前的限定词为Private，则表明此过程只能被本模块中其他的过程所调用，我们称之为模块级过程。当过程前的限定词为Public，则表明此过程不仅能被本模块所调用，也可以被其他模块中的过程所调用，我们称之为全局过程。code/prg3/工程1.vbp[code/prg3/工程1.vbp例code/prg3/工程1.vbp3] Private Sub Form_Click() Dim a%, b% a = InputBox(请输入第一个数：, a) b = InputBox(请输入第二个数：, b) Print 初始值：a=; a, b=; b Call swap (a, b) Print 交换后：a=; a, b=; bEnd Sub（标准模块）（Form1模块）（Form2模块）Public Sub swap(x%, y%) Dim T% T = x x = y y = TEnd SubPrivate Sub Form_Click() Dim p%, q%, T% p = InputBox(请输入第一个数：, p) q = InputBox(请输入第二个数：, q) Print 初始值：p=; p, q=; q Call swap (p, q) Print 交换后：p=; p, q=; qEnd SubPrivate Sub Command1_Click() Form2.ShowEnd Sub过程的作用域过程前没有限定词时，默认为Public 过程的作用域思考： （1）如果swap在标准模块中是用Private定义的， 是否能被Form1和Form2调用？ （2）如果swap是在Form1中用Private定义的， 是否能被Form1和Form2调用？ （3）如果swap是在Form1中用Public定义的， 是否能被Form1和Form2调用？ 过程的作用域（调用规则） 变量的作用域和生存期声明变量的语法形式： Dim|static|public|private 变量名 [as 类型]变量的作用域：变量能被使用、被识别的范围。变量的生存期：变量从产生到消亡(销毁、释放)的时间所谓初始化就是给新分配的存储空间一个初始值。数值类型的初始值为0；字符串类型的初始值为空字符串 ””；变体类型的初始值为空，即Empty。声明变量的位置和限定词二者共同决定了变量的作用域和生存期。我们把变量分为: 局部变量、模块级(全局)变量、全局变量。 Private Sub Command1_Click() Dim n As Integer n