VB2010上(二).ppt

  1. 1、本文档共103页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第5章 数组和自定义类型 5.1 数组的概念 5.2 数组的基本操作和排序 5.3 列表框和组合框控件 5.4 自定义类型及其数组 5.5 综合应用 5.1 数组的概念 数组的概念 数组是具有相同名字的多个变量的有序集合。组成一个数组的一系列变量称为数组元素,这些元素可以用它在该数组中的位置号(序号)来标识,无需再为每一个数组元素取名。 数组元素又称为下标变量。 数组的概念 设有一名称为A的数组,各元素的排列如下: 数组的概念 具有一个下标的数组称为一维数组。如: A(2) B(5) 有两个下标的数组称为二维数组。如: X(2,3) Y(1,5) 同理,有几个下标则称为几维数组。有两个及以上下标的数组又称为多维数组。如: M(2,5,1) N(4,2,6,8) 数组的说明 数组都必须先说明后使用,因为在各种程序设计语言中,数组都将占用一块连续的内存空间,数组名是这一块内存空间的名称。说明数组的目的就是通知计算机为该数组预留出所需要的内存空间以便使用。 数组的说明需要用数组说明语句进行。 数组说明语句 在VB中,数组说明语句的一般形式为: 说明符 数组名(下标1上界,下标2上界,······) [As 类型名] 说明符有4种形式:Dim、ReDim、Static、Public 数组名与一般的变量名要求相同。 “As 类型名”规定了数组元素(下标变量)的数据类型,同一个数组中各元素的数据类型是相同的,即需要存放同一类型的数据,当省略“As 类型名”时,说明的数组类型默认为变体型(Variant),这时元素中存放的数据可以是多种类型的。也可不用“As 类型名”而在数组名后面用类型符进行数组类型说明。例如:Dim A%(5) --→ Dim A(5) As Integer 数组说明语句的作用 通知计算机,程序中将要用到的数组的名称是什么,是多少维的数组,每一维的上界是多少,一共有多少个元素,每一个元素是哪种数据类型的,需要留出多大的内存存储空间。例如: Dim A(5) As Integer 或 Dim A%(5) 此为一维数组,共6个元素,即从A(0)~A(5)(一般数组下界规定为0),每个元素均为2个字节的整型变量,数组共12字节。 数组说明的示例 如: Dim B(3,4) As Long 说明了一个二维的B数组,共4×5=20个元素,均为长整型,占4×20=80个字节,其分布情况如下: B(0,0) B(0,1) B(0,2) B(0,3) B(0,4) B(1,0) B(1,1) B(1,2) B(1,3) B(1,4) B(2,0) B(2,1) B(2,2) B(2,3) B(2,4) B(3,0) B(3,1) B(3,2) B(3,3) B(3,4) 对二维数组,第1个下标称为“行下标”,第2个下标称为“列下标”。 若是变体型,则字节数不确定。 使用说明 当说明了一个数组后,系统将各数组元素都初始化为0(数值型数组),或空字串(字符型数组)或空值(变体型数组); 一般数组下界为0,可用 Option Base 1|0 将其改变为1或恢复为0(该语句只能出现在程序模块的“通用”部分)。如: Option Base 1 : Dim a(5) 则A数组有A(1)~A(5)共5个元素。 也可用以下形式直接定义下标的下界和上界: 如:Dim X(2 To 6 ,3 To 8),共有5×6=30个元素 数组的引用 即使用存放在数组元素中的数据,不能直接引用整个数组的数据,只能一个一个地引用各个元素中的数据。如: Dim A(5) A(1)=3:A(2)=A(1)+4:A(5)=A(1)*A(2) 注意定义中的A(5)与引用中的A(5)的区别。 凡是一般变量可出现的地方,都可引用数组元素。 数组的数据输入(赋值) 用赋值语句:A(3)=5 用InputBox函数:A(2)=InputBox(······) 用循环语句: For I=1 To 10 | For I=1 To 10 A(I)=I*2-1 | A(i)=InputBox(·····) Next I | Next I 二维数组数据的输入 1 2 3 4 X(1,1) X(1,2) X(1,3) X(1,4) 5 6 7 8 === X(2,1) X(2,2) X(2,3) X(2,4) 9 10 11 12 X(3,1) X(3,2) X(3,3) X(3,4) Dim X(1 To 3,1 To 4) :n=1 For I=1 To 3 For j=1 To 4 X(I,j)=

文档评论(0)

wxc6688 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档