[单项选择题] 有如下程序。
Private Sub Command1_Click()
Dim k As Integer,m As Integer
Dim op As Integer
k=4:m=1
Op=PPC(k,m):Print op;
Op=PPC(k,m):Print op
End Sub
Private Function PPC(a As Integer,b As Integer)
Static m As Integer,i As Integer
m=0:i=2
i=i+m+1
m=i+a+b
PPC=m
End Function
程序运行后,输出的结果为
A.4 6
B.6 6
C.8 8
D.10 12
正确答案:C
参考解析:[命题目的] 考查考生对函数及函数参数的运用。[解题要点] 在Sub过程中,程序段先定义了3个 Integer型变量k,m,op,并给k赋给初值4,m的初值为 1,然后调用事件过程PPC,并将它的值赋给op;在事件过程PPC中定义了两个形参,参数的传送是通过引用实参,即将k,m的地址作为a,b的地址;在PPC中,将 m,i定义为静态变量,第一次调用后的值仍然保留,但是m,i分别都有赋值语句,将它们的值变为0,2,所以返回值不变。[错解分析] 函数PPC中的两个参数都是以传值方式传递,注意不要与传地址方式传递混淆。[考点链接] 过程的定义和调用,以及参数传递方式的选择。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)