(39)编写如下程序: Private Sub Commandl_Click() Dim m As Integer,n As Integer n=2 For m=l To 3

admin2020-06-30  31

问题 (39)编写如下程序:
    Private Sub Commandl_Click()
          Dim m As Integer,n As Integer
          n=2
          For m=l To 3
             Print proc(n);
          Next m
    End Sub
    Function proc(i As Integer)
          Dim a As Integer
          Static b As Integer
          a=a+l
          b=b+l
          proc=a*b+i
    End Function
    程序运行后,单击命令按钮Commandl,输出结果为(     )。

选项 A、3 3 3
B、3 4 5
C、3 5 6
D、l 2 3

答案B

解析 变最b定义为Static!即静态变量,它的特点是每次调用都会保留上次的值。程序click事件中调用了3次proc(n),即pmc(2): 第一次,a=a+l=0+1=l,b=b+1=O+l=1.proc=a*b+i=1*1+2=3:第二次,a=a+l=0+l=1,b=b+1=1+1=2.proc=a*b+i=1*2+2=4:第三次,a=a+1=O+1:l,b=b+1=2+1=3,proc=a*b+i=1*3+2=5:因此输出结果为3 4 5。
转载请注明原文地址:https://jikaoti.com/ti/TmS0FFFM
0

相关试题推荐
最新回复(0)