在窗体上画1个命令按钮，名称为CommAnD1，然后编写如下程序：
Dim FlAgAsBoolEAn
privAtE suBCommAnD1_CliCk()
Dim intnumAs 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_mousEupButtonAs intEgEr,shiFtAs intEgEr,x As singlE,yAs singlE)
FlAg=truE
EnD suB
运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为()。
A．0
B、5
C．15
D．无任何输出