![[填空题] 运行下列程序:Dim t As IntegerPrivate Sub Form_Click() t = 2 x = Val(InputBox("输入一个整数5,第1张 [填空题] 运行下列程序:Dim t As IntegerPrivate Sub Form_Click() t = 2 x = Val(InputBox("输入一个整数5,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E8%BF%90%E8%A1%8C%E4%B8%8B%E5%88%97%E7%A8%8B%E5%BA%8F%EF%BC%9ADim+t+As+IntegerPrivate+Sub+Form_Click%28%29%E3%80%80%E3%80%80t+%3D+2%E3%80%80%E3%80%80x+%3D+Val%28InputBox%28%26amp%3Bquot%3B%E8%BE%93%E5%85%A5%E4%B8%80%E4%B8%AA%E6%95%B4%E6%95%B05.png)
[填空题] 运行下列程序:
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
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)