动态数组及声明11

1、浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业 动态数组：在声明时未给出数组的大小。在程序执行时分动态数组：在声明时未给出数组的大小。在程序执行时分配存储空间。配存储空间。5.4.1 动态数组的建立及使用动态数组的建立及使用 建立动态数组包括声明和大小说明两步：建立动态数组包括声明和大小说明两步： 1在使用在使用Dim、Private或或Public语句声明括号内为空的数组。语句声明括号内为空的数组。 格式：格式：Dim | Private|Public 数组名（

2、）数组名（）As 数据类型数据类型 例：例：Dim private a() As Integer 2在过程中用在过程中用ReDim语句指明该数组的大小。语句指明该数组的大小。 格式：格式：ReDim Preserve 数组名（下标数组名（下标1，下标，下标2） Preserve参数：保留数组中原来的数据 例：例： Redim A(10) Redim Preserve A(20)5.4 动态数组动态数组 浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业说明：说明： （

3、1）ReDim语句是一个语句是一个可执行语句可执行语句，只能出现在过程中，只能出现在过程中，并且可以并且可以多次使用多次使用，改变数组的维数和大小。，改变数组的维数和大小。 （2）定长数组声明时的下标只能是常量，而动态数组）定长数组声明时的下标只能是常量，而动态数组ReDim 语句中的下标是常量，也可以是有了确定值的变量。语句中的下标是常量，也可以是有了确定值的变量。 例：例： Private Sub Form_Click() Dim N As Integer N=Val(InputBox(“输入输入N=？”) Dim a(N) As Integer . End sub5.4 动态数组动态数组

4、 浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业 （3）在过程中可以多次使用）在过程中可以多次使用ReDim来改变数组的来改变数组的大小大小，也可也可 改变数组的改变数组的维数维数。 例：例：ReDim x(10) ReDim x(20) x(20) = 30 Print x(20) ReDim x(20, 5) x(20, 5) = 10 Print x(20, 5) （4）每次使用）每次使用ReDim语句都会使原来数组中值丢失，可语句都会使原来数组中值丢失，可

5、以在以在ReDim后加后加Preserve 参数来保留数组中的数据参数来保留数组中的数据。但此时。但此时 只能改变最后一维的大小。只能改变最后一维的大小。5.4 动态数组动态数组 浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业例例 RedimRedim语句和语句和PreservePreserve语句的使用。语句的使用。5.4 动态数组动态数组 浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Ne

6、t目录5.1 5.2 5.3 5.4 5.5 小结 作业 5.4.2 与数组操作有关的几个函数与数组操作有关的几个函数1.Array函数函数Array函数可方便地对数组整体赋值，但它只能给声明函数可方便地对数组整体赋值，但它只能给声明Variant的变量的变量或仅或仅由括号括起的动态数组由括号括起的动态数组赋值。赋值后的数赋值。赋值后的数组大小由赋值的个数决定。组大小由赋值的个数决定。 形式：数组名形式：数组名 = Array(数据列表数据列表) 例如，要将例如，要将1,2,3,4,5,6,7 这些值赋值给数组这些值赋值给数组a，可使用下，可使用下面的方法赋值。面的方法赋值。Dim a() 由

7、括号括起的动态数组由括号括起的动态数组A=array(1,2,3,4,5,6,7)Dim a Variant的变量的变量A=array(1,2,3,4,5,6,7)5.4 动态数组动态数组 浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业 2 求数组的上界求数组的上界Ubound( )函数、函数、 下界下界 Lbound( )函数函数 Ubound( )函数和函数和Lbound( )函数函数分别用来确定数组某一维的分别用来确定数组某一维的上界上界和和下界值下界值。使

8、用形式如下：使用形式如下： UBound(, ) LBound( , ) 其中：其中：数组变量的名称，遵循标准变量命名约定。数组变量的名称，遵循标准变量命名约定。：可选的；一般是整型常量或变量。指定返回哪一维的：可选的；一般是整型常量或变量。指定返回哪一维的上界。上界。1 表示第一维，表示第一维，2 表示第二维，如此等等。如果省略默表示第二维，如此等等。如果省略默认是认是1。5.4 动态数组动态数组 浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业例：使用例：使用L

9、Bound和和Ubound函数求数组的上界和下界。函数求数组的上界和下界。浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业5.4 动态数组动态数组 例如，如下程序段对例如，如下程序段对a,b数组赋值，并显示输出结果。数组赋值，并显示输出结果。浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业3Split函数函数使用格式：使用格式：Split

10、( ,)说明：说明： 使用使用Split函数可从一个字符串中，以某个指定符号为分隔函数可从一个字符串中，以某个指定符号为分隔符，分离若干个子字符串，建立一个下标从零开始的一维数组。符，分离若干个子字符串，建立一个下标从零开始的一维数组。5.4 动态数组动态数组 浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业 输入一系列的数据，并将它们分离后存放在数组输入一系列的数据，并将它们分离后存放在数组中。对输入中。对输入 的数据允许修改和自动识别非数字数据。的数据允许修改和

11、自动识别非数字数据。 （1）利用文本框输入和编辑数据，输入时去除非法数字。）利用文本框输入和编辑数据，输入时去除非法数字。合法字符包括数字、逗号（，）、小数点合法字符包括数字、逗号（，）、小数点（.）和负号（）和负号（-）。）。 2）输入结束利用）输入结束利用Replace函数去除重复输入的分隔符；函数去除重复输入的分隔符；将重复的分隔符（，）替换成（，）将重复的分隔符（，）替换成（，） Replace的用法：的用法： Replace （c，c1，c2），作用是在），作用是在c字符串字符串用用c2代替代替c1，如，如Replace（“ABCDABCD”,”CD”,”123”）,结结果是果是AB

12、123AB1235.4 动态数组动态数组 浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业 3）对利用）对利用Split函数按分隔符分离，放到数组中；函数按分隔符分离，放到数组中； Split的用法：的用法： Split（c，d），作用是将），作用是将c字符串按分字符串按分隔符隔符d分割成字符数组，分割成字符数组，s= Split（“123,56，ab”，“，”）结果为结果为s（0）=123，s（1）=“56”，s（2）=“ab”。 4）利用）利用Join函数将数组

13、中各元素合并成一个字符串。函数将数组中各元素合并成一个字符串。Join的用法：的用法： Join（a，d），作用是将数组），作用是将数组a中各元素按中各元素按d分分隔符连接成字符串变量。隔符连接成字符串变量。A= Join（“123”，“ab”，“c”），），结果为结果为123abc。5.4 动态数组动态数组 浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5.2 5.3 5.4 5.5 小结 作业5.4 动态数组动态数组 文本框输入和编辑数据：文本框输入和编辑数据：浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录5.1 5