1、动态数组问题引入 想一想，如何利用一个数组存放长度不同的词？lycheesblueberries列表框 动态数组概述1 动态数组定义及说明2 动态数组应用3动态数组动态数组概述动态数组概述数组在定义时不指定下标值 动态数组提供了一种灵活的管理机制，它在程序运行期间能够根据用户的需要随时改变数组大小。动态数组定义动态数组定义定义动态数组，需分两步进行：【步骤1】定义一个没有下标值的数组。Dim 数组名()As 数据类型【步骤2】用ReDim语句分配实际的元素个数。ReDim 数组名(下标)As 数据类型 动态数组说明动态数组说明【说明】在步骤1中定义数组，在步骤2中为动态数组分配存储空间。ReD
2、im语句是一个可执行语句。动态数组说明动态数组说明【说明】可使用ReDim语句多次改变数组的大小，也可改变数组的维数，但不能改为数组的数据类型。使用ReDim语句会使原数组中的值丢失。使用Preserve参数可保存数组中原来的数据。动态数组说明动态数组说明Dim da1()As Integer 定义动态数组ReDim da1(10)As Integer 重新定义数组的大小 再次使用时又重新定义数组的大小ReDim da1(20,20)As Integer正确定义动态数组的方法：动态数组说明动态数组说明Dim da1()As Integer 定义动态数组ReDim da1(10)As Integ
3、er 重新定义数组的大小 再次使用时又重新定义数组的大小ReDim da1(20,20)As Integer正确定义动态数组的方法：动态数组说明动态数组说明Dim dy()As Integer ReDim dy(10)As Integer ReDim dy(20,20)As String 下面动态数组的定义方法是错误的，你知道错在哪吗？动态动态数组说明数组说明 动态数组，给了我们短时间使用大数组的机会，然后，在不使用这个数组时，将内存空间释放。动态数组应用动态数组应用【应用】利用输入对话框，输入不同水果单词，并且将其存放在数组中。当输入空串时停止输入，最后将输入的水果单词显示在文本框中。lyc
4、heesblueberriesbananas界面设计动态动态数组应用数组应用代码设计Private Sub Command1_Click()Dim str()As String Dim max As Integer max=-1 Do tem=InputBox(请输入水果单词，输入空串结束。)If Trim(tem)=Then Exit Do End If动态动态数组应用数组应用代码设计 max=max+1 ReDim Preserve str(max)As String 重新分配空间，并保留数组原有数据 str(max)=tem Loop s=For i=0 To max s=s+str(i)+Chr(13)+Chr(10)Next i Text1.Text=sEnd Sub总总 结结 动态数组，给了我们短时间使用大数组的机会。定义动态数组，需分两步进行。可用ReDim语句改变数组大小，也可改变数组的维数。
