[填空题] 运行下列程序： Dim t As Integer Private Sub Form_C1ick( ) t=2 x=Val(InputBox("输入一个整数5"

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

Dim t As Integer

Private Sub Form_C1ick( )

t=2

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

Print funl(x)；t

End Sub

Private Function funl(v)

If y＞0 Then

fun1=1:t=10

Else If y=0 Then

fun1=0:t=20

Else

fun1=-1:t=30

End If

End Function

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