VB中的数组

前端之家收集整理的这篇文章主要介绍了VB中的数组前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

5.1数组的概念

1引例

  求100个学生的平均成绩及超过平均成绩的人数。

  如果用一般变量来表示成绩,需要用100个变量,如:mark1mary2、……mark100。若用数组,可以只用一个来表示mark1

To
 100)。

2基本概念

  数组:是同类型变量的一个有序的集合。

   如:A1 To 100),表示一个包含100个数组元素的名为A的数组。

  数组元素即数组中的变量。用下标表示数组中的各个元素。

 表示方法数组名P1P2,……)

   其中P1P2表示元素在数组中的排列位置,称为“下标”。

 如:A32)代表二维数组A中第3行第2列上的那个元素。

  数组维数由数组元素中下标的个数决定,一个下标表示一维数组,二个下标表示二维数组。

  VB中有一维数组、二维数组、……最多60维数组。

  下标:下标表示顺序号,每个数组有一个唯一的顺序号,下标不能超过数组声明时的上、下界范围。下标可以是整型的常数、变量、表达式,甚至又是一个数组元素。

     下标的取值范围是:下界To上界,缺省下界时,系统默认取0

3数组声明

 数组必须先声明后使用。声明数组就是让系统在内存中分配一个连续的区域,用来存储数组元素。

 声明内容数组名、类型、维数、数组大小

      一般情况下,数组中各元素类型必须相同,但若数组为Variant时,可包含不同类型的数据。

 静态数组:声明时确定了大小的数组。

 动态数组:声明时没有给定数组大小(省略了括号中的下标),使用时需要用ReDim语句重新指出其大小。

使用动态数组的优点是根据用户需要,有效地利用存储空间,它是在程序执行到ReDim语句时才分配存储单元,而静态数组是在程序编译时分配存储单元。

5.2静态数组及声明

1一维数组

静态一维数组的声明形式:

Dim数组名(下标)[As类型]

说明:1)下标必须为常数,不可以为表达式或变量;
   2)下标下界最小为-32768,最大上界为32767;省略下界,其默认值为0,一维数组的大小为:上界-下界+1
   3如果省略类型,则为变体型

: (1Dim A10As Integer
     声明了A是数组名、整型、一维数组、有11个元素,下标的范围是010
  2Dim B-3 To 5As String*3
     声明了B是数组名、字符串型、一维数组、有9个元素,下标的范围是-35,每个元素最多存放3个字符。

2多维数组

  静态多维数组的声明形式:
  
Dim数组名(下标1[,下标2][As类型]

  说明: (1)下标个数决定数组的维数,最多60维。
     2)每一维的大小=上界-下界+1;数组的大小=每一维大小的乘积。

  例Dim C-1 To 54As Long
   声明了C是数组名、长整型、二维数组、第一维下标范围为-15,第二维下标的范围是04,占据7x 5个长整型变量的空间。

3注意事项

  (1)在有些语言中,下界一般从1开始,为了便于使用,在VB的窗体层或标准模块层用Option Base n语句可重新设定数组的下界,如Option Base 1
 2)在数组声明中的下标关系到每一维的大小,是数组说明符,而在程序其他地方出现的下标为数组元素,两者写法相同,但意义不同。
 3)在数组声明时的下标只能是常数,而在其他地方出现的数组元素的下标可以是变量。

5.3动态数组及声明

1动态数组的建立与声明

  建立动态数组的方法是:利用DimPrivatePublic语句声明括号内为空的数组,然后在过程中用ReDim语句指明该数组的大小。语法是:
 ReDim数组名(下标1[,下标2][As类型]
 
其中下标可以是常量,也可以是有了确定值的变量,类型可以省略,若不省略,必须与Dim中的声明语句保持一致。

  例:Dim DAs Single
    SubForm_Load
     ……

    ReDimD46
    ……
    
End Sub

2注意事项

  (1)在动态数组ReDim语句中的下标可以是常量,也可以是有了确定值的变量;
  (
2)在过程中可以多次使用ReDim来改变数组的大小,也可改变数组的维数。
  (
3)每次使用ReDim语句都会使原来数组中的值丢失,可以在ReDim语句后加Preserve参数来保留数组中的数据,但使用Preserve只能改变最后一维的大小,前面几维大小不能改变。

3动态数组使用示例

5.4数组的基本操作

1给数组元素赋初值

  (1)利用循环结构

    例:Dim iA(1 To 10) As Integer
      Fori=1 To 10
         A(i)=0
       Nexti

  (2)利用Array函数

    例:Dim a As Variant,b As Variant,i%
       a = Array (1,2,3,4,5)
        b = Array ("abc","def","67")
      
Fori=0 ToUbound(a)
            Picture1.print a(i);"";
          Nexti
          Fori=0 ToUbound(b)
            Picture1.print b(i);"";
            Nexti

2数组的输入

 (1)通过InputBox函数输入适合输入少量数据。

   例:Dim sB(3,4) As singer
      Fori=0 To 3
      For j=0 To 4
       SB(i,j) =InputBox("输入" &i& j & "的值")
       Next j
       Nexti

 (2)通过文本框控件输入

  对大批量的数据输入,采用文本框和函数split()\join()进行处理,效率更高。

3数组的赋值

 在VB6.0中可以直接将一个数组的值赋值给另一个数组:
   Dim a(3) as integer,b() as integer
   A(0)=2: A(1)=5: A(2)=-2: A(3)=2
   b=a

 在早期的VB中,这需要用循环语句才可以实现:
  ReDimb(UBound(a))
   For I=0 toUBound(a)
     b(I)=a(I)
    Nexti

注意:(1)赋值号两边的数据类型必须一致;
    2)如果赋值号左边的是一个动态数组,则赋值时系统自动将动态数组ReDim成右边相同大小的数组;
    3)如果赋值号左边的是一个大小固定的数组,则数组赋值出错。

4数组的输出

  用For……Next循环语句输出

5求数组中最大元素和所在下标及各元素之

  求数组中最大元素及下标,一般假设第一个元素及下标为最大,然后将该数与数组中的其他元素逐一比较,若有比其大的就替换,同时替换下标。

6交换数组中各元素

  交换的要求是将数组第一个元素与最后一个交换,第二个与倒数第二个交换,依次类推。

5.5控件数组

1控件数组的概念

  控件数组是由一组相同类型的控件组成的,它们共用一个控件名,具有相同的数组。控件数组适用于若干个控件执行的操作相似的场合,控件组共享同样的事件过程。控件数组通过索引号(属性中的Index)来标识各控件,第一个下标是0。如:Text1(0)Text1(1)Text1(2)Text1(3)……

2控件数组的建立

1)在设计时建立
  步骤:1在窗体上画出某控件,并进行属性设置
     2选中该控件进行“复制”和“粘贴”操作,系统提示“是否建立控件数组”,选择是即可。多次粘贴就可以创建多个控件元素。
     3进行事件过程的编程。

2)运行时添加控件数组

  方法1在窗体上画出某控件,设置该控件的Index值为0,表示该控件为数组。
     
2在编程时通过Load方法添加其余若干个元素,也可以通过Unload删除某个添加的元素。
     
3每个添加的控件数组通过LeftTop属性,确定其在窗体上的位置,并将Visible设置为True

  使用示例:建立一个类似国际象棋的棋盘,要求黑白交替,运行时单击某个棋格,会改变颜色并显示其序号。

5.6自定义数据类型

1.自定义数据类型的定义

   是指由若干标准数据类型组成的一种复合类型,也称为记录类型。

1)定义方式:

  Type自定义类型名
    元素名[(下标)] As类型名
     ……
    元素名[(下标)]As类型名
 
End Type

   元素名:表示自定义类型中的一个成员
   下标(可选):表示是数组,
   类型名:为标准类型

  例:定义一个学生信息的自定义类型:
   
Typestudtype
     NoAs Integer
'定义学号
     
Name As String*10'定义姓名
   
  Sex As String*2'定义性别
   
  Mark(1 TO 4) As Single'定义4门课程的成绩
     
Total As Single'定义总分
   
End Type

2)注意事项

  1自定义类型一般在标准模块(.bas)中定义,默认是Public
  2自定义类型中的元素可以是字符串,但应是定长字符串
  3)不可把自定义类型名与该类型的变量名混淆
 4)注意自定义类型变量与数组的差别:它们都由若干元素组成,前者的元素代表不同性质、不同类型的数据,以元素名表示不同的元素;后者存放的是同种性质、同种类型的数据,以下标表示不同元素。

2.自定义型变量的声明和使用

   使用形式:Dim变量名 As自定义类型名
  
例如:Dim student Asstudtype,mystudAsstudtype
 
 自定义类型中元素的表示方法是:变量名.元素名如:student.namestudent.mark(4)
  
为了简单起见,可以用
With……End With语句进行简化。例:
   With student
     .no=99001
     .name=""
     .sex=""
     .total=0
      for I=1 to 4

    .mark(I)=int(rnd*101)'随机产生0 - 100之间的分数
     .total=.total+.may(I)
    next I
    End With
   
Mystud=student'同种自定义类型变量可以直接赋值

3.自定义类型数组的使用

   自定义类型数组就是数组中的每个元素都是自定义类型。
   例如:自定义一个由学生姓名、成绩组成的学生记录类型,用来存放
100个学生的记录。

原文链接:https://www.f2er.com/vb/260871.html

猜你在找的VB相关文章