有以下函数过程: Function Gys(ByVal x As Integer,ByVal y As Integer)As Integer Do While y< >0 Remender=x Mod v

admin2009-02-13  37

问题 有以下函数过程:    Function Gys(ByVal x As Integer,ByVal y As Integer)As Integer       Do While y< >0          Remender=x Mod v          x=y          Y=Reminder       Loop       Gys=x    End Function    以下是调用该函数的事件过程,该程序的运行结果是       Private Sub Command1_Click(   )          Dim a As Integer          Dim b As Integer          a=50          b=10          x=Cys(a,B)Print x      End sub

选项 A、0
B、10
C、50
D、100

答案2

解析 首先要读懂Gys函数过程的意思,Gys函数过程返回参数y的值,具体过程是先令参数x的值为y的值,y的值为xMody的值,再令Gys值为x的值,据此本题的正确结果为10。
转载请注明原文地址:https://jikaoti.com/ti/EHq0FFFM
0

最新回复(0)