[填空题] 运行下列程序： 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

推荐题目

• ●    [单项选择题] 以下程序运行时，单...
• ●    [单项选择题] 在窗体上有一个文...
• ●    [单项选择题] 下列概念中，______...
• ●    [填空题] 设有如下程序： Private...
• ●    [单项选择题] 下面的程序运行时，...
• ●    [填空题] 在名称为Form1的窗体上...
• ●    [填空题] 本程序的功能是,按"年/...
• ●    [单项选择题] 下列哪条语句是错...

相关标签