资源描述：
《VB-第6章数组与自定义类型》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、VisualBasic程序设计2010年3月第六章数组与自定义类型Evaluationonly.CreatedwithAspose.Slidesfor.NET3.5ClientProfile5.2.0.0.Copyright2004-2011AsposePtyLtd.26.1数组的概念6.2静态数组及声明6.3动态数组及声明6.4数组的基本操作6.5控件数组6.6自定义数据类型重点Evaluationonly.CreatedwithAspose.Slidesfor.NET3.5ClientProfile5.2.0.0.Copyright
2、2004-2011AsposePtyLtd.数组的概念【例】声明5个变量，并赋值都为0.Privatesubform_click()Dima1,a2,a3,a4,a5AsInteger‘定义5个变量a1=0:a2=0:a3=0:a4=0:a5=0‘赋值Printa1,a2,a3,a4,a5EndSub题意若为声明100个变量，赋值为0。是否如【例6-1】一样，声明100个变量，然后赋值？那样的工作量会很大。分析规律发现，声明变量和赋值操作都反复执行100次，是否可以采用循环实现呢？但是如何去构造循环语句呢？Evaluationonly.
3、CreatedwithAspose.Slidesfor.NET3.5ClientProfile5.2.0.0.Copyright2004-2011AsposePtyLtd.4【例】若要求一个班100个学生的平均成绩，然后统计高于平均分的人数。按以前简单变量的使用和循环结构相结合，求平均成绩程序段如下：aver=0:sum=0Fori=1To100mark=InputBox("输入"+i+"位学生的成绩")sum=sum+markNextiaver=sum/100Evaluationonly.CreatedwithAspose.Slide
4、sfor.NET3.5ClientProfile5.2.0.0.Copyright2004-2011AsposePtyLtd.5若要求一个班100个学生的平均成绩，然后 统计高于平均分的人数。aver=0:sum=0Fori=1To100mark=InputBox("输入"+i+"位学生的成绩")sum=sum+markNextiaver=sum/100mark是一个简单变量，存放的是最后一个学生的成绩。已有知识解决方法：再重复输入成绩，带来两个问题：（1）输入数据的工作量成倍增加；（2）若本次输入的成绩与上次不同，则统计的结果不正确。
5、解决此问题的根本方法，引入数组，始终保持输入的数据，一次输入，多次使用。Evaluationonly.CreatedwithAspose.Slidesfor.NET3.5ClientProfile5.2.0.0.Copyright2004-2011AsposePtyLtd.6数组的概念数组用于表示一组性质相同的有序的数，这一组数用一个统一的名称来代替，称为数组名。数组名的命名规则与简单变量的命名规则相同。数组中的每一个元素称为数组元素。为了在处理时能够区分数组中的每一个元素，需要用一个索引号加以区别，该索引号称为下标。数组中的每一个元素
6、可以用数组名和下标唯一地表示，写成：数组名(下标)。Evaluationonly.CreatedwithAspose.Slidesfor.NET3.5ClientProfile5.2.0.0.Copyright2004-2011AsposePtyLtd.7数组的概念数组并不是一种数据类型，而是一组相同类型数据的集合。用一个统一的名字（数组名）代表逻辑上相关的一批数据，每个元素用下标变量来区分；下标变量代表元素在数组中的位置。其表示形式：A(1)，A(10)X(1,1),X1(1,10),X(2,10)Y(0,0,0),Y(1,2,5)D
7、immark(1to100)asintegerEvaluationonly.CreatedwithAspose.Slidesfor.NET3.5ClientProfile5.2.0.0.Copyright2004-2011AsposePtyLtd.8数组的概念VisualBasic中的数组，按不同的方式分为以下几类：按数组的大小（元素个数）是否可以改变来分为：静态（定长）数组、动态（可变长）数组。按元素的数据类型可分为：数值型数组、字符串数组、日期型数组、变体数组等。按数组的维数可分为：一维数组、二维数组、多维数组。对象数组：菜单对象数
8、组、控件数组。Evaluationonly.CreatedwithAspose.Slidesfor.NET3.5ClientProfile5.2.0.0.Copyright2004-2011AsposePt
