第八章--子过程与函数过程#3.pptVIP

第八章 ;本章内容及要求; （1）窗体事件过程 Private Sub Form_事件名(参数列表) ＜语句组＞ End Sub （2）控件事件过程 Private Sub 控件名_事件名(参数列表) ＜语句组＞ End Sub;;[Public|Private][Static] Sub 子过程名([形参表]) 局部变量或常数定义 ＜语句组＞ [Exit Sub] ＜语句组＞ End Sub ;例1: 编一个交换两个整型变量值的子过程。 Private Sub Swap( X As Integer, Y As Integer) 　　Dim temp As Integer 　Temp=X X=Y Y=Temp End Sub ;例2：编写求阶乘的子过程。 Private sub fact(n As Integer,f as Double) Dim i As Integer f = 1 For i = 1 To n f = f * i Next End sub;;方法一： Call 子过程名(参数列表) 方法二：子过程名 [参数列表] 说明： (1)参数列表称为实参或实元，它必须与形参保持个数相同，位置与类型一一对应。 (2)调用时把实参值传递给对应的形参。 其中值传递（形参前有ByVal