vb第四章 函数与过程.pptVIP

第4章 函数与过程 4.1 过程的编写与调用 [Static][Public|Private]Function 函数名([参数列表]) [As 类型] 局部变量或常数定义 End Function [Static][Public|Private]Sub 子过程名[(参数列表)] 局部变量或常数定义 End Sub （二） 过程的调用 课后习题： 一（1）、（3）、（5）、（6） 二（2）、（3） 三（1）（暂时把Static改成Dim） 三（2） 四（2） 4.2 参数传递（难点！） 两种方式： 按数值传递：形参得到的是实参的值，形参值在过程中 的改变不会影响实参的值。 代码特征：形参前加“ ByVal ”关键字 按地址传递：形参得到的是实参的地址，形参值在过程 中改变的同时也改变实参的值。 代码特征：形参前加“ ByRef ”关键字或什 么都不加。 例：单击Form后的运行结果 Private Sub ss(ByVal x%, ByRef y%, z%) x = x + 1 y = y + 1 z = z + 1 End Sub 过程的作用域（调用规则） 4.3.2 变量的作用域 变量的作用域（调用规则） 若在不同级声明相同的变量名,系统按 局部→模块→全局 次序访问 Public Temp As integer 全局量 Sub Form_Load（） Dim Temp As Integer 局部量 Temp=10 访问局部量 Form1.Temp=20 访问全局变量必须 加窗体名 Print Form1.Temp, Temp End Sub 4.3.3 变量的生存期 课后习题： 一（8） 三（1）、（3） Private x% , y%, z% Private Sub Form_click( ) Dim x as integer x=1 y=2 Call AA(y+1) z=BB(x) Print x,y,z End Sub Private Sub Form_Click() i = i + 1 j = j + 2 Print i; j; k End Sub Form1 Form2 Private Sub Form_Click() k = k + 3 Print i; j; k End Sub Public i%, j%, k% Module1 往往在一个程序里存在多种不同作用域的变量 Public Pa As integer 全局量 Private Mb As string *10 模块级量 Sub F1( ) Dim Fa As integer 局部量 … End Sub Sub F2( ) Dim Fb As Single 局部量 … End Sub Private Sub Command1_Click( ) Dim X As Integer, Y As Integer, Z As Integer X = 2 Y = 3 Z = X + Y Call S Print X, Y, Z End Sub Sub S( ) Dim X As Integer, Y As Integer, Z As Integer X = 1 Y = 2 Z = X + Y Print X, Y, Z End Sub 例 定义：变量从产生到消亡的时间段。 按照生存期的长短变量分两种类型： （1）动态变量：生存期是过程的运行期。 什么样的变量属于动态变量？ 使用Dim在过程中声明的局部变量属于动态变量。 （2）静态变量：生存期是整个程序的运行期。