2. 计算机
  3. 阅读下面的程序； Function Func(x As Integer，y As Integer)As Integer Dim n As Integer Do While n ＜ = 4 x=x + y

阅读下面的程序； Function Func(x As Integer，y As Integer)As Integer Dim n As Integer Do While n ＜ = 4 x=x + y

admin2009-02-13  81
问题 阅读下面的程序；    Function  Func(x As Integer，y As Integer)As Integer       Dim n As Integer       Do While n ＜ = 4          x=x + y          n = n + 1       Loop       Func=x    End Function    Private Sub Command1_Click()       Dim x As Integet, y As Integer       Dim n As Integer，z As Integer       x=1       y=1       For n = 1 To 6          z=Func(x，y)       Next  n       Print z    End Sub    程序运行后，单击命令按钮，输出的结果为．
选项 A、16
B、21
C、26
D、31
答案8
解析 过程Func有两个参数，使用的是引用方式，参数和返回值均为整型，在命令按钮事件过程的For循环中调用Func过程，共循环6次，每次循环调用一次。两个过程中使用的变量 (包括参数)基本相同，但由于是局部变量，不会发生冲突。无论在事件过程还是通用过程中， y的值始终保持不变，总等于1。在Func过程中， Do Loop循环共执行5次，通过变量n控制(从 0～4)，每次都执行x=x+1，因此，每调用一次 Func过程，都使得x=x+5，并将返回值赋给事件过程中的变量z。6次调用中，循环变量n的计算过程为：1、2、3、4、5、6：返回值z的结果为：6、11、16、21、26、31。
转载请注明原文地址:https://kaotiyun.com/show/7z1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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