在窗体上画一个名称为CommAnD1的命令按钮，然后编写如下程序： Dim swAsBoolEAnFunCtion FunC(xAs intEgEr)As intEgEr iF x＜20 thEn 　　y=x ElsE 　　y=20+x EnD iF　　FunC=y EnD FunCtionprivAtE suB Form_mousEDownButtonAs intEgEr,_shiFtAs intEgEr，xAs singlE，yAs singlE) sw=FAlsE EnD suBprivAtE suB Form_mousEupButtonAs intEgEr,_shiFtAs intEgEr，xAs singlE，yAs singlE) sw=truE EnD suBprivAtE suBCommAnD1_CliCk() Dim intnumAs intEgEr intnum=inputBox("") iF sw thEn 　　print FunC(intnum) EnD iF EnD suB程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果为
A、输出0
B、输出25
C．输出45
D、无任何输出