有如下程序: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;

admin2009-01-15  36

问题 有如下程序: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 opEnd SubPrivate 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=mEnd Function程序运行后,输出的结果为

选项 A、4  6
B、6  6
C、8  8
D、10  12

答案4

解析 在Sub过程中,程序段先定义了3个Integer 型变量k,m,op,并给 k 赋给初值4,m的初值为1,然后调用事件过程PPC,并将它的值赋给op;在事件过程PPC中定义了两个形参,参数的传送是通过引用实事,即将k,m的地址作为a,b的地址;在PPC中,将m,I定义为静态变量,第一次调用后的值仍然保留,但是m,I分别都有赋值语句,将它们的值变为0,2,所以返回值不变。注意:过程的定义和调用,以及参数传递方式的选择。
转载请注明原文地址:https://jikaoti.com/ti/3R80FFFM
0

最新回复(0)