运行下列程序,单击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