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