vb程序设计教程第三版第三章第6章(2)

变量名 [AS 类型] Static Function 函数过程名([参数列表]) [As 类型] Static Sub 子过程名[(参数列表) ] 注意：过程名前加Static,表示该过程内的局部变量都是 静态变量。

vb程序设计教程第三版第三章

例: 有一个人编了下面一段程序，想用变量n记录单击窗 体的次数。 Private Sub Form_Click() Dim n As Integer n=n+1 Print "已单击次数："; n & "次" " "; " " End Sub 分析程序运行后多次单击窗体的输出结果： 要记录单击窗体次数，如何实现？并比较使用 模块变量和静态变量的差别。

vb程序设计教程第三版第三章

例题：Private Sub Form_Click() Dim i% ,isum% For i = 1 To 5 isum = sum(i) Print isum, , Next i End Sub Private Function sum(n As Integer) Dim j As Integer j=j+n sum = j End Function Static j As Integer

1

2

3

4

5

结果如何？