手工成形时锤击线与弯曲基准线（）是产生筒形构件歪斜的主要原因。

A、交叉垂直

B、交叉

C、不垂直

D、不平行

运行下列程序：
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，输出的结果是______。