2011年计算机等级考试二级VB基础教程辅导(21)(3)

2026-02-07
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中,这需要用循环语句才可以实现:

ReDim b(UBound(a))

For I=0 to UBound(a)

b(I)=a(I)

Next i

注意:(1)赋值号两边的数据类型必须一致;

(2)如果赋值号左边的是一个动态数组,则赋值时系统自动将动态数组ReDim成右边相同大小的数组;

(3)如果赋值号左边的是一个大小固定的数组,则数组赋值出错。

4.数组的输出

用For……Next循环语句输出。

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

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

6.交换数组中各元素

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