填空题

运行下列程序,单击Command1命令按钮后,则在窗体上显示第一行和第二行的结果分别是 (14) (15)
Private Sub Command1_Click( )
t=1:x=2:y=3:z=4
If t>0 Or t=x And x<>y Or y>z Then
t=fun1(t,z)
Print t
Else
t=fun1(x,y)
Print t
End If
Print x
Print y
End Sub
Function fun1(ByVal x As Integer,ByVal y As Integer)
As Integer
Do While y<>0
t=x\y
x=y
y=t
Loop
fun1=x
End Function

【参考答案】

D
相关试题