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

[填空题] 运行下列程序:Dim t As IntegerPrivate Sub Form_Click()  t = 2  x = Val(InputBox("输入一个整数5,第1张

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

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

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

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/zaji/5625522.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2022-12-15
下一篇2022-12-15

发表评论

登录后才能评论

评论列表(0条)

    保存