![[单项选择题] 阅读下面的程序； Function Func(x As Integer，y As Integer)As IntegerDim n As IntegerDo While n ＜ = 4](http://www.mshxw.com/aiimages/31/481676.png "[单项选择题] 阅读下面的程序； Function Func(x As Integer，y As Integer)As IntegerDim n As IntegerDo While n ＜ = 4")
[单项选择题] 阅读下面的程序； 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
