VB程序设计(第2版)教学课件5-4-动态数组_第1页
VB程序设计(第2版)教学课件5-4-动态数组_第2页
VB程序设计(第2版)教学课件5-4-动态数组_第3页
VB程序设计(第2版)教学课件5-4-动态数组_第4页
VB程序设计(第2版)教学课件5-4-动态数组_第5页
已阅读5页,还剩11页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、VB程序设计动态数组问题引入 想一想,如何利用一个数组存放长度不同的词?lycheesblueberries列表框 动态数组概述1 动态数组定义及说明2 动态数组应用3动态数组动态数组概述1数组在定义时不指定下标值 动态数组提供了一种灵活的管理机制,它在程序运行期间能够根据用户的需要随时改变数组大小。动态数组定义2定义动态数组,需分两步进行:【步骤1】 定义一个没有下标值的数组。 Dim 数组名( ) As 数据类型 【步骤2】 用ReDim语句分配实际的元素个数。 ReDim 数组名(下标) As 数据类型 动态数组说明2【说明】 在步骤1中定义数组,在步骤2中为动态数组分配存储空间。 Re

2、Dim语句是一个可执行语句。动态数组说明2【说明】 可使用ReDim语句多次改变数组的大小,也可改变数组的维数,但不能改为数组的数据类型。 使用ReDim语句会使原数组中的值丢失。 使用Preserve参数可保存数组中原来的数据。动态数组说明2Dim da1() As Integer 定义动态数组ReDim da1(10) As Integer 重新定义数组的大小 再次使用时又重新定义数组的大小ReDim da1(20,20) As Integer正确定义动态数组的方法:动态数组说明2Dim da1() As Integer 定义动态数组ReDim da1(10) As Integer 重新定

3、义数组的大小 再次使用时又重新定义数组的大小ReDim da1(20,20) As Integer正确定义动态数组的方法:动态数组说明2Dim dy() As Integer ReDim dy(10) As Integer ReDim dy(20,20) As String 下面动态数组的定义方法是错误的,你知道错在哪吗?动态数组说明2 动态数组,给了我们短时间使用大数组的机会,然后,在不使用这个数组时,将内存空间释放。动态数组应用3【应用】利用输入对话框,输入不同水果单词,并且将其存放在数组中。当输入空串时停止输入,最后将输入的水果单词显示在文本框中。lycheesblueberriesba

4、nanas界面设计动态数组应用3代码设计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动态数组应用3代码设计 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总 结 动态数组,

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论