运行下列程序，单击窗体后在窗体上显示的结果是_______。PrivateSubForm_Click()DimxAsInteger,yAsIntegerx=-5y=-4IfNotx>0Thenx=y-1Elsey=x+4EndIfPrintx-yEndsub（5.0分）
举一反三
- 运行以下程序，第二次单击窗体后，窗体上显示（）。PrivateSubForm_Click()Dimx%Staticy%Form1.Clsx=x+3y=y*x+2Printx&","&yEndSub
- 运行以下程序，单击命令按钮Command1，窗体上显示（）。PrivateSubpt(ByValx%,ByRefy%)x=x+2y=y+3EndSubPrivateSubCommand1_Click()Dimx%,y%x=1:y=2Callpt(x,y)Form1.Printx;yEndSub
- 在窗体上添加1个按钮Button1，然后编写Click事件代码： Dim x As Short = -1 Dim y As Single If x <= 0 Then y = x ^ 2 Else y = x End If Label1.Text = y.ToString 程序运行后，单击按钮，窗体上显示的是
- 编写如下程序：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10ThenPrintx,yExitDoElsex=x+3EndIfLoopWhilex<=10EndSub运行程序，输出结果为______。（5.0分）
- 有如下程序代码：PrivateSubForm_Click()X=8IfX8ThePritX8ElseIfX10ThePritX10ElseIfX=8ThePritX=8EdIfEdSub运行程序，单击窗体，输出结果是________。