ImageVerifierCode 换一换
格式:DOCX , 页数:7 ,大小:19.61KB ,
资源ID:17171751      下载积分:3 金币
快捷下载
登录下载
邮箱/手机:
温馨提示:
快捷下载时,用户名和密码都是您填写的邮箱或者手机号,方便查询和重复下载(系统自动生成)。 如填写123,账号就是123,密码也是123。
特别说明:
请自助下载,系统不会自动发送文件的哦; 如果您已付费,想二次下载,请登录后访问:我的下载记录
支付方式: 支付宝    微信支付   
验证码:   换一换

加入VIP,免费下载
 

温馨提示:由于个人手机设置不同,如果发现不能下载,请复制以下地址【https://www.bdocx.com/down/17171751.html】到电脑端继续下载(重复下载不扣费)。

已注册用户请登录:
账号:
密码:
验证码:   换一换
  忘记密码?
三方登录: 微信登录   QQ登录  

下载须知

1: 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。
2: 试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓。
3: 文件的所有权益归上传用户所有。
4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
5. 本站仅提供交流平台,并不能对任何下载内容负责。
6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

版权提示 | 免责声明

本文(数组的定义与声明Word格式文档下载.docx)为本站会员(b****4)主动上传,冰豆网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知冰豆网(发送邮件至service@bdocx.com或直接QQ联系客服),我们立即给予删除!

数组的定义与声明Word格式文档下载.docx

1、Dim BirthDay(1 To 10) As Date表示BirthDay 是一个索引从 1 到 10 的 Date型 数组。2Option Base 语句 Option Base 语句在模块级别中使用,用来声明数组下标的缺省下界。Option Base 语句的语法如下:Option Base 0 | 1说明:缺省状态下数组下界为 0,此时无需使用 Option Base 语句。如果使用该语句规定数组下界1,则必须在模块的数组声明之前使用Option Base 语句.注意:(1)Dim、Private、Public、ReDim 以及 Static 语句中的 To 子句提供了一种更灵活的方式

2、来控制数组的下标.不过,如果没有使用 To 子句显式地指定下界,则可以使用 Option Base 将缺省下界设为 1.使用 Array 函数创建的数组的下界也受 Option Base 语句指定的下界的决定, 除非 Array 是由类型库(例如 VBA.Array )名称限定,如果是由类型库名称限定,则 使用Array 函数创建的数组的下界不受 Option Base 的影响。 (1) Option Base 语句只影响位于包含该语句的模块中的数组下界。关于数组声明的几点说明:数组名命名规则和变量名的相同。数组名后是用圆括弧括起来的,不能用方括弧,不同于C语言.下标的下界必须不能大于其上界。

3、可以用变量名或常数名(以及实数)作下标的边界.当下标的边界是常数名时,数组的大小固定,当下标的边界是变量名时,数组的大小可作动态定义,即数组的大小取决于程序运行过程中变量的值。因此,VB 中数组又可以分为两种数组:静态数组、动态数组.3静态数组 静态数组是指数组元素的个数是固定不变的,即它们占用的内存空间大小是固定不变的。根据固定大小数组的维数不同,可以将它分为一维数组和多维数组。声明多维数组的语法格式为:Dim 数组名(下标边界列表) As 数据类型下标边界的定义形式:下标下界 To下标上界下标边界列表指用逗号分开的数组各维的下标边界,即下标下界 To下标上界,下标下界 To下标上界,下标下

4、界 To下标上界(第一维) (第二维) (第n维)当n=1时,数组称作一维数组;当n=2时,数组称作二维数组;依次类推,当n=m时,数组称作m维数组。下面举例介绍一维数组的使用。声明一个长度为51的字符串数组FriendsNameDim FriendsName(50) As String声明一个长度为11的全局整型数组ClassPublic Class(10) As Integer一维数组中的元素个数为(上界-下界+1).为数组赋初值可以采用循环语句,如:Dim I As IntegerFor I = 0 To 11 循环语句的使用程序流程的控制C(I) = INext I如果不显式指定下标下

5、界,则数组的下标下界由 Option Base 语句控制。如果没有 Option Base 语句则下界为默认为 0。数组的维数并不限于,在VB中,可以扩大至于60,在实际应用上对三维以上的数组的应用是不多的.定义一个多维数组时只需一条Dim语句指定数组的所有下标边界即可,使用多维数组的可以很方便的表示一些有意义的统计数据。例如:Dim Profit(16,10,12) As Currency这个Profit数组可用来表示以店名、部门及月份为参数的某百货公司的利润。如:Profit(2,8,11)代表了第二分店的第八部门在11月份的利润。4动态数组 有时在数组开始使用前,不能知道需要多大的数组才

6、能满足实际需要。当然可以把数组的大小定义到足够大来满足任意的实际应用需要,这种方法效率很低(大量浪费内存空间).如果使用动态数组,就可以在程序运行时根据实际需要,精确定义数组的大小.在声明数组时,不给出维数列表就是将数组声明为动态数组。例如:Dim MyArry() As Integer在使用动态数组前,必须使用ReDim语句把它重新定义。如前面声明的数组MyArry,可以用以下语句将它定义为一个动态二维数组。ReDim MyArry(10,10)还可以通过重复执行ReDim语句,多次定义动态数组.使用ReDim最多能定义数组的维数是60.ReDim语句可以改变数组每维的元素个数,但不能改变维

7、数.下面是对ReDim语句的一个标准应用举例。Dim MyArry() As Single 声明动态数组ReDim MyArry(30,20,10) 重新定义数组ReDim MyArry(50,23,21) 再次重新定义数组ReDim的语法与Dim的相同,此外,它还有选择项Preserve关键词:ReDim Preserve 数组名 ( 下标下界 To下标上界) As 数据类型ReDim MyArry(50,23,21)ReDim Preserve MyArry(50,23,50)注意:使用ReDim 时,重新定义数组会使所有数组元素的值消失,而使用Preserve可以保留数据。但是用Pres

8、erve只能在改变数组的最后一维的大小时,保留数组的数据。对于一维数组来说,所有数据都会保留,而对于多维数组:只能改变最后一维的大小,才能保留全部数组数据,否则出错. 5LBound 函数和UBound 函数 LBound 函数和Ubound函数都是返回一个 Long 型数据,前者得到的值为指定数组维可用的最小下标,而后者得到的是最大下标。它们的语法为:LBound(数组名, 指定的维数)UBound(数组名, 指定的维数)其中数组名是必选的。指定的维数是可选的,表明指定返回哪一维的下界.1 表示第一维,2 表示第二维,如此类推。如果省略指定的维数,就默认为是 1。关于如何使用LBound 函

9、数与 UBound 函数可参见下例:Dim A(1 to 100,3,-3 to 4) As Integer 定义一三维数组,假定没有使用Option Base 语句改变数组下界的默认值。对数组A使用Lbound 和bound函数,其返回值列表如下 所有维的缺省下界取决于 Option Base 语句的设置。可以看出对一数组使用LBound 函数与 UBound 函数,可用于确定一个数组中元素的个数。对于那些在声明中用 To 子句来设定维数的数组而言,它们可以用任何整数作为下界而不受Option Base 语句的限制。6数组的高级功能 尽管数组最通常被用来存储成组的变量,但是在别的一些方面数组

10、也是很有用的.可以将一个数组的内容赋值给另一个数组、创建返回数组的函数,还可以创建返回数组的属性。在许多情况下,这些技术能改进应用程序的性能。正如可以将一个变量的值赋给另一个变量,例如 StrA = StrB ,也可以将一个数组的内容赋给另一个数组。例如,要将一字节型数组从一个位置复制到另一个位置。可以通过每次复制一个字节来实现,程序如下:Sub ByteCopy(oldCopy() As Byte, newCopy() As Byte)参数oldCopy()是源数组,newCopy()是目标数组Dim i As IntegerReDim newCopy (Lbound(oldCopy) To

11、 UBound(oldCopy) 重新定义动态数组For i = Lbound(oldCopy) To Ubound(oldCopy) 循环赋值newCopy(i) = oldCopy(i)NextEnd Sub一个更有效的简单的方法就是直接将一个数组赋给另外一个数组:newCopy = oldCopy 利用数组直接进行赋值关于变量赋值有一些规则需要铭记。例如,虽然可以将一个声明为整型的变量赋给一个声明为长整型的变量而不会产生任何问题,但是将一个长整型变量赋给一个整型变量就很容易导致溢出错误。除了遵守有关数据类型变量之间赋值时的规则外,数组赋值还要遵从另外一些规则,包括数组维数,每一维的大小,

12、以及数组是固定的还是动态的。维数、数据类型不同的数组赋值考虑的几个因素l 赋值符左边的数组类型:固定数组 (Dim x(1 to 10) As Integer) 或者动态数组 (Dim x() As Integer).l 赋值符左边数组的维数是否和赋值符右边数组的维数匹配。l 赋值符两边数组的每一维的数组元素个数是否匹配。即使数组的声明不同,维数也可能匹配。比如一个数组的每一维元素从 0 开始编号而另一个则从 1 开始,维数也可能匹配.l 赋值符两边所有元素的数据类型必须是相容的。这些规则和变量赋值的规则是一致的.表36显示了这些因素的影响:数组赋值时的错误可能发生在编译时,也可能发生在运行时

13、(例如,如果数据类型不能强制转换或赋值试图重新声明 (ReDim) 一个静态数组)。设计程序时要添加错误处理以确保数组在赋值之前是匹配的.编写返回数组的函数从一个函数返回一组值是可能实现的。例如,从一个函数返回一组字节而不必将其先转换为一个字符串然后再转换回来。下面是一个使用返回字节数组的函数的简单示例:Private Sub Form_Load()Dim b As ByteDim ReturnArray() As Byteb = Cbyte(54)ReturnArray() = ArrayFunction(b) 调用函数For i = Lbound(ReturnArray) To Uboun

14、d(ReturnArray)Msgbox ReturnArray(i)通过弹出消息框循环显示数组值 Public Function ArrayFunction(b As Byte) As Byte()Dim x(2) As Bytex(0) = bx(1) = b + CByte(200)x(2) = b + bArrayFunction = x 返回结果为数组xEnd Function在运行以上示例后, ReturnArray() 是一个三元素数组,其中包含了分配给 ArrayFunction 中数组的值。ArrayFunction 语句将一个数组作为参数传递;且数组的数据类型必须和函数的数

15、据类型相同(在本例中是字节)。因为这是一个函数调用,传递数组时不必带括号。尽管可以通过赋值给另一个数组(ArrayFunction = x()来返回一个数组,但出于性能方面的考虑,并不推荐使用这种方法。必须为返回数组的函数指定一个类型,这个类型可以是 Variant.这样一来,Function X() As Variant() 是有效的而 Function X() As () 将失败. 当调用一个返回数组的函数时,用来保存返回值的变量也必须是一个数组,而且其数据类型必须和函数返回类型相同,否则将显示一个“类型不匹配的错误。VB数组是不可以这样赋值的,你可以如下赋值:Dim MyArray MyArray=Array(1,2,3,4,5,6,7,8)是()不是;你也可以用for循环来个数组赋值:Dim i as integer Dim MyArray(8) 定义一个含8个整数的一维数组,注意脚标和c语言一样是从0到7的 for i=0 to 7 Myarray(i)=i+1 next

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1