有如下事件过程: Function UNC (ByVal x As Integer,ByVal y As Integer) As Integer Do While y<>0 sic=x/y x=y y=sic Loop UNC=x End Function 以下是该函数的调用过程,该程序的运行结果是 PriVate Sub COmmand1_Click() Dim a As Integer Dim b As Integer a=12 b=2 x=UNC (a,B)Print x End Sub
A、
0
B、
6
C、
2
D、
80
【正确答案】
B
【答案解析】
解析:本题考查函数调用和输出格式的语句:调用UNC的过程如下: x=12,y=2时,sic=6,x=2,y=6; x=2 y=6时,sic=0,x=6,y=0; y=o,所以跳出循环,输出x=6外结束程序。 注意:过程的定义和调用。
提交答案
关闭