2. 计算机
  3. 有如下函数过程： Function Fun(By Val x As Ingeger，ByVal y As Integer)As Integer 　　Do While…Y＜＞0 　　　　reminder=x Mod Y 　　　　x=y

有如下函数过程： Function Fun(By Val x As Ingeger，ByVal y As Integer)As Integer 　　Do While…Y＜＞0 　　　　reminder=x Mod Y 　　　　x=y

admin2012-03-22  33
问题 有如下函数过程：    Function Fun(By Val x As Ingeger，ByVal y As Integer)As Integer    　　Do While…Y＜＞0    　　　　reminder=x Mod Y    　　　　x=y    　　　　y=reminder    　　Loop    　　Fun=X    End Function    以下是调用该函数的事件过程，该程序的运行结果是    Private Sub Command1_Click()    Dim a As Integer    Dim b As Integer    　　a=100:b=25    　　x=Fun(a,b)    　　Print x    End Sub   
选项 A、0
B、25
C、50
D、100
答案B
解析
转载请注明原文地址:https://kaotiyun.com/show/QHhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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