当前位置：文档之家 › 第4章 数组、枚举和自定义数据类型 Visual Basic(VB) 教学课件

第4章 数组、枚举和自定义数据类型 Visual Basic(VB) 教学课件

  • 格式：ppt
  • 大小：483.50 KB
  • 文档页数：31

下载文档原格式

  / 31

合集下载

visualbasic程序设计教案：数组

visualbasic程序设计教案：数组

§3.6 数组数组是按一定顺序排列，具有相同类型的变量的集合。

VB中将数组分为静态数组和动态数组，静态数组在声明时必须指明数组的维数和变量的个数；动态数组在声明时仅定义数组的名称和类型，然后在执行程序的过程中，根据实际需要再用ReDim语句定义数组的维数及变量的个数，而且允许使用简单变量来进行数组中变量个数的定义。

数组的使用在管理信息系统软件的程序设计中有着不可替代的作用，离开数组的使用，某些程序的编制将会变得非常麻烦，甚至导致程序编制的失败，因此数组是程序设计人员必须熟悉和掌握的必备知识。

【教学要求】了解：数组的概念。

理解：静态数组和动态数组的区别；控件数组的作用。

掌握：数组的定义及使用方法；控件数组的应用。

【本节重点】动态数组的应用。

控件数组的应用。

【本节难点】动态数组的应用。

一、静态数组及声明1、一维数组一维数组的定义如下：Dim <数组名> ([下界To]上界) [As 类型]若缺省下界，系统默认为0。

例：Dim num（1 To 50）As Integer2、多维数组VB中数组的维数允许最多可达60维。

多维数组的定义格式如下：Dim <数组名>（[下界1 To]上界1，[下界2 To]上界2……）[As 类型] 例：Dim A（12，50），C（10）As Double二、动态数组动态数组在声明时只定义数组名或数组名及类型，不指定大小，在执行程序的过程中，再根据需要用Redim语句重新定义数组的大小。

重新定义动态数组的语句格式如下：Redim <数组名>（下标1[，下标2……]）注意：（1）Redim语句中的下标可以是已被赋值的变量。

（2）在过程中可多次使用Redim来改变数组的大小和维数。

（3）每次使用Redim语句都会使原数组中的数据丢失，如需要保留原数组数据，可用Preserve参数来保留，使用该参数只能改变最后一维的大小。

例：在程序运行时由操作者指定一个一维数组的变量个数，然后由计算机自动产生一组随机数存放到一维数组中，并将此组随机数在窗体上打印出来。

VB_数组

VB_数组

功能：声明一个二维数组或多维数组并分配相应的存储单元。
说明：参数与一维数组完全相同。下标的个数决定了数组的 维数，多维数组最大维数为60。每一维的大小为：上界－下 界＋ 1 ；数组的大小（数组元素的总个数）为每一维大小的 乘积。 例如：Dim a(2,3) As Single
二维数组在内存的存放顺序是“先行后列”。例如数组a 的各元素在内存中的存放顺序是：
数组声明语句完成四个任务：
① 建立数组名。 ② 建立数组的数据类型。 ③ 指定数组中元素的数目。 ④ 初始化数组中每个元素的值(数值数组元素为 0，字符串数组元素为空字符串，Variant数组元 素的值为特别值Empty)。
4.1.2 静态数组和动态数组
1. 静态数组声明 在声明时确定了大小的数组称为静态数组 (1) 一维数组的声明 (无隐式声明) Dim 数组名([下界 To] 上界) [As 数据类型] 或： Dim 数组名[数据类型符] ([下界 To] 上界) 例：Dim a(1 To 10) As Integer 1是下标的下界 ' 声明了a数组有10个元素 数组元数的数据类型
2. 数组元素初始化 系统默认的数组初值：0，空字符串，Empty。 若需给数组的各元素赋具体值，常用循环语句实现。 例如： Dim A(10) As Integer
Dim i As Integer
For i=0 To 10 A(i)= i * i Next i
4.2.2 数组的输入、输出和复制
数组分类: VB中的数组，按不同的方式可分为以下几类： 按数组的大小（元素个数）是否可以改变来分为：静 态(定长)数组、动态（可变长）数组。 按元素的数据类型可分为：数值型数组、字符串数组、 日期型数组、变体数组等。 按数组的维数可分为：一维数组、二维数组、多维数 组。 对象数组：菜单对象数组、控件数组。

vb4VB语言基础

vb4VB语言基础

为了使变量 bj 在两个事件过程中都起作用， 在两个事件过程中都起作用， 必须在窗体级说明这一变量。 必须在窗体级说明这一变量。 声明” 在“通用_声明”栏对变量说明： 通用 声明 栏对变量说明： Dim bj As Single
Dim bj As Single Private Sub ml1_Click() bj = InputBox("请输入你的本金数！", "输入框", 0) bq2.Caption = bj End Sub Private Sub ml2_Click() For t = 1 To 10 i = bj * 0.125 bj = bj + i Next t bq4.Caption = Format(bj, "####.00") End Sub
2. 字符串函数
Len(字符串 字符串) 字符串 求字符串的长度 Lcase(字符串 字符串) 字符串 将字符串中的所有字母变成小写 Ucase(字符串 字符串) 字符串 将字符串中的所有字母变成大写 Ltrim$(字符串 字符串) 字符串 去除字符串左边的空格 Rtrim$(字符串 字符串) 字符串 去除字符串右边的空格 Left$(字符串 n) 取字符串左边 个字符 字符串, 取字符串左边n个字符 字符串 Right$(字符串 n) 取字符串右边 个字符 字符串, 取字符串右边n个字符 字符串 Mid$(字符串 字符串,p,n) 从p位置开始向右取字符串的 个字符 位置开始向右取字符串的n个字符 字符串 位置开始向右取字符串的 Space$(n) 产生n个空格 产生 个空格 String$(n, 字符串 返回由字符串中首字符组成的 个字符的字符串 字符串) 返回由字符串中首字符组成的n个字符的字符串 InStr([起始位置 字符串 字符串 在串 中找串 若找到 返回 起始位置],字符串 字符串2) 中找串2, 起始位置 字符串1,字符串 在串1中找串 若找到,

第四章 vb教程

第四章 vb教程

Y(0,0,0), Y(1,2,5)
数组的下标和维数 数组的下标即数组的索引,规定了数组元素的个数和位 置,下标值可以唯一确定一个数组元素.(取值范围:允许 的最小值称为下界,允许的最大值称为上界 ) 数组的维数:数组的下标的个数 数组分类(按不同的方式可分为以下几类) 数组分类(按不同的方式可分为以下几类) 按数组的大小是否可以改变来分为:定长(固定大小)数组, 按数组的大小是否可以改变来分为 动态(可变大小)数组. 按元素的数据类型可分为:数值型数组,字符串数组,日期型 按元素的数据类型可分为 数组,变体数组等. 按数组的维数可分为:一维数组,二维数组,多维数组. 按数组的维数可分为 对象数组:控件数组. 对象数组
3.数组维数错:数组声明时的维数与引用数 组元素时的维数不一致. Dim a(3, 5) As Long a(i)=10 4.Aarry函数与Split函数使用问题: Aarry函数与Split函数只能对Variant类 型的变量或动态数组赋值.
�
数组的定义
定长数组及声明(元素个数在程序运行期间不可变): 定长数组 形式为: 数组名(下标1[,下标2 ]) 1[,下标 类型] Dim 数组名(下标1[,下标2…]) [As 类型] private,public,static) (private,public,static) 或: 数组名[<数据类型符>]([<下界>to]<上界>) [<数据类型符>]([<下界>to]<上界 Dim 数组名[<数据类型符>]([<下界>to]<上界>) 例:Dim a(1 to 10) As Integer '声明了a数组有10个元素 与上面声明等价形式: Dim a%(1 to 10)

visual basic程序设计基础全套教程、教案第四章VB语言基础ppt课件_图文

visual basic程序设计基础全套教程、教案第四章VB语言基础ppt课件_图文

(二) 变量
一个有名称的内存位置称为变量 变量用来存储数据，每个变量都有一个名字和相应的数据类型 1、变量名的命名规则 •只能由字母、数字和划线组成 •名字的第一个字符必须是英文字母或汉字 •名字最长为255个字符 •类型申明符可以出现在变量名之后 •不能用VB的保留字作为变量名 练习：下面哪些是合法的变量名 A ）a B)abcd# C)a$x D)c_e E)xx$ F) Rem G）4dele* H)print 2、变量的类型和定义 •变量的类型是通过类型说明符来标识的 如：total! lname#
➢仅含有空格的字符串和空字符串是不一样的，前者字符 串长度不为零 ，后者长度为零
VB6.0的字符串又分为定长字符串和变长字符串
如：Dim a as string *20 作用：声明长度为20的定长字符串变量a
dim b as string
作用：声明字符串bianchang 变量b
2.数值型
字节型：用1个字节 存储的无符号十进制数
Public或 Global
1.下列四个选项中，是VB的数值常量的是 A)1E-6 B)1*E6 C)1E D)1*E-6 2. 下面四个数中，作为常量有语法错误的是 A)123.456# B)1234! C)1.32D-23 D)1.89E1.1 3.VB规定，不同类型的数据占用存储空间的长度是不同的，下列各组数据类型中，满足占用存储 空间从小到大的顺序排列的是 A）Byte,Integer,long,Double B)Byte,Integer,Double Boolean C)Booblen,byte ,Integer,Double D)Booblen,Byte,Integer,long 4.当用 const A =9.8定义后，下列叙述正确的是 A）A是整型常数 B）A是整型变量 C）A是单精度常数 D）A是变体型的常数

VB完整课件PPT

VB完整课件PPT

7. Forecolor前景颜色属性 设置控件的前景颜色（即正文颜色)。其值是一个十六 进制常数，用户可以在调色板中直接选择所需颜色。 8. Backcolor背景颜色属性 9. Backstyle背景风格属性 0-transparent：透明显示，即控件背景颜色显示不出来。 10. BorderStyle边框风格属性 0-None：控件周围没有边框 。 1-Fixed Single：控件带有单边框。 11. Alignment属性 控件上正文水平对齐方式 0：正文左对齐 ；1：右对齐；2：居中。 12. AutoSize属性 控件是否根据正文自动调整大小， False 13. WordWarp属性 AutoSize True时，WordWarp才有效。 按正文字体大小在垂直方向上改变显示区域的大小。
目前的最新版本是VB 2010 测试版
1.1可视化编程的概念
Visual的英文含义就是可视化，“可视的Basic” 这个名字可能抽象了点，但实际上它却是最直观的 编程方法，不需要编写大量代码去描述界面元素的 外观和位置，只要把预先建立好的对象拖放到屏幕 上相应的位置即可。 在VB中引入了控件的概念，在Windows中控件 的身影无处不在，如按钮、文本框等，VB把这些控 件模式化，并且每个控件都有若干属性用来控制控 件的外观，工作方法。
8. 立即窗口
• 在中断模式下，用以显示变量值或属性值和 设置变量值或属性值；检查和调试程序；控 制单步执行；输出中间结果；执行单行命令 等。
1.4
VB的有关概念
1. 类 是创建对象实例的模板, 包含创建对象的属 性描述和行为特征的定义。类属于一种数据类型， 被类说明的变量称为对象。 2. 对象 是类的一个实例，继承了类的属性、方法。 VB中常用的对象有：窗体、各种控件等。 3. 对象的建立和命名 4. 对象的三要素 （1）属性 对象的性质，即用来描述和反映对象特征 的参数。

VB教程第4章


Dim myArray(4, 4) As Integer ' 在窗体级模块声明一个二维数组 ' 命令按钮"生成数组"的Click事件,生成一个二维数组 命令按钮"生成数组" 事件, 事件 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _Handles Button1.Click Dim i, j As Integer ' 声明循环体变量 Dim str As String = "" ' 声明用来数组显示的字符串变量 For i = 0 To 4 For j = 0 To 4 myArray(i, j) = Int(Rnd() * 90) + 10 str = str & "myArray" & "(" & i & " , " & j & ")" & " = " & myArray(i, j) & Chr(10) Next Next RichTextBox1.Text = str ' 数组赋值给多行文本框显示 End Sub
Preserve参数用来保留现有数组中的数据. Preserve参数用来保留现有数组中的数据. 参数用来保留现有数组中的数据
例如: 例如: ' 声明 声明MyArray为二维数组 为二维数组 Dim MyArray(,) As Double ' 声明MyArray二维数组的元素个数 声明 二维数组的元素个数 ReDim MyArray(5, 5)

Visual Basic程序设计VB第4章电子讲稿


分析：在过程中间我们不仅用到上一章的函数比如：“Exit Sub”是退出 过程，函数Len（字符串）可得到字符串的长度，函数IsNumeric（字符 串）可检验字符串是否是数值，更重要的时，程序代码中会用到条件句 来进行判断，即我们这一章所讲的重点之一，条件句。
4.1条件语句案例
【技术要点】 界面设计 修改控件属性。 3．编写代码及调试程序。 Private Sub Command1_Click() If Textxm = "" Then Textxm.SetFocus Exit Sub End If If Textxb = "" Then Textxb.SetFocus Exit Sub End If If Textdz = "" Then Textdz.SetFocus Exit Sub End If
4.1条件语句案例
Private Sub Textdh_LostFocus() If Textdh.Text <> "" Then If Len(Textdh.Text) <> 8 Or Not IsNumeric(Textdh.Text) Then MsgBox "电话输入位数不对或者输入的内容为非数字，请确定并重新 输入" Textdh.Text = "" Textdh.SetFocus End If End If End Sub Private Sub Textxb_LostFocus() If Textxb.Text <> "" Then If Textxb.Text <> "男" And Textxb.Text <> "女" Then MsgBox "性别只能是男或女，你输入有误，请确定并重新输入" Textxb.Text = "" Textxb.SetFocus End If End If End Sub

第4章 数组、枚举和自定义数据类型 Visual Basic(VB) 教学课件

对数组元素的输入可以有多种方法： • 可以使用文本框 • InputBox函数 • 赋值语句 • Array函数
变量名=Array(数组元素值表） 例：A=Array(1,2,3,4,5,6,7,8,9,10) 数组元素经过处理后，常需要将结果显示给用户，即数组 元素的输出。可以使用Print方法输出数组元素，也可以使用 控件输出数组元素，如标签、文本框、列表框、组合框等。
• 用两个下标来表示元素的数组称为二维数组。对于可以表示 成表格形式的数据，如矩阵、行列式等，用二维数组来 表示是比较方便的。若要表示一到六班(设各班有40人)共240 个学生的英语成绩，可以用二维数组表示G(6,40)，第一个下 标表示班级号，第二个下标表示学号，则一班30号学生的成 绩可以表示成G(1,30)。
9
3)<维数定义>形式为： [<下界1> To] <上界1>，[<下界2> To] <上界2>，…
下界和上界规定了数组元素每一维下标的取值范围。省略 时，VB默认下界值为0，可以使用Option Base语句将默认下 界修改为1。
Option Base语句的格式为：
Option Base(0 | 1) Option Base语句只能在模块级中使用，用来声明数组下 标的缺省下界，它只影响位于包含该语句的模块中的数组 的下界。 4)< 数 据 类 型 > 可 以 是 Integer 、 Long 、 Single 、 Double 、 Boolean、String(可变长度字符串)、String *n(固定长度字符 串)、Currency、Byte、Date、Object、Variant、用户定义类 型或对象类型。与声明变量类似，一个As <数据类型>只能 定义一个数组的类型。

916035-Visual Basic大学应用教程-VB课件第4章


5
VB程序设计与数据库应用
4.1.4 多分支语句（Select Case语句）
在某些情况下，对某个条件判断后可能出 现多种取值的情况，需要使用多分支选择 结构语句来完成。
在多分支结构中，只有一个用于判断的表 达式，根据表达式的不同计算结果，执行 不同的语句序列。
6
VB程序设计与数据库应用
4.2 循环结构程序设计
选择结构能根据指定条件的当前值在两条或多
条程序路径中选择一条执行，它为处理多种复
杂情况提供了便利条件。VB中选择结构语句
包含If语句和Select Case语句两种。
2
VB程序设计与数据库应用
4.1.1 单行If语句
单行结构条件语句，是一种双分支选择结构其格 式为： If<条件>Then<语句序列1> [Else<语句序列2>
4
VB程序设计与数据库应用
4.1.3 IIf函数
IIf 函 数 可 用 来 执 行 简 单 的 条 件 判 断 操 作 ， 它 和 “If…Then…Else”语句有类似的功能。格式为： Iif (<条件>，<True部分>， <False部分>)
其中“条件”是一个逻辑表达式。当“条件”为真 时，IIf函数返回“True部分”，若“条件”为假， 则 返 回 “ False 部 分 ” 。 这 里 “ True 部 分 ” 和 “False部分”可以是表达式、变量或其他函数。
Sub过程和Function过程 过程参数的传递和过程的嵌套。
15
VB程序设计与数据库应用
4.4.1 Sub 过程
在程序设计中，如果某个功能的程序段需要多 次重复使用，可把这个程序段独立出来组成一个 程序，叫子程序，也称为子过程。
  1. 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
12
1．格式
定义动态数组需要分以下两步进行：
1)在模块级或过程级按以下格式定义一个没有下标的数 组。
Public | Private | Dim|static|Global <数组名>( ) [As <数据类型]，…
这里的Public、Private、Dim、Static、Global的作用与固 定大小的数组的定义相同。
9
3)<维数定义>形式为： [<下界1> To] <上界1>，[<下界2> To] <上界2>，…
下界和上界规定了数组元素每一维下标的取值范围。省略 时，VB默认下界值为0，可以使用Option Base语句将默认下 界修改为1。
Option Base语句的格式为：
Option Base(0 | 1) Option Base语句只能在模块级中使用，用来声明数组下 标的缺省下界，它只影响位于包含该语句的模块中的数组 的下界。 4)< 数 据 类 型 > 可 以 是 Integer 、 Long 、 Single 、 Double 、 Boolean、String(可变长度字符串)、String *n(固定长度字符 串)、Currency、Byte、Date、Object、Variant、用户定义类 型或对象类型。与声明变量类似，一个As <数据类型>只能 定义一个数组的类型。
2)可以用ReDim语句反复改变数组元素及维数的数目。 3)在定义动态数组的两个步骤中，如果用步骤(1)定义了数 组的类型，则不允许用步骤(2)改变类型。 4)每次执行ReDim语句时，当前存储在数组中的值会全部 丢失。VB重新对数组元素进行初始化，即将可变类型数组 元素值置为Empty，将数值型数组元素值置为0，将字符串 类型数组元素值置为零长度字符串。 5)使用Erase语句将释放动态数组所占的存储空间，Erase 语句格式为：
按数组占用存储空间的方式不同，VB有两种数组：固定 大小的数组和动态数组。两种数组的定义方法不同，使用 方法也略有不同。
固定大小的数组是指数组元素的个数在程序的执行期间 不能改变的数组。这种数组在编译阶段就已经确定了存储 空间，直到程序执行完毕。
8
一、 固定大小的数组的定义
1．格式
Public | Private | Dim|static|Global <数组名>(<维数定义>)[As <类型>]，…
第4章 数组、枚举和自定义数据类型
教学目的要求：
• 掌握数组和控件数组的概念及应用 • 了解枚举和自定义数据类型
教学重点：
• 数组和控件数组的应用
1
• 数组用于表示一组性质相同的有序的数，这一组数用一 个统一的名称来代替，称为数组名。数组名的命名规则与 简单变量的命名规则相同。 • 数组中的每一个元素称为数组元素。为了在处理时能够 区分数组中的每一个元素，需要用一个索引号加以区别， 该索引号称为下标。数组中的每一个元素可以用数组名和 下标唯一地表示，写成：数组名(下标)。
4
• 数组元素在程序中的使用与简单变量类似，在简单变 量允许出现的多数地方也允许出现数组元素。数组元素也 称为下标变量。
在表示数组元素时，应注意以下几点： 1)要用圆括号把下标括起来，不能用中括号或大括号代 替，也不能省略圆括号。 2)下标可以是常量、变量或表达式，其值必须是整数， 否则将被自动四舍五人为整数。 3)下标的最小取值称为下界，下标的最大取值称为上界 。在不加任何说明的情况下，数组的下界默认值为0。
2)在过程级使用下面的ReDim语句分配数组的实际元素 个数。
ReDim <数组名>(<维数定义>) [As <类型>]，… 这里的<维数定义>通常包含变量或表达式，但其中的变 量或表达式应有明确的值。
13
2. 说明
1)ReDim 语 句 只 能 出 现 在 过 程 中 。 与 Dim 语 句 不 同 ， ReDim语句是一个可执行语句。
Erase <数组>
该语句用于对固定大小数组中的所有元素进行初始化，即 将可变类型数组元素值置为Empty，将数值型数组元素值置为 o，将字符串类型数组元素值置为零长度字符串。
11
二、 动态数组的定义
动态数组是指在程序执行过程中数组元素的个数可以改 变的数组。动态数组也叫可变大小的数组。
使用动态数组就可以在任何时候改变其大小，并且可以 在不需要时清除动态数组所占的存储空间。因此，使用动 态数组更加灵活、方便，并有助于高效管理内存。
• 用两个下标来表示元素的数组称为二维数组。对于可以表示 成表格形式的数据，如矩阵、行列式等，用二维数组来 表示是比较方便的。若要表示一到六班(设各班有40人)共240 个学生的英语成绩，可以用二维数组表示G(6,40)，第一个下 标表示班级号，第二个下标表示学号，则一班30号学生的成 绩可以表示成G(1,30)。
2．功能 声明数组，包括确定数组的名称、维数、每一维的大小和 数组元素的类型，并为数组分配存储空间。
3．说明 1)在模块的声明段中使用Public语句用于建立一个公用数组 (注意，不能是窗体模块)。在模块的声明段用Private语句或 Dim语句用于建立一个模块级数组。在过程中用Dim语句用 于建立一个过程级数组。Static声明一静态数组。Global在标 准模块中声明一全局数组 2)<数组名>必须是一个合法的变量名。
5
例如，1000个学生的数学成绩，可以统一取名为MScore。 用MScore(1)表示第一个同学的数学成绩(下标为1)， MScore(345)表示第345个同学的数学成绩(下标为345)。
6
ቤተ መጻሕፍቲ ባይዱ
数组的维数
• 一个数组的元素只有一个下标，则称为一维数组。例如，一 班 40 名 同 学 的 英 语 成 绩 可 以 表 示 成 G(1) 、 G(2) 、 G(3)……G(40)。
• 根据需要，还可以使用三维数组、四维数组等，VB最多允 许有60维。
7
4.1.2 数组的定义
数组在使用之前必须先声明，声明数组的目的是为数组 分配存储空间，数组名即为这个存储空间的名称，而数组 元素即为存储空间的每一个单元。每个单元的大小与数组 的类型有关。例如，定义某数组X为整型数组，共有10个 元素，则每个元素占2个字节，整个数组占20 个字节的存储空间。
10
5)声明数组后，VB自动对数组元素进行初始化，将可变类型 数组元数值置为Empty，数值类型数组元数值置为0，字符串 类型数组元数值置零长度字符串。 6)在编译时计算机为固定大小的数组分配固定的存储空间，在 运行期不能改变。 7)可以使用Erase语句清除固定大小数组中的元素值。 Erase语句格式为：