程序设计基础——Visual Basic教程_高级数据类型.ppt

1、第九章高级数据类型，牙齿一章着重了解数组的基本概念，理解基本数组。了解阵列宣言(动态阵列和固定长度阵列)。了解阵列的基本操作(输入、输出、查找、排序、添加、删除等)。学习如何使用For Each Next语句。明确控件阵列的概念，掌握控件阵列的建立和使用方法。控制高级数据类型(例如枚举和自定义)的定义和使用。引入数组(1)，单个变量对作为整体存在的数据缺乏表达能力，整个个人的变化规律不能准确地记住班上每个人的名字。用类名代表全体，用类内学号代表全体个人。例如，学生3班(3)用一个名字表示同一类个人集合中个人的表达。集合名称(S=1 2 3 30 For I=1 To 30S=S I Next

2、I S=a1 a2 a3 a30查找组中的最大/最小元素，for I=1 to 30 s=s ai next I，a1 a2 a30，a1，然后阵列元素表示法9.1.1阵列的基本概念(继续)阵列相同类型的变数群组相同(有意义)名称，以一个半(30个)学生成绩Score 3000本书的名称BookName 100件商品的价钱Cost阵列元素阵列中的每个变数都是使用唯一的下标(索引)来识别的。例如，Score(1)，bookname(0)bookname(2999)cost(0)cost(99)数组的长度数组元素数、9.1.1数组的基本概念(继续)、数组的维一维数组多维数组二维数组9.1.1数组的

3、基本概念一维、二维、三维阵列的最大维数为60，元素量取决于内存是否可以变化。固定长度(固定大小)阵列(阵列的维度和长度一经定义就无法变更)使用阵列的步骤：定义宣言阵列，以便在使用整个阵列时，只能操作阵列的个别元素(通常不能操作整个阵列)，从而提供对阵列的存取。9.1.2固定长度数组的宣言，定义固定长度数组时需要规定的内容：数组的名称数组中维数组中每个维的下标范围数组是数据的数据类型，9 1 .一维数组Dim数组名称(下标)As类型名称Private数组名称(下标)As类型名称Public数组名称(下标)As类型名称示例：Dim score(1-30)As integer Private boo

4、knn其中下标的格式如下，默认情况下，下限值为0，例如dim Score(1-30)asinteger数组元素score(1)、score(2)score(30)dim cost(100)asss，const n as integer=15 dim a(n)as integer，b(2 * 3)as integer dim c(3.6)as integer 3.6舍入舍入，dim x 9.1.2多维数组Dim数组名称(下标1，下标2)As类型名称示例：二维数组：dimdb (3，1-5)As integer public n(5，5 1-5，1-5)例如，在西餐模块的常规声明中，使用以下语句声

5、明变量、数组：正确的语句如下：public a(5)asinteger public n as integer public const pi=3.14159 private B()asinteger a，2 B、3 C、4 D、1、多维数组数组的大小(元素数):=第一个一维大小*第二个二维大小*维的大小=维上限-维下限1 Dim a(3，-1 to 4) as single a数组的大小=(3-0 1) 6) as 9.1.3固定长度阵列的基本作业、阵列的输入阵列的输出、阵列的存取基本上是阵列的个别元素存取、9.1.3阵列的基本作业、阵列元素变更表示下标的变更(使用下标存取阵列元素1阵列的输

6、入方法0)B(3，4) asinteger、iasinteger I=3a (0) 键盘读取InputBox()函数实现，固定长度阵列dima (1到5) asinteger，I as integer for I=1到5a (Min，Max，60，)判断Max=a(1):Min=a(1)for I=2 to 10每个元素If Max a(i) Then Min=a(i) Next I。例如，将文本框内的11个字的表语颠倒成数组，倒数的本质是数组前后元素对称更换：第一个数组元素和最后一个数组元素更换，第二个数组元素和倒数第二个数组元素交换等，以此来交换数组元素下标的法则。第I个数组元素和n I

7、1数组元素更换，n2(n是金志洙组的长度，考虑到数组元素数的奇偶校验)。这些迭代操作可以通过循环控制，阵列元素交换可以通过熟悉的中间变量算法执行。数组的移位，在数组中放10个数字，然后将第一个数字放在最后，剩下的数字依次向前移动，输出处理前后的数组。，移动阵列(继续)，分析：步骤：1。在变量x中保存A(1)2。向前移动A(2)A(10)3。将x值放置在a (10)，7中的Dima(1-10)as integer private subcmdcreate _ click()dimi as integer randomize print循环向左移动1位数以前的数组for I=1到10生成随机数组，

8、并在Next I print end sub，private Sub cmd move _ click()dimi As Integer，X As Integer x=A(1)变量X中实例演示、移动数组(继续)、将10个数字放在数组中，然后将第一个数字放在最后，其馀数字依次向前移动，以便在处理前后输出。问：你能这样做吗？private sub cmd move _ click()dimi as integer print循环是向左移动1位后的数组。for I=2 To 10 Print A(I)；Next I Print A(1) End Sub，A:通常渡边杏。这是显示器效果的处理。阵列元素

9、本身没有实质性的变化。阵列移动必须通过修改内存中的相应值来完成。private sub cmd move _ click()dim I As Integer，X As Integer x=A(1)在变量X中存储A(1)For I=2 To 10 A(2)=将x变量x的A(1)发送到A(10) Next j Print循环，作为左侧k位后面的数组。For I=1 To 10输出循环平移后的效果Print A(I)；Next I Print End Sub，移动数组(继续)，解决方法：向左移动k位=向左移动一位，将数组元素向左移动一位扩展：将数组元素向左移动k位，扩展：将数组元素循环向右移动显示元素Print换行Cls清除所有显示内容PictureBox Print方法Picture1。Print a(i)，显示元素Picture1。Print换行Picture1。Cls所有显示内容文本框Text属性text1 . Text=Text 1 . Text next jpicture 1 . print next I end sub，Text 1 .Text=显示在文本框中创建的二维数组： Next End Sub，实例演示，使用2 Optio