运行下列程序: 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=3
主观题
运行下列程序: 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=3