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