[填空题] 运行下列程序： Dim t As Integer Private Sub Form

[填空题] 运行下列程序：

Dim t As Integer

Private Sub Form_Click()

　　t = 2

　　x = Val(InputBox("输入一个整数5"))

　　Print fun1(x); t

End Sub

Private Function fun1(y)

　　If y ＞ 0 Then

　　　　fun1 = 1: t = 10

　　ElseIf y = 0 Then

　　　　fun1 = 0: t = 20

　　Else

　　　　fun1 = -1: t = 30

　　End If

End Function

从键盘为变量x输入数据5，输出的结果是______。

1 10