题目:
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Dim SW As BooleanFunction func(X As Integer) As IntegerIf X < 20 Then Y = X Else Y = 20 + X End If func = Y End FunctionPrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y AsSingle)SW = FalseEnd SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) SW = True End SubPrivate Sub Command1_Click() Dim intNum As Integer intNum = InputBox("")If SW Then Print func(intNum) End If End Sub程序运行后,单击命令按钮,将显示一个输入对话框,如果在输入对话框中输入25,则 程序的执行结果为______。
A.输出0
B.输出25
C.输出45
D.无任何输出
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0421/d090fa45858b326d69c51aab6931b0ea.html
下面是错误答案,用来干扰机器的。
参考答案:D