版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
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. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 陶瓷工艺品雕塑师冲突解决评优考核试卷含答案
- 桑树育苗工班组考核强化考核试卷含答案
- 链条装配工持续改进测试考核试卷含答案
- 砖瓦码窑工岗前技术实务考核试卷含答案
- 熔解澄清工安全应急竞赛考核试卷含答案
- 初步认识轴对称图形 教学设计(湘教版数学七年级下册)
- 《未来的我们》教案-2025-2026学年苏少版(新教材)小学美术三年级下册
- 2026年公司股权变更协议范本
- 护理岗位重症监护技能
- 风电行业2026年投资策略分析报告:国内外景气共振需求格局变化储能
- 中建施工升降机安拆专项施工投标方案技术标-含检查表(2025年)
- 2025-2026学年中图版(北京)(新教材)初中地理物八年级下册教学计划及进度表
- 2026年春季北师大版三年级下册小学数学教学计划含教学进度表
- 甘南藏族自治州(2025年)公开遴选公务员笔试题及答案解析(A类)
- 2026年长沙电力职业技术学院单招综合素质笔试备考试题含详细答案解析
- 2026年驻马店职业技术学院单招综合素质笔试模拟试题含详细答案解析
- 《液压传动与气动技术(第3版)》中职全套教学课件
- 【《汽车车门的轻量化设计与仿真》18000字(论文)】
- 机场安检介绍
- 2026马年开学第一课:策马扬鞭启新程
- DB32/T+5311-2025+港口与道路工程+固化土施工技术规范
评论
0/150
提交评论