vb数组单元试卷

整理文档很辛苦,赏杯茶钱您下走!

免费阅读已结束,点击下载阅读编辑剩下 ...

阅读已结束,您可以下载文档离线阅读编辑

资源描述

数组一、选择题1.用下面的语句所定义的数组的元素个数是()Dima(-3to5)asintegerA)6B)7C)8D)92.用下面的语句所定义的数组的元素个数是()Dimarr(3to5,-2to2)A)20B)12C)15D)243.在窗体上画一个命令按钮(其name属性为command1),然后编写如下代码:Privatesubcommad1_click()Dimarr1(10)asinteger,arr2(10)asintegerN=3Fori=1to5Arr1(i)=iArr2(n)=2*n+iNextiPrintarr2(n);arr1(n)Endsub程序运行后,单击命令按钮其输出结果为()A)113B)311C)133D)3134.在窗体上画一个命令按钮(其name属性为command1),然后编写如下代码:Optionbase1Privatesubcommand1_click()Dima(10)asinteger,p(3)asintegerK=5Fori=1to10A(i)=iNextiFori=1to3P(i)=a(i*i)NextiFori=1to3K=k+p(i)*2NextiPrintkEndsub运行程序后,单击命令按钮,其输出结果为()A)5B)28C)33D)35.在窗体上画一个命令按钮(其name属性为command1),然后编写如下代码:Optionbase1Privatesubcommand1_click()DimaA=array(1,2,3,4)J=1Fori=4to1step-1S=s+a(i)*jJ=j*10NextiPrintsEndsub运行程序后,单击命令按钮,输出结果为()A)4321B)12C)34D)12346.在窗体上画一个命令按钮(其name属性为command1),然后编写如下代码:Privatesubcommand1_click()Dima(4,4)Fori=1to4Forj=1to4A(I,j)=(i-1)*3+jNextjNextiFori=3to3Forj=3to4Printa(j,i);NextjPrintNextiEndsub程序运行后,单击命令按钮,其输出结果为()A)69B)710C)811D)9127.假定建立了一个名为command1的命令按钮数组,则以下说法中错误的是()A)数组中每个命令按钮的名称(名称属性)均为command1B)数组中每个命令按钮的标题(caption属性)都一样C)数组中所有命令按钮可以使用同一个事件过程D)用名称command1(下标)可以访问数组中的每个命令按钮8.在窗体上画一个名称为command1的命令按钮,然后编写如下程序:Optionbase1Privatesubcommand1_click()Dimcasinteger,dasintegerD=0C=6X=array(2,4,6,8,10,12)Fori=1to6Ifx(i)cthenD=d+x(i)C=x(i)ElseD=d-cEndifNextiPrintdEndsub程序运行后,如果单击命令按钮,则在窗体上输出的内容为()A)10B)16C)12D)209.在窗体上画一个命令按钮,名称为command1,然后编写如下事件过程:Optionbase0Privatesubcommand1_click()DimcityasvariantCity=array(“北京”,“上海”,“天津”,“重庆”)Printcity(1)Endsub程序运行后,如果单击命令按钮,则在窗体上显示的内容是()A)空白B)错误提示C)北京D)上海10.在窗体上画一个名称为command1的命令按钮,然后编写如下代码:Optionbase1Privatesubcommand1_click()D=0C=10X=array(10,12,21,32,24)Fori=1to5Ifx(i)cthenD=d+x(i)C=x(i)ElseD=d-cEndifNextiPrintdEndsub程序运行后,如果单击命令按钮,则在窗体上输出的内容为()A)89B)99C)23D)77二、填空题1.控件数组的名字由属性指定,而数组中的每个元素由属性指定。2.Array函数建立的数组的名字必须是。3.在窗体上画一个按钮(其name属性为command1),然后编写代码:Privatesubcommand1_click()Dimn()asintegerDima,basintegerA=inputbox(“enterthefirstnumber”)B=inputbox(“entertheseconddnumber”)Redimn(atob)Fork=lbound(n)toubound(n)N(k)=kPrint“n(”;k;“)=”;n(k)NextkEndsub程序运行后,单击按钮,在输入中分别输入2和3,结果为4.在窗体上画一个命令按钮(其name属性为command1),然后编写如下代码:Privatesubcommand1_click()Dima(5,5)Fori=1to3Forj=1to4A(I,j)=i*jNextjNextiForn=1to2Form=1to3Printa(m,n);NextmNextnEndsub程序运行后,单击命令按钮,其输出结果为。6.设有程序:Optionbase1Privatesubcommand1_click()Dimarr1,maxasintegerArr1=array(12,435,76,24,78,54,866,43)=arr1(1)Fori=1to8Ifarr1(i)maxthenNextiPrint“最大值是:”;maxEndsub以上程序的功能是:用array函数建立一个含有8个元素的数组,然后查找并输出该数组中元素的最大值。

1 / 4
下载文档,编辑使用

©2015-2020 m.777doc.com 三七文档.

备案号:鲁ICP备2024069028号-1 客服联系 QQ:2149211541

×
保存成功