下面程序段运行后，z的值是（）。Dimx,yAsIntegerx=3:y=-1SelectCasex，yCase1z=80Case-1z=70CaseElsez=60EndSelect

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

运行下列程序，单击窗体后在窗体上显示的结果是_______。PrivateSubForm_Click()DimxAsInteger,yAsIntegerx=-5y=-4IfNotx>0Thenx=y-1Elsey=x+4EndIfPrintx-yEndsub（5.0分）