有如下程序: Private Sub Command1_Click() Dim k As Integer,m As Integer Dim op As Integer   k=4:m=1   op=PPC(k,m):Print

admin2012-03-22  31

问题 有如下程序:    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中的两个参数都是以传值方式传递,注意不要与传地址方式传递混淆。
   [考点链接] 过程的定义和调用,以及参数传递方式的选择。
转载请注明原文地址:https://jikaoti.com/ti/B6O0FFFM
0

随机试题
最新回复(0)