资源描述：
《第7章vb习题及答案》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、第7章习题与答案一、 选择题1.如下数组声明语句，正确的是（A）Dima[3,4]AsInteger（B）Dima(3,4)AsInteger（C）Dima(n,n)AsInteger（D）Dima(3,4)AsInteger2.要分配存放如下方阵的数据：1.12.23.34.45.56.67.78.89.9数组声明语句能实现（不能浪费空间）的是(A)Dima(9)AsSingle（B）Dima(3,3)AsSingle（C）Dima(-1To1,-5To-3)AsSingle（D）Dima(-3To1,-5To
2、7)AsInteger3.如下数组声明语句：Dima(3,-2To2,5)则数组a包含的元素的个数为（A）120（B）75（C）60（D）134.以下程序Dimaa=Array(1,2,3,4,5,6,7)Fori=Lbound(a)ToUbound(a)a(i)=a(i)*a(i)NextiPrinta(i)输出结果是（A）49（B）0（C）不确定（D）程序出错5.以下程序OptionBase1PrivateSubCommand1_Click()Dima%(3,3)Fori=1To3Forj=1To3Ifj＞1Andi＞1Th
3、ena(i,j)=a(a(i-1,j-1),a(i,j-1))+1Elsea(i,j)=i*jEndIfPrinta(I,j);“”;NextjPrintNextiEndSub输出结果是（A）123（B）123（C）123（D）1112311232462223231233693336.以下程序OptionBase1PrivateSubCommand1_Click()Dima,B(3,3)a=Array(1,2,3,4,5,6,7,8,9)Fori=1To3Forj=1To3B(i,j)=a(i*j)If(j＞=i)ThenPri
4、ntTab(j*3);format(B(i,j),“###”);NextjPrintNextIEndSub输出结果是(A)123(B)1(C)147(D)123456452464678978936997.要存储n个单精度数，下列语句正确的是(A)n=InputBox(“inputn”)(B)Dima()AsSingleDima(1Ton)AsSinglen=InputBox(“inputn”)ReDima(1Ton)(C)Dima()AsInteger(D)Dima(n)AsSinglen=InputBox(“inputn”)R
5、eDima(n)Single8.已知有数组声明：Dima(-1To3,2To5)Asinteger,如下引用数组中的元素，正确的是（A）a(-1,2)（B）a(4)（C）a[-1,2]（D）a(0,6)9.下列有关控件数组与一般控件的区别的叙述中，最合理的是(A) 控件数组一定由多个同类型的控件组成，一般控件只有一个控件；(B)控件数组的Index为0，而一般控件的Index为空；(C)控件数组的Index为1，而一般控件的Index为0；（D）控件数组的建立通过Dim语句声明，而一般控件不必声明。 二、填空题1.矩阵转置矩阵
6、转置就是将一个n×m的矩阵行和列互换。例如矩阵：a=,转置后的矩阵为b=要实现如本例所示的功能，程序如下：OptionBase1PrivateSubCommand1_Click()Dima%(2,3),b(3,2),i%,j%,n%n=5Fori=1To2Forj=1To3(1)n=n+5Printa(I,j);NextjPrintNextiFori=1To3Forj=1To2(2)Printb(i,j);NextjPrintNextiEndSub2.下面的程序是将输入的一个数插入到递减的有序数列中，插入后使该序列仍然有序递减。
7、请在程序中下划线处填入相应的内容。PrivateSubForm_Click()Dima,i%,n%,m%A=Array(19，17，15，13，11，9，7，5，3，1)n=Ubound(A)ReDim(3)m=Val(InputBox(“输入欲插入的数”))Fori=Ubound(a)-1To0Step-1Ifm＞=a(i)Then(4)Ifi=0Thena(i)=mElse(5)ExitForEndIfNextiFori=0ToUbound(A)Printa(i)NextiEndSub3.冒泡法排序在教程中已介绍选择法、合并
8、法排序，上例使用插入法排序，常用的排序方法还有冒泡法。冒泡法排序与选择法排序相似，选择法排序在每一轮排序时找最大（递减顺序）数的下标，出了内循环（一轮排序结束），再交换最大数的位置；而冒泡法排序在每一轮排序时将相邻的数比较，当顺序不对就交换位置，出了内循环，最大
