VB数组练习题.ppt

VB数组练习题.ppt

ID:49563152

大小:81.50 KB

页数:8页

时间:2020-02-25

VB数组练习题.ppt_第1页
VB数组练习题.ppt_第2页
VB数组练习题.ppt_第3页
VB数组练习题.ppt_第4页
VB数组练习题.ppt_第5页
资源描述:

《VB数组练习题.ppt》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、第八章数组练习题1.用下面的语句所定义的数组的元素个数是()DimA(-3to5)asintegerA.6B.7C.8D.92.用下面的语句所定义的数组的元素个数是()Dimarr(3to5,-2to2)A.20B.12C.15D.243.控件数组的名字由名称属性指定,而数组中的每个元素由属性指定。4.由Array函数建立的数组的类型必须是类型。DCIndexVariant5.在窗体上面画一个命令按钮,然后编写如下代码:Optionbase1PrivateSubCommand1_Click()Dima(10)asin

2、teger,p(3)asintegerk=5Fori=1to10a(i)=iNextiFori=1to3P(i)=a(i*i)NextiFori=1to3K=k+p(i)*2NextiEndSub程序运行后,单击命令按钮,输出结果是()A.35B.28C.33D.37c6.在窗体上有一个命令按钮,然后编写如下代码:PrivateSubCommand1_Click()Dimarr1(10)asInteger,arr2(10)asIntegern=3Fori=1To5arr1(i)=iarr2(i)=2*n+iNexti

3、Printarr2(n),arr1(n)EndSub程序运行后,单击命令按钮,输出结果为()A.93B.311C.133D.313A7.在窗体上画一个命令按钮,然后编写如下代码:Optionbase1PrivateSubCommand1_Click()Dimaa=array(1,2,3,4)j=1Fori=4to1step-1S=s+a(i)*jj=j*10NextiPrintsEndSub运行上面程序,单击命令按钮,其输出结果是()A.4321B.12C.34D.1234D8.在窗体上画一个命令按钮,然后编写如下代

4、码:Optionbase1PrivateSubCommand1_Click()Dima(4,4)Fori=1to4Forj=1to4a(i,j)=(i-1)*3+jNextjNextiFori=3to4Forj=3to4Printa(j,i);NextjprintNextiEndSub程序运行后,单击命令按钮,输出结果为()A.69B.710C.811D.9127108119121013D9.在窗体上画一个命令按钮,然后填写如下代码:PrivateSubCommand1_Click()Dimn()asintegerD

5、imaasinteger,basintetgera=inputbox(“enterdataa:”)b=inputbox(“enterdatab:”)redimn(atob)fork=Lbound(n,1)toUbound(n,1)n(k)=kprint“n(“;k;”)=“;n(k)nextkEndSub程序运行后,单击命令按钮,在输入对话框中分别输入2和3,输出结果为n(2)=2n(3)=310.在窗体上画一个命令按钮,然后编写如下代码:PrivateSubCommand1_Click()Dimm(10)asint

6、egerFork=1to10m(k)=12-kNextkX=6Printm(2+m(x))EndSub程序运行后,单击命令按钮,输出结果是。411.在窗体上画一个命令按钮,然后编写如下代码:PrivateSubCommand1_Click()Dima(5,5)Fori=1to3Forj=1to4a(i,j)=i*jNextjNextiForn=1to2Form=1to3Printa(m,n);NextmNextnEndSub程序运行后,单击命令按钮,输出结果是。123246

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。