运算机二级数组节节真题

1、数组大纲要求：1 .数组的概念：数组的概念；静态数组和动态数组。2 .数组的大体操作：数组元素的输入、输出和复制；ForEach-Nextl;数组的初始化。3 .控件数组。1 .(2007年4月、15)一个二维数组能够寄存一个矩阵。在程序开始有语句OptionBascO,则下面概念的数组中正好能够寄存一个4X3矩阵(即只有12个元素)的是()。A)Dima(-2To0,2)AsIntegerB)Dima(3,2)Aslntc：rC)Pima(4,3)AsIntegerD)Dima(-lTo-4,-1To-3)AsInteger2. (2008年4月、14)以下数组概念语句中，错误的是()。A)

2、 Statica(10)AsIntegerB) Dimc(3,lTo4)C) Dimd(-10)D) Dimb(0To5,1To3)AsInteger3. (2005年4月、31)在窗体上画一个各称为Commandl的命令按钮，然后编写下列事件进程：OptionBase1PrivateSubCommandl_Click()DimcAsInteger,dAsIntegerd=0c=6x=Array(2,4,6,8,10,12)Fori=1To6Ifx(i)cThend=d+x(i)c=x(i)Elsed=d-cEndIfNext1PrintdEndSub程序运行后，单击命令按钮，则在窗体上输出的

3、内容为()。A)10B)16C)12D)204. (2005年9月、24)在窗体上画一个命令按钮，其占称为Commandl,然后编写下列事件进程：PrivateSubCommandl_Click()Dimal(4,4),a2(4,4)Fori=lTo4Forj=lTo4al(i,j)=i+ja2(i,j)=al(i,j)+i+jNextjNextiPrintal(3,3)2(3,3)EndSub程序运行后，单击命令按钮，在窗体上输出的是()oA)66B)105C)721D)6125. (2005年9月、25)有下列事件进程：OptionBase1PrivateSubForm_Click()Pi

4、marr,sumSum=0arr=Array(l,3,5,7,9,11,13,15,17,19)Fori=lTo10lfarr(i)/3=arr(i)3ThenSum=Sum+arr(i)EndIfNextiPrintSumEndSub程序运行后，单击窗体，输出结果为()0A)25B)26C)27D)286. (2005年9月、26)在窗体上有一个命令按钮，然后编写下列事件进程：PrivateSubCommandl_Click()Dima(5)AsStringFori=lTo5a(i)=Chr(Asc(MAH)+(i-l)NextiForEachbInaPrintb;NextEndSub程序运

5、行后，单击命令按钮，输出结果是()。A)ABCDEB)12345C)abedeD)犯错信息7. (2005年4月、28)在窗体上画一个名称为Labull的标签，然后编写下列事件进程:PrivateSubForm_CHckQDimarr(10,10)AsIntegerDimiAsInteger,jAsIntegerFori=2To4Forj=2To4arr(i,j)=j*jNextjNextiLabel1.Caprion=Str(arr(22)+arr(3,3)EndSub程序运行后，单击窗体，在标签中显示的内容是（）0A)12B)13C)14D)158. (2006年9月、22)在窗体上画一个

6、各称为Commandl的命令按钮，然后编写如下程序:PrivateSubCommand】.Click。DimiAsIntegerjAsIntegerDima(10,10)AsIntegerFori=lTo3Forj=lTo3a(i,j)=0-l)*3+jPrinta(i,j);NextjPrintNextiEndSub程序运行后，单击命令按钮，窗体上显示的是（）。A)123B)234C)147P)1232463452584563694563697899. (2006年9月、23)在窗体上画一个命令按钮，名称为Command1,然后编写如下代码：OptionBase0PrivateSubComm

7、and1.Click。DimA(4)Aslntcger,B(4)AsIntcrrFork=0To2A(k+l)=InputBox。请输入一个整数。B(3-k)=A(k+l)NextkPrintB(k)Endsub程序运行后，单击命令按钮，在输入对话框中别高输入二、4、6,输出结果为A) 0B) 2C) 3D) 410. (2006年9月、24)有以下程序：OptionBase1DimarrQAsIntegerPrivateSubForm_ClickQDimiAsInteger4AsIntegerReDimarr(3,2)Fori=lTo3Forj=lTo2arr(i,j)=i*2+jNextj

8、NextiReDimPresencearr(3,4)Forj=3To4arr(3,j)=j+9NextjPrintarr(3,2);arr(3,4)EndSub程序运行后，单击窗体，输出结果为（）0A) 8 13B) 013C) 7 12 D) 0011. （2007年4月、33）在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件迸程OptionBase1PrivateSubCommand1.Click。Dima(5,5)AsIntegerFori=lTo5Forj=lTo5a(i,D=(i+j)*510NextjNextis=0Fori=lTo5s=s+a(i,i)NextiP

9、rintsEndSub程序运行后，单击命令按钮，输出结果是()。A)15B)13C)11D)912. (2(X)7年4月、35)在窗体上画两个命令按钮，名称别离为Command一、Command?,并编写如下程序Constn=5,m=4Hima(m,n)PrivateSubCommandl_ClickQk=lFori=lTomForj=lTona(i,j)=kk=k+lNextjNextiEndSubPrivateSubC(mmand2_ClickQsumm=0Fori=lTomForj=lTonlfi=lOri=mThensumm=summ+a(ij)ElseIfj=lOrj=nThensu

10、mm=summ+a（i,j）EndIfEndIfNextjNextiPrintsummEndSub进程CommandLClickO的作用是在二维数组a中寄存一个m行n列的矩阵；进程Command2_Click（）的作用是（）。A）计算矩阵外围一康元素的累加和B）计算矩阵外围一圈之外的所有元素的累加和C）计算矩阵第1列和最后一列元素的累加和D）计算矩阵第1行和聚后一行元素的累加和13. （2007年9月、21）若窗体中巳经有若干个不同的单选按钮，要把它们改成一个单选按钮数组，在属性窗口中需要且只需要进行的操作是（）。A）把所有单选按钮的Index属性改成相同值B）把所有单选按钮的Index属性改

11、成持续的不同值C）把所有单选按钮的Caption属性值改成相同D）把所有单选按钮的名称改成相同，且把它们的Index属性改成持续的不同值14. （2005年4月、25）成立一个名为Command1的命令按钮数组，则下列说法中错误的是（）。A）数组中每一个命令按钮的名称（Name属性）均为Command1B）数组中每一个命令按钮的题目（Caption属性）都一样C）数组中所有命令按钮能够利用同一个事件进程D）用名称Command1（下标）能够访问数组中的每一个命令按钮15. （2006年4月、24）齿体上出名称为Tuxl、Tcxt2两个文本框，有一个由3个单选按钮组成的控件数组OpHonl,如图

12、1所示。程序运行后，若是单击某个单选按钮，则执行Tuxtl中的数值与该单选按钮所对应的运算（乘以一、10或100）,并将结果显示在Tuxt2中，如图2所示，为了实现上述功能，在程序中的问号(?)处应埴入的内容是()o囱1图2PrivateSub()pti()nl_Click(IndcxAsIntcgrr)lf,mThenSelectCase?Case0=ValCase 1=Vai*10Case 2=Val*100EndSelectEndIfEndSubA)IndexB)C)Optit)nl(Index)D)Optioiil(Indcx).Valuc16. (2006年4月、25)在窗体上画一个

13、命令按钮，其名称为Commandl,然后编写如下程序：PrivateSubCommand1.Click。Dima(10)AsIntcgrrDimxAsIntegerFori=lTo10a(i)=8+iNextx=2Printa(f(x)+x)EndSubFunctionf(xAsInteger)x=x+3f=xEndFunction程序运行后，单击命令按钮，输出结果为()A)12B)15C)17D)1817. (2007年9月、27)下面程序执行时，在窗体上显示的是()。PrivateSubCommandl_ClickQDima(10)Fork=1To10a(k)=11-kNextkPrint

14、a(a(3)a(7)Moda(5)EndSubA)3B)5C)7D)918. (2008年4月、34)某人编写了如下程序，用来求10个整数(整数从键盘输入)中的最大值：PrivateSubCommandl_Click()Dima(10)AsInteger,maxAsIntegerFork=1To10a(k)=InputBox。输入一个整数1)Nextkmax=0Fork=1To10Ifa(k)maxThenmax=a(k)EndIfNextkPrintmaxEndSub运行程序时发觉，当输入10个正数时，能够取得正确结果，但输入10个负数时结果是错误的。程序需要修改。下面的修改中能够取得正确运

15、行结果的是（）。A）把lfa（k）maxThun改成Ifa（k）maxTheB）把max=a（k）改成a（k）=maxC）把第2个循环语句Fcrk=lTdO改成Frk=2TclOD）把max=0改成max=a（10）19. （2008年4月、35）已知在4行3列的全局数组scor4,3）中寄存了4个学生3门课程的考试成绩（均为整数），现需要计算每一个学生的总分，某人编写程序如下：OptionBase1PrivateSubCommand1Click。DimsumAsIntegersum=0Fori=1To4Forj=1To3sum=sum+score。,j）NextjPrint第“&i&”个学生

16、的总分是：;sumNextiEndSub运行此程序时发觉，除第1个人的总分计算正确外，其他人的总分都是错误的，程序需要修改。以下修改方案中正确的是（）。A）把外层循环语句Fori=1T。4改成Fori=1To3内层循环语句Forj=1To3改成Forj=1To4B）把sum=0移到Fori=1To4和Forj=1To3之间C)把sum=sum+scoru(i,j)改成sum=sum+scorc(j4)r)把sum=sum+scoru(i,j)改成sum=scorc(ij)20. (2008年9月、30)在窗体上画一个名为Command1的命令按钮，然后编写如下代码:OptionBase1Pri

17、vateSubCommandl_Click()Dimaa=Array(l,2,3,4)i=iFori=4To1Step-1s=s+a(i)*j一产10NextiPrintsEndSub运行上面的程序，其输出结果是()oA)1234B)12C)34D)432121. (2005年4月、10)有下列程序：OptionBase1PrivateSubCommandl_Click()DimarrlDimMinAsInteger,iAsIntegerarrl=Army(12,435,76,-24,78,54,866,43)Min=Fori=2To8Ifarrl(i)MinThenNextiPrint”最小值是:“MnEndSub以上程序的功能是：用Array函数成立一个含有8个元素的数组，然后查找并输出该数组中各元素的是小值。请埴空。22. (2006年4月、7)在窗体上画一个命令按钮，其名称为Commandl,然后编写如下事件进程：PrivateSubCommandl_