编写如下程序：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10ThenPrintx,yExitDoElsex=x+3EndIfLoopWhilex<=10EndSub运行程序，输出结果为______。（5.0分）
举一反三
- 编写如下程序： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 1: y = 1 Do y = x * y If y > 10 Then Print x, y Exit Do Else x = x + 3 End If Loop While x <= 10 End Sub 运行程序，输出结果为______
- 在窗体中添加一个命令按钮Command1，并编写如下程序： PrivateSubCommand1_Click() x=InputBox(x) Ifx^2=9Theny=x Ifx^2<9Theny=1/x Ifx^2>9Theny=x^2+1 Printy EndSub 程序运行时，单击命令按钮，在InputBox中输入3，然后单击“确定”按钮，程序的运行结果为（）。
- 写出下列程序的运行结果 void main() { int x=10,y=10; Console.WriteLine("x={0},y={1}",x--,--y); }
- 假定有如下的Sub过程： Subfun(xAsSingle,yAsSingle) t=x x=t/y y=tMody EndSub 在窗体上画一个命令按钮，然后编写如下事件过程： PrivateSubCommand1_Click() DimaAsSingle DimbAsSingle a=6 b=4 funa,b Printa,b EndSub 程序运行后，单击命令按钮，输出结果为（）。
- 有一个函数： y=x (x[1) y=2x-1 (1<=x<10) y=3x-11 (x]=10) 写一段程序，输入x，输出y。