2. 计算机
  3. 有如下 函数过程: Function gys(By Val x As Integer, ByVal y As Integer) As Integer Do While y0 preminder=x / y x=Y y=preminder Loo

有如下 函数过程: Function gys(By Val x As Integer, ByVal y As Integer) As Integer Do While y0 preminder=x / y x=Y y=preminder Loo

admin2010-11-20  27
问题 有如下 函数过程:
Function gys(By Val x As Integer, ByVal y As Integer) As Integer
Do While y<>0
preminder=x / y
x=Y
y=preminder
Loop
gys=x
End Function
以下是调用该函数的事件过程,该程序的运行结果是【  】。
Private Sub Command1_Click
Dim a As Integer,b As Integer
a=10:b=2
x=gys(a,b)
Print x
End Sub
选项
答案5
解析 本题的难点是Do While匧oop循环控制问题。y=2、5、0.4的过程中,最后x=5。
转载请注明原文地址:https://jikaoti.com/ti/b9g0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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