【单选题】有如下函数过程: Function Fun(By Val x As Integer,By Val y As Integer)As Integer Do While Y<>0 reminder=x Mod y x=y y=reminder Loop Fun=x End Function 以下调用函数的事件过程,该程序的运行结果是 Private Sub Command7_Click() Dim a ...
【单选题】有如下函数过程: 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...
【简答题】有如下函数过程。 Function UNC(ByVal x As Integer,ByVal y As Integer)As Integer Do While y<>0 S=x/y x=y y=S Loop UNC=x End Function 以下事件调用该函数,程序运行结果是【 】。 Private Sub Command1_Click() Dim a As Integer Dim b As ...