2. 计算机
  3. 编写如下程序： Private Sub Command1_Click() 　　Dim m As Integer， n As Integer 　　n＝2 　　For m＝1 To 3 　　　　Print proc(n)； 　　Next m End Sub F

编写如下程序： Private Sub Command1_Click() 　　Dim m As Integer， n As Integer 　　n＝2 　　For m＝1 To 3 　　　　Print proc(n)； 　　Next m End Sub F

admin2018-12-20  68
问题 编写如下程序：
Private Sub Command1_Click()
　　Dim m As Integer， n As Integer
　　n＝2
　　For m＝1 To 3
　　　　Print proc(n)；
　　Next m
End Sub
Function proc(i As Integer)
　　Dim a As Integer
　　Static b As Integer
　　a＝a＋1
　　b＝b＋1
　　proc＝a * b＋i
End Function
程序运行后，单击命令按钮Command1，输出结果为(　　)。
选项 A、3　3　3
B、3　4　5
C、3　5　6
D、1　2　3
答案B
解析 变量b定义为Static即静态变量，它的特点是每次调用都会保留上次的值。程序click事件中调用了3次proc(n)，即proc(2)：
    第一次，a＝a＋1＝0＋1＝1， b＝b＋1＝0＋1＝1 ， proc＝a*b＋i＝1*1+2=3;
    第二次，a＝a＋1＝0＋1＝1， b＝b＋1＝1＋1＝2 ， proc＝a*b＋i＝1*2+2=4；
     第三次，a＝a＋1＝0＋1＝1， b＝b＋1＝2＋1＝3 ， proc＝a*b＋i＝1*3+2=5；
     因此输出的结果为3  4  5。
转载请注明原文地址:https://www.kaotiyun.com/show/FkFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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