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