编写如下程序：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10ThenPrintx,yExitDoElsex=x+3EndIfLoopWhilex<=10EndSub运行程序，输出结果为______。（5.0分）
编写如下程序：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10ThenPrintx,yExitDoElsex=x+3EndIfLoopWhilex<=10EndSub运行程序，输出结果为______。（5.0分）
1