林卓然VB教程课件数组第6章教案

林卓然VB教程课件数组第6章教案

ID:40572523

大小:595.10 KB

页数:46页

时间:2019-08-04

林卓然VB教程课件数组第6章教案_第1页
林卓然VB教程课件数组第6章教案_第2页
林卓然VB教程课件数组第6章教案_第3页
林卓然VB教程课件数组第6章教案_第4页
林卓然VB教程课件数组第6章教案_第5页
资源描述:

《林卓然VB教程课件数组第6章教案》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、第6数组数组是程序设计中广泛使用的数据结构,它可以方便灵活地组织数据。数组与循环语句结合使用,可使程序结构简洁、清晰。通常数组应先声明后使用。利用数组可以有效地存储和处理成批数据本章主要内容第6章数组数组的概念数组的声明和应用动态数组ForEach...Next循环语句控件数组程序举例退出处理成批的数据时,必须使用数组来处理。例如,表示100个学生的成绩,采用简单变量来表示:s1,s2,s3,…s99,s100采用数组来表示:t(0),t(1),t(2),…t(98),t(99)t(k)(k=0,1

2、,2,…99)为数组元素(或称下标变量),它表示第k个学生的成绩,k称为下标变量的下标(默认情况下,下标从0开始)由三行四列组成的二维数组y,其12个下标变量可表示为y(0,0)y(0,1)y(0,2)y(0,3) y(1,0)y(1,1)y(1,2)y(1,3) y(2,0)y(2,1)y(2,2)y(2,3)只要有规则地改变下标值,就可以很方便地使下标变量(如t(k))成为所需要的具体下标变量6.1数组的概念6.2.1数组声明语句使用数组之前,一般需要定义数组,以便让系统分配相应的存储单元

3、。格式为:Dim数组名([下界1to]上界1[,[下界2to]上界2…])[As数据类型]功能:指定数组的维数、各维的上下界和数据类型举例:DimSum(10)AsLong‘下标号从0~10,共11个元素DimAry(1to20)AsInteger‘下标号从1~20,共20个元素Dimd(1to5,1to10)AsDouble‘定义二维数组还可以使用Public、Static、Private等语句来声明数组6.2数组的声明和应用设定下界的方法OptionBase1‘设定下界为1 DimData(

4、10)AsSingle‘下标号从1~106.2.2Array函数使用Array函数可以为数组元素赋值示例DimDAsVariant‘定义数组名(变体类型)D=Array(1,2,3,4)执行结果:1→D(0),2→D(1),3→D(2),4→D(3)例6.1输入某小组5个同学的成绩,计算总分和平均分(取小数后一位)本例利用InputBox函数来输入成绩,输入完毕后经过计算,再采用Print直接在窗体上输出结果6.2.3数组的应用PrivateSubForm_Load()Dimd(5)AsInteg

5、erDimiAsInteger,totalAsSingle,averageAsSingleShowFori=1To5'输入成绩d(i)=Val(InputBox("请输入第"&Str(i)&_"个学生的成绩","输入成绩"))Nextitotal=0Fori=1To5'计算总分和平均分total=total+d(i)Nextiaverage=total/5Print"总分:"&totalPrint"平均分:"&Format(average,"##.0")EndSub例6.1(1)创建应用程序的用户界

6、面和设置对象属性例6.2输入10名学生的成绩,求出最高分和最低分例6.2功能要求:通过Array函数输入10个分数;单击“查找”按钮(Command2)后,开始查找最高分和最低分,找到后显示在标签Label1上OptionBase1DimscoreAsVariantPrivateSubForm_Load()Label1.Caption="单击“查找”按钮开始查找最高分和最低分"score=Array(89,96,81,67,79,90,63,85,95,83)EndSub(2)编写程序代码Priva

7、teSubCommand1_Click()DimmaxAsInteger,minAsIntegermax=score(1)'设定初值min=score(1)Fori=2To10‘与后面的数据逐一比较Ifmaxscore(i)Then'找最低分min=score(i)EndIfNexti'Chr(13)起换行作用Label1.Caption="最高分:"+Str(max)+_Chr(13)+"最低分:"+Str(min)

8、EndSub例6.3分别计算5个学生和3门课的平均分某学习小组有5名学生,成绩如表6.1所示分析:用一个二维数组a(5,3)来描述。程序中设置两重循环,用以实现每行和每列上的累加。本例采用赋值语句来输入学生成绩,并采用Print直接在窗体上输出结果OptionBase1PrivateSubForm_Load()Dima(5,3)AsIntegerDimrAsInteger,cAsInteger,sAsIntegerk=Array("数学","英语","计算机")'输入

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

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

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