资源描述：
《计算机二级VB数组和自定义类型练习题及答案.docx》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、2012年计算机二级VB数组和自定义类型练习题及答案计算机等级考试网更新：2011-12-30编辑：evans6.以下程序代码将任意一组数存入数组，从键盘接收一数据，将其插入数组中，插入的位置也从键盘接收。DimA()PrivateSubForm_Click()N=InputBox("数据个数:")N=N+1&,nbsp。__【11】__ForI=1ToN-1A(I)=Val(InputBox("原数据:"))NextID=Val(InputBox("插入的数据:"))P=Val(InputBox("插入的位置:"))DoWhileP>NOrP<1MsgBox"位置越界!"8/8P=V
2、al(InputBox("插入的位置:"))LoopForI=NToP+1Step-1A(I)=A(I-1)NextIA(P)=DForI=1ToNText1.Text=Text1.Text&Str(A(I))&""NextIEndSub7.设在窗体上有一个文本框Text1，一个标签数组Label1，共有10个标签，以下程序代码实现在单击任一个标签时将标签的内容添加到文本框现有内容之后。PrivateSubLabell_Click(IndexAsInteger)Text1.Text=_【12】_Text1.Text&Labell(Index).Caption__EndSub8/88.设
3、工程中有两个窗体Form1、Form2，一个规范模块Module1，设在Form2的代码中定义了以下过程：Subaaa(x,y,z)z=x^2+y^2EndSub 在Mobule1中定义了以下过程：Subbbb(x,y,z)z=x^3+y^3EndSub 在Form1中单击命令按钮Commandl时，调用以上过程计算两个数的平方和与立方和。并分别将结果显示在文本框Text3和Text4中，请在以下程序段中写出相应的调用语句。PrivateSubCommandl_Click()a=val(Text1.Text)b=val(Text2.Text)Call__【13】__8/8Text3
4、.Text=cl__【14】__Text4.Text=c2EndSub9.设有如下程序PrivateSubForm_Click()DimaAsInteger,bAsIntegera=20:b=50P1a,bp2a,bp3a,bPrint"a="。a,"b="。bEndSubSubp1(xAsInteger,ByValyAsInteger)x=x+108/8y=y+20EndSubSubp2(ByValxAsInteger,yAsInteger)x=x+10y=y+20EndSubSubp3(ByValxAsInteger,ByValyAsInteger)x=x+10y=y+20EndS
5、ub 该程序运行后，单击窗体，则在窗体上显示的内容是：a=_【15】___和b=__【16】__。10.设有程序OptionBase1PrivateSubCommand1_Click()Dimarr1,MaxasInteger8/8arr1=Array(12,435,76,24,78,54,866,43)__【17】___=arr1(1)Fori=1To8Ifarr1(i)>MaxThen_【18】_NextiPrint"最大值是："；MaxEndSub 以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。11.设有如下程序：O
6、ptionBase1PrivateSubCommand1_Click()Dimarr1DimMinAsInteger,iAsIntegerarr1=Array(12,435,76,-24,78,54,866,43)Min=__【19】__8/8Fori=2To8Ifarr1(i)NextiPrint"最小值是："。MinEndSub 以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数 组中各元素的最小值。请填空。2012年计算机二级VB数组和自定义类型练习题及答案计算机等级考试网更新：2011-12-30编辑：evans参考答案一、单选题1234567
7、89101112131415BCBBAABBBBCACDA161718192021222324252627282930BAABDACBCACDCAC313233343536373839404142434445DADCCCABDCCDAAD8/8二、填空题【1】a(j,k)=i【2】PrintTab(j*3)。a(i,j)。【3】Print【4】Preservea(n+1)【5】a(i+1)=a(i)【6】a(i+1)=m【7】t=a(j)【8】
