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

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

[单项选择题] 在窗体上画 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。