vb实验任务12答案

vb实验任务12答案

ID:15029641

大小:161.50 KB

页数:8页

时间:2018-08-01

vb实验任务12答案_第1页
vb实验任务12答案_第2页
vb实验任务12答案_第3页
vb实验任务12答案_第4页
vb实验任务12答案_第5页
资源描述:

《vb实验任务12答案》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、实验任务12课程名称:程序设计基础VB实验名称——实验十二数组(2)一、实验目的:1.掌握数组的声明和数组元素的引用2.掌握定长数组的使用3.掌握数组的基本操作算法4.掌握控件数组的使用二、实验内容(包括实验要求(题目)、实验步骤、程序清单、运行情况):实验1在课前做好,课上验证实验1人工写出如下程序的运行结果,并利用单步调试工具验证执行流程和运行结果,进一步深入弄清和理解数组的访问。(1)执行下面程序,单击命令按钮,输出结果是。OptionBase1Dimarr()AsIntegerPrivateSubForm_Click()Di

2、miAsInteger,jAsIntegerReDimarr(3,2)Fori=1To3Forj=1To2arr(i,j)=i*2+jNextjNextiReDimPreservearr(3,4)Forj=3To4arr(3,j)=j+9NextjPrintarr(3,2);arr(3,4)EndSub(2)运行程序,单击窗体,则在窗体上显示的是。OptionBase1PrivateSubForm_Click()Dima,SumAsInteger,iSum=0a=Array(1,3,5,7,9,11,13,15,17,19,21,2

3、3)ForEachiInaIfi/3=i3ThenSum=Sum+iNextPrintSumEndSub实验2实验7-2下列程序代码读入N个数,用选择排序法对这N个数按从大到小的顺序排序,并在文本框Textl中输出排序结果。(动态数组)部分程序代码如下,请填空。Dima()AsIntegerPrivateSubCommand1_C1ick()N=Val(InputBox("请输入N:")):ReDimA(N)ForI=1ToNA(I)=Val(InputBox("请输入A("&I&"):",,I))NextIText1.Text=

4、""ForI=1ToN−1ForJ=I+1ToNIfA(I)

5、ivateSubForm_Click()Dima(N,N)AsInteger,iAsInteger,jAsInteger,tempAsIntegerPicture1.Cls'每次数据生成前清除图片框中的内容Picture1.Print"原数组为:"图7-7实验7-3运行界面Fori=1ToNForj=1ToNa(i,j)=Int(100*Rnd)+1Picture1.Printa(i,j),NextjPicture1.PrintNextiPicture1.Print"转置后数组为:"Fori=1ToNForj=i+1toN'填写代码

6、段,实现矩阵的转置Temp=a(I,j)A(i,j)=a(j,i)A(j,i)=tempNextjNextiFori=1ToN'填写代码段,输出矩阵Forj=1ToNPicture1.Printa(i,j),NextjPicture1.PrintNextiEndSub(2)调试程序,并保存文件。实验4实验7-7利用控件数组设计一个简易计算器。提示如下:(1)界面设计。在窗体上按照图7-13所示界面放置一个按钮(CommadButton)控件,其Caption属性设置为0,名称设置为cmdDigit;并将其Index属性设为0(作为控

7、件数组的起始索引值),利用复制粘贴的方法复制出其他11个按钮控件,它们的标题(Caption)属性分别设置为“1”、“2”、“3”、“4”、“5”、“6”、“7”、“8”、“9”、“00”、“.”构成控件数组,并按照所示界面排放好各个控件。利用同样方法设计标题为“+”、“−”、“×”、“÷”、“=”的按钮控件数组,控件名为cmdOperator;标题为“+”、“−”、“×”、“÷”、“=”的Index属性设分别为0、1、2、3、4。把标题为“1/X”、“EXP”、“LOG”和“X^Y”的按钮控件作为一个控件数组,控件名为cmdAcc

8、umulate;并依次设置它们的Index属性值为0、1、2、3。将标题为“±”、“C”和“AC”的按钮控件分别命名为cmdSign、cmdClear和cmdAllClear。放置一个文本框,属性值默认,文本框左边上放置标题为“+”的

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

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

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