计算机vb二级考试经典课件.pptVIP

计算机vb二级考试经典课件;(4)下界默认为0，希望下标从1开场，格式设置：

OptionBase1

(5)注意区分数组和数组元素。例如：

Dima(5)与a(5)

第二种格式

Dim数组名(下界To上界)as类型名称

DimArr1(-2To3),Arr1(-2To3,0To4)

Dimarr(8,3)

Dimarr(0to8,0To3)

Dimarr(8,0To3)

以上三个数组均为等价的二维数组。

;例:语句Dima〔-3To4,3To6〕Asinteger定义的数组的元素个数是

(年3月考题)

???A〕18 B〕28

C〕21 D〕32??

〔21〕默认情况下，下面声明的数组的元素个数是(.3考题)

Dima(5，-2to2〕

A)20 B)24

C)25 D)30;〔28〕假设在窗体模块的声明部分声明了如下自定义类型和数组(年3月考题)

PrivateTyperec

CodeAsInteger

CaptionAsString

EndType

Dimarr(5)Asrec

则下面的输出语句中正确的选项是

A)Printarr.Code(2),arr.Caption(2)

B)Printarr.Code,arr.Caption

C)Printarr(2).Code,arr(2).Caption

D)PrintCode(2),Caption(2);在定义数组时，要注意以下几点：

●在同一过程中，数组名不能与变量名同名，否则会出错。

例如：

Privatesubform_Click()

Dima(5)

Dima

a=8

a(2)=10

Printa,a(2)

Endsub;●在定义数组的元素个数必须是常数，不能是变量或表达式。例如：

Dimarr2(n)

Dimarr3(n+5)

均为错误。即使在定义数组前给出n值，也是错误的。例如：

n=InputBox(输入n的值)

Dimarr4(n)

运行将产生错误的信息，如图：

用ReDim定义就不会错，上例改为：

n=InputBox(输入n的值)

ReDimarr4(n)

●也可由类型说明符来指定数组类型。例如：

Dima%(5),b!(3to8),c#(12)

;5.2静态数组与动态数组

静态数组：编译时开拓内存区(下标为常数).

动态数组：运行时开拓内存区(下标为变数)。

一、动态数组的定义〔通常分两步)

(1)在窗体层、标准模块或过程中用Dim或public声明一个没有下标的数组.如：

Dimb()asinteger(b()指明类型)

(2)在过程中用ReDim语句定义带下标的数组。如：

n=inputbox(enteraData〕

ReDimb(n)

;Dimb()

PrivateSubForm_Click()

…….

ReDimb(n)

……

ReDimb(m)

……

Endsub;(3)动态数组中可随时改变数组中元素个??。但不能改变数组的维数和数组的类型。例如：

Dimthis()AsString

PrivateSubForm_Click()

ReDimthis(6)

this(2)=Microsoft

Printthis(2)

ReDimthis(4)

this(3)=VisualBasic

Printthis(3)

Printthis(2)

EndSub

;以下两个程序均为错误：

;例：窗体上有Commal1Commad2两个命令按钮.现编写以下程序:(年9月考题)

OptionBase0

Dima()AsInteger,mAsInteger

PrivateSubCommand1-Click()

m=InputBox(“请输入一个正整数〞)

ReDima(m)

EndSud

PrivateSubCommand2_Click()

m=InputBox(“请输入一个正整数〞)

ReDima(m)

EndSub

运行程序时，单击Command1后输入整数10，再单击Command2后输入整数5，则数组a中元素的个数是

A)5B)6C)1