[单项选择题] 在窗体上画 1 个命令按钮,名称为 Command1,然后编写如下程序:Dim Flag As Boolean Private Sub Command1_Click() Dim int

14 查阅

[单项选择题] 在窗体上画 1 个命令按钮,名称为 Command1,然后编写如下程序:Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox("请输入:")If Flag ThenPrint f(intNum) End IfEnd SubFunction f(X as Integer)As IntegerIf X<10 ThenY=X ElseY=X+10End If f=YEnd FunctionPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X as Single,Y As Single) Flag=TrueEnd Sub 运行程序,首先单击窗体,然后单击命令按钮,在输入对话框中输入5,则程序的输 出结果为______。

A.0

B.5

C.15

D.无任何输出

参考答案:

B

单击窗体在释放鼠标时,将会触发 Form_MouseUp 事件,将 Flag 值置 True,从而允许输出。在 Command1 的 Click 事件中,通过输入框输入 5,并在窗体上输出 f(5),函数 f 的作用是,如果自变量 x<10, 则直接返回 x,否则返回 x+10。故本题应输出 5。

计算机考试