有如下函数过程：FunctionCys(ByValxAsInteger,ByValyAsInteger)AsIntegerDimquotientsDoWhiley<>0quotients=x/yx=yy=quotientsLoopCys=xEndFunction以下是调用该函数的事件过程，该程序的运行结果是（）。PrivateSubCommand1_Click（）DimaAsIntegerDimbAsIntegera=10b=2x=Cys(a,b)PrintxEndSub
有如下函数过程：FunctionCys(ByValxAsInteger,ByValyAsInteger)AsIntegerDimquotientsDoWhiley<>0quotients=x/yx=yy=quotientsLoopCys=xEndFunction以下是调用该函数的事件过程，该程序的运行结果是（）。PrivateSubCommand1_Click（）DimaAsIntegerDimbAsIntegera=10b=2x=Cys(a,b)PrintxEndSub
A.0
B.25
C.5
D.100
正确答案：C
Tag：VisualBasic程序设计 函数 过程
时间：2021-05-06 20:07:28
- 上一篇：有如下函数过程：Functionsecproc(xAsInteger,yAsInteger,zAsInteger)secproc=3y+z+2xEndFunctionPrivateSubCommand1_Click（）DimaAsInteger,bAsInteger,cAsIntegera=2:b=3:c=4Printsecproc(c,b,a)EndSub该程序的运行结果是（）。
- 下一篇：以下是一个能返回数组a中最大数的函数过程代码：Functionmaxval(a（）AsInteger)AsIntegerDimmax%max=1Fori=2To10Ifa(i)>a(max)Thenmax=iNextimaxval=maxEndFunctionPrivateSubCommand1_Click（）Dimx(1To10)AsIntegerFori=1To10x(i)=Int(Rnd（）100)Printx(i);NextiPrintPrintmaxval(x（）)EndSub程序运行时，