2. 计算机
  3. 有如下程序。 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=P

有如下程序。 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=P

admin2013-04-11  53
问题 有如下程序。
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://kaotiyun.com/show/PEQp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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