若要求显示一个指定窗体,所用的方法是（）。

1.下面程序：Functiona(x)StaticbAsIntegerb=b+x^2PrintbEndFunctionPrivateSubCommand1_Click（）Dimc%c=a(2)EndSub单击两次命令按钮，第二次显示的结果是（）。
2.下面程序的运行结果为（）。Dima%,b%,c%Subp1(x%,y%)DimcAsIntegerx=2x:y=y+2:c=x+yEndSubSubp2(x%,ByValy%)DimcAsIntegerx=2*x:y=y+2:c=x+yEndSubPrivateSubCommand1_Click（）a=2:b=4:c=6Callp1(a,b)Callp2(a,b)Printa;b;cEndSub
3.在窗体上画一个命令按钮(名称为Command1)，并编写如下代码：FunctionFun1(ByValaAsInteger,bAsInteger)AsIntegerDimtAsIntegert=a-bb=t+aFun1=t+bEndFunctionPrivateSubCommand1_Click（）DimxAsIntegerx=10PrintFun1(Fun1(x,(Fun1(x,x-1))),x-1)EndSub程序运行后，单击命令按钮，输出结果是（）。
4.以下是一个能返回数组a中最大数的函数过程代码：Functionmaxval(a（）AsInteger)AsIntegerDimmax%max=1Fori=2To10Ifa(i)>a(max)Thenmax=iNextimaxval=maxEndFunctionPrivateSubCommand1_Click（）Dimx(1To10)AsIntegerFori=1To10x(i)=Int(Rnd（）100)Printx(i);NextiPrintPrintmaxval(x（）)EndSub程序运行时，
5.有如下函数过程：FunctionCys(ByValxAsInteger,ByValyAsInteger)AsIntegerDimquotientsDoWhiley<>0quotients=x/yx=yy=quotientsLoopCys=xEndFunction以下是调用该函数的事件过程，该程序的运行结果是（）。PrivateSubCommand1_Click（）DimaAsIntegerDimbAsIntegera=10b=2x=Cys(a,b)PrintxEndSub
6.有如下函数过程：Functionsecproc(xAsInteger,yAsInteger,zAsInteger)secproc=3y+z+2xEndFunctionPrivateSubCommand1_Click（）DimaAsInteger,bAsInteger,cAsIntegera=2:b=3:c=4Printsecproc(c,b,a)EndSub该程序的运行结果是（）。
7.假定有以下函数过程：FunctionFun(sAsString)AsStringDims1AsStringFori=1ToLen(s)s1=UCase(Mid(s,i,1))+s1NextiFun=s1EndFunction在窗体上添加一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click（）DimStr1AsStringDimStr2AsStringStr1=InputBox(“请输入一个字符串”)Str2=Fun(Str1)PrintStr2EndSub程序运行后，单击命
8.假定有如下的Sub过程：Subfun(xAsSingle,yAsSingle)t=xx=t/yy=tModyEndSub在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click（）DimaAsSingleDimbAsSinglea=6b=4funa,bPrinta,bEndSub程序运行后，单击命令按钮，输出结果为（）。
9.要分配存放如下方阵的数据，正确的且最节约存储空间的数组声明语句是（）。1.12.23.34.45.56.67.78.89.9
10.执行下面程序段后，输出的结果为（）。Dima(10,10)AsIntegerFori=2To4Forj=4To5a(i,j)=i*jNextjNextiPrinta(2,5)+a(3,4)+a(4,5)