End SubPrivate Sub Command1_Click0a=a+5:b=b+5:x=x+5y=y+5Print a;b;x;yEnd Sub运行程序，单击窗体上的命令按钮，则在窗体上显示的是一。A、55155B、751525C、78155D、75155【答案】D【解析】程序在模块文件中定义×为整型全局变量，在整个工程中都起作用，而y定义为整型私有变量，只能在本模块中起作用。在窗体文件中变量在本窗体文本中起作用，窗体加载事件中定义的变量b和没有声明的变量y,只在本事件过程起作用。程序窗体加载时，对后边有影响的变量值为a为2，x为10，没有指定初值的变量默认为0，因此单击命令按钮后，a=a+5=7,b=b+5=5,x=x+5=15,y=y+5=5,结果输出75155。3、设有如下Command1的单击事件过程及fun过程：Private Sub Command1_Click0Dim x As Integerx=Val(InputBox("请输入一个整数")fun(x)End SubPrivate Sub fun(x As Integer)If x Mod 2=0 Then fun(x/2)Print x;End Sub