- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第十五讲 数组与控件数组(一)
数组
控件数组的产生与应用
计算器
答疑解难:月亮走
数组
数组的概念
在实际生活当中,我们经常要与大量的数据打交道,如学校医务人员测得全校同学的视力,体育老师测得全班每位同学百米跑的速度,等等。这些都是大批的具体相同类型的数据,如,尽管是全校学生的视力,但它们都是视力,都是0~6的数;体育课上的百米跑速度都是时间。也就是说,我们处理的每一批数据都具有相同的属性。问题是,这样一批具有相同属性的数据在计算机里如果表示它们呢?
首先让我们回顾一下,通常人们是怎样表示这些数据的。在数学和物理中,速度是用字母V来表示,不同的速度用V1,V2,V3,…,Vn,V表示它们都是速度,1,2,3,…n是下标,表示不同的速度。
在计算机程序设计语言里(不只是VB),把这样一组V1,V2,V3,…,Vn具有相同属性的数据叫做一个“数组”,其写法变为:V(1),V(2),V(3),…,V(n),V是数组名,即上面的数组就叫做数组V;其中每个数据如V(1),V(n)都称这数组V的元素;1,2,…,n称为各个数组元素的“下标”。
数组的每个元素都是一个变量,它们可以存放整数,可以存放实数,也可以存放字符串,但是有一点是需要注意的,那就是同一个数组中的每个元素都必须是同一种类型的变量,即它们要么都是整型变量,要么都是实型变量,要么都是字符变量。不同的数组可以存放不同类型的数据。如:可以有整型数组,实型为数组,字符型数组等。
数组的说明
由于数组的出现通常要包含许多元素,所以使用数组之前,一定要事先告诉计算机系统,数组中有多少元素,这一过程叫做“数组说明”,VB中有专门的语句来进行数组说明。说明语句以DIM开头,如
DIM Array1(12) as Integer
这条语句告诉计算机系统数组Array1的最大下标是12,也就是说,计算机系统为数组Array1事先准备了13个存放整型数的空间,它们是:
Array1(0)、Array1(1)、Array1(2)、Array1(3)、Array1(4)、Array1(5)、Array1(6)、Array1(7)、Array1(8)、Array1(9)、Array1(10)、Array1(11)、Array1(12)
也可以用
Dim Array1(0 To 12) as Integer
来说明,直接写出需要使用的下标范围。
数组说明语句通常写在程序的最前面,如果是通用的数组,那就要写在代码窗口中的“通用”“声明”里。
【任务1】数组演示程序
任务描述:
向系统申请两个数组Array1,Array2,一个用来存放3个整数,一个用来存放3个字符串,在窗体上摆放两个按钮,单击第一个按钮时,屏幕上显示第一个数组中的全部数据,单击第二个按钮的时候,屏幕上显示第二个数组中的全部数据。
任务分析:
完成这个任务,我们需要做以下几件事:
申请数组
给数组赋值
设置窗体
单击按钮时输出数组元素的值
申请数组可以用DIM语句,给数组的各个元素赋值可以用赋值语句,如:
Array1(1)=21
Array2(1)=“abc”
把数组的元素输出可以用输出语句PRINT,如
Print Array1(1)
实现步骤:
1.界面设计
界面设计如图1所示:
图1
“数组Array1”的名称是:Command1
“数组Array2”的名称是:Command2
“退出”的名称是:Command3
2.编写程序
申请数组:
在代码窗口中的“通用”一栏中写上:
Dim array1(3) As Integer
Dim array2(3) As String
给数组元素赋值:
我们可以在Form_load()中为数组赋值:
Private Sub Form_Load()
array1(1) = 121
array1(2) = 223
array1(3) = 898
array2(1) = about
array2(2) = teacher
array2(3) = Hello
End Sub
输出数组元素中的值:
当单击了按钮时,输出数组array1和array2的元素,所以要分别在Command1_click()和Command2_click()中编写输出程序,如下所示:
===============================
Private Sub Command1_Click()
Form1.Cls
Print 数组Array1的全部元素
For i = 1 To 3
Print Array1(; i; )=; array1(i)
Next i
End Sub
文档评论(0)