[单项选择题] 阅读下面的程序； Function Func(x As Integer，y As Integer)As IntegerDim n As IntegerDo While n ＜ = 4

15 查阅

[单项选择题] 阅读下面的程序； Function Func(x As Integer，y As Integer)As IntegerDim n As IntegerDo While n ＜ = 4 x=x + y n = n + 1LoopFunc=x End Function Private Sub Command1_Click()Dim x As Integet, y As IntegerDim n As Integer，z As Integerx=1y=1For n = 1 To 6 z=Func(x，y)Next nPrint z End Sub 程序运行后，单击命令按钮，输出的结果为．

A．16

B．21

C．26

D．31

参考答案:

D解析：[分析]：过程Func有两个参数，使用的是引用方式，参数和返回值均为整型，在命令按钮事件过程的For循环中调用Func过程，共循环6次，每次循环调用一次。两个过程中使用的变量 (包括参数)基本相同，但由于是局部变量，不会发生冲突。无论在事件过程还是通用过程中， y的值始终保持不变，总等于1。在Func过程中， Do Loop循环共执行5次，通过变量n控制(从 0～4)，每次都执行x=x+1，因此，每调用一次 Func过程，都使得x=x+5，并将返回值赋给事件过程中的变量z。6次调用中，循环变量n

计算机考试