VB求注释

来源：百度知道 编辑：UC知道 时间：2024/06/20 02:51:49
Private Function Fn2 (t As Integer)
Static Temp
Temp = Temp + 1
Fn2 =Temp
End Function
Private Sub Form_Click()
For i = 1 To 3
S = Fn2(1)+Fn2(2)+Fn(3)
Print s
Next i
End sub

Fn（i）是什么意思
temp=temp+1
fn(2)是什么意思？
嘿嘿，能写出分析过程我看下吗？谢谢拉

没什么意思，每调用函数一次，返回值就加1，与传入的参数无关。
执行过程：
i=1, Fn2(1)=1,Fn2(2)=2,Fn2(3)=3,S=1+2+3=6,print 6
i=2,Fn2(1)=4,Fn2(2)=5,Fn2(3)=6,S=4+5+6=15,print 15
i=3,Fn2(1)=7,Fn2(2)=8,Fn2(3)=9,S=7+8+9=24,print 24

先帮你分析Fn2
Private Function Fn2 (t As Integer)
Static Temp '变量temp,在整个代码运行期间都能保留使用 Static 语句声明的变量的值,初始为0
Temp = Temp + 1 '赋值,将temp增长1
Fn2 =Temp '返回函数运算结果,
End Function

从上面的函数可以看出,t未参与运算,也就是说,fn2与t 没关系
fn2的结果只是,执行一次运算,值只加1,相当于,记录一下运行次数.

Private Sub Form_Click() 'form单击
For i = 1 To 3 '三次循环
S = Fn2(1)+Fn2(2)+Fn(3) '由上面的分析可知,第一次运行此 句的结果是s =1+2+3=6 ,第2次是s = 4+5+6=15,第3次是 s=7+8+9 = 24
Print s '输出到屏幕
Next i
End sub

所以第一次点击窗体,就是得到输出的内容:
6
15
24
同样,第2次点击的话,还是上面的算法,分别
s =10+11+12 = 33
s= 13+14+15 = 42
s=16+17+18 =51
输出:
33
42
51
再第三次点击的话,你就自己会算了.

Private Function Fn2 (t As Integer) '一个函