國(guó)家二級(jí)VB機(jī)試(數(shù)組)模擬試卷2

一、選擇題(本題共27題，每題1.0分，共27分。)

1、以下數(shù)組定義語句中，錯(cuò)誤的是

A^Statica(10)AsInteger

Dimc(3,lTo4)

C、Dimd(-IO)

D^Dimb(0To5,1To3)AsInteger

標(biāo)準(zhǔn)答案：C」

知識(shí)點(diǎn)解析：本題考查的考點(diǎn)是有關(guān)數(shù)組定義的。在VisualBasic中，可以用4個(gè)

關(guān)鍵字來定義數(shù)組,分別是Dim、ReDim、Public和Static。在VisualBasic中定義

數(shù)組有兩種格式。格式一：DimV數(shù)組名(下標(biāo)上界)〉A(chǔ)sV類型名稱,DimV數(shù)組

名(第一維下標(biāo)上界，第二維下標(biāo)上界l>As<類型名稱,格式二：DimV數(shù)組名

(下界T。上界［,下界T。上界］…)>AsV類型名稱〉其中上界必須大于下界“本題

中選項(xiàng)C采取第一種格式定義數(shù)組，則數(shù)組默認(rèn)下界為0,上界-10小于0,故不

符合要求。

2、下面正確使用動(dòng)態(tài)數(shù)組的是

A、Dimarr()AsInteger...RcDimarr(3,5)

B、Dimarr()AsInteger...ReDimarr(50)AsSiring

C^Dimarr()...ReDimarr(50)AsInteger

D^Dimarr(50)AsInteger...ReDimarr(20)

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：通常把需要在編譯時(shí)分配內(nèi)存區(qū)的數(shù)組叫做靜態(tài)數(shù)組，而把需要在運(yùn)

行時(shí)分配內(nèi)存區(qū)的數(shù)組叫做動(dòng)態(tài)數(shù)組。定義動(dòng)態(tài)數(shù)組通常分兩步：首先在窗體層或

標(biāo)準(zhǔn)模塊中用Dim、Private或Public聲明一個(gè)沒有下標(biāo)的數(shù)組(括號(hào)不能省略)，然

后在過程中用ReDim語句定義帶下標(biāo)的數(shù)組。ReDim語句只能用于動(dòng)態(tài)數(shù)組，它

可以改變每一維的大小，但不能改變維數(shù)和數(shù)組類型。

3、語句DimArr(-2To4)AsInteger所定義的數(shù)組的元素個(gè)數(shù)為

A、7個(gè)

B、6個(gè)

C、5個(gè)

D、4個(gè)

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：數(shù)組中所含有的元素個(gè)數(shù)為：上界?下界+1,本題中計(jì)算4-(?

2)+1=7。

4、以下關(guān)于數(shù)組的敘述中，錯(cuò)誤的是

A、Variant類型的數(shù)組中各數(shù)組元素的類型可以不同

B、各數(shù)組元素可以是不同類型的控件

C、各數(shù)組元素通過下標(biāo)進(jìn)行區(qū)別

D、各數(shù)組元素具有相同的名稱

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：數(shù)組是一組具有相同類型和名稱的變量的集合。這些變量稱為數(shù)組元

素，它們具有相同的名彌，每個(gè)數(shù)組元素都有一個(gè)編號(hào)被稱為下標(biāo)，可以通過下標(biāo)

來區(qū)別這些元素。變體型數(shù)組，控件數(shù)組中各數(shù)組元素必須是相同類型的控件。

5、以下敘述中錯(cuò)誤的是

A、用ReDim語句可以改變數(shù)組的維數(shù)

B、用ReDim語句可以改變數(shù)組的類型

C、用ReDim語句可以改變數(shù)組每一維的大小

D、用ReDim語句可以對(duì)數(shù)組中的所有元素置0或空字符串

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：VisualBasic中有兩種類型的數(shù)組：同定大小的數(shù)組及動(dòng)態(tài)數(shù)組。固

定大小的數(shù)組總是保持同樣的大小，而動(dòng)態(tài)數(shù)組在運(yùn)行時(shí)可以改變大小。要使用動(dòng)

態(tài)數(shù)組可先聲明一個(gè)不指明大小的窄數(shù)組(即沒有維數(shù)下標(biāo))，然后再用ReDim語

句在過程中改變數(shù)組大小和類型，對(duì)于多維數(shù)組，無法改變維數(shù)，只能改變最后一

維的大小。

6、如果要在語句：a二Airay(l,2,3,4,5)的前面聲明變量a,則正確的聲明是

A、Dima(4)AsInteger

B、Dima(5)AsVariant

C、Dima(lTo5)AsInteger

D、DimaAsVariant

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：Array(arglist)函數(shù)用于將arglist參數(shù)中一組用逗號(hào)隔開的值列轉(zhuǎn)換成

一個(gè)數(shù)組并賦值給某數(shù)組變量，此時(shí)要求數(shù)組變量在定義時(shí)定義成變體型變量或者

不聲明長(zhǎng)度的數(shù)組，不能是定長(zhǎng)數(shù)組。

7、在窗體上畫一個(gè)命令按鈕(其Name屬性為Commandl),然后編寫如下代碼：

PrivateSubCommandl_Click()Dimn()AsIntegerDima,bAsInteger

a=InputBox("Enterthefirstnumber")b=InputBox(HEnterthesecondnumber")ReDim

n(aTob)Fork=LBound(n)ToUBound(n)n(k)=kPrintn(k);NextkEndSub程序運(yùn)行

后，單擊命令按鈕，在輸入對(duì)話框中分別輸入2和3,輸出結(jié)果為

A、12

B、23

C>34

D、45

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：動(dòng)態(tài)數(shù)組以變量作為下標(biāo)值，在程序運(yùn)行過程中完成定義，通常分為

兩步：首先在窗體層、標(biāo)準(zhǔn)模塊或過程中用Dim或Public聲明一個(gè)沒有下標(biāo)的數(shù)

組(括號(hào)不能省略)，然后在過程中隨時(shí)用ReDim語句可以重定義變量作為下標(biāo)的

數(shù)組，重定義后原數(shù)組的所有元素值被清空。輸入2、3之后數(shù)組被重新定義成了

n(2To3),只有兩個(gè)數(shù)組元素，并且〉(k)=k,即輸出23。

8、有下面程序代碼：PrivateSubCommandl_Click()

a=Array(1,2,3,4,5,6,7,8,9,10)n=UBound(a)Fork=0ToUBound(a)/2Printa(k)*a(n);n=n-

INextkEndSub程序運(yùn)行后，單擊命令按鈕Commands輸出結(jié)果是

A、26122030

B、212205690

C、3028241810

D、1018242830

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：使用Array函數(shù)建立的數(shù)組其下標(biāo)下界為0,n的值是數(shù)組的上界即

9：在循環(huán)中k從0循環(huán)到數(shù)組長(zhǎng)度的一半，每次輸出a(k)*a(n)的值然后令n-1,故

此容易得到每次輸出的是數(shù)組兩端值之積，依次向數(shù)組中間移動(dòng)，即1,*10、

2*9、3*8、4*7、5*6。

9、窗體上有Commandl、Command2兩個(gè)命令按鈕?，F(xiàn)編寫以下程序：Option

Base0Dima()AsInteger,mAsIntegerPrivateSubCommandl_Click()m=InpulBox("請(qǐng)

輸入一個(gè)正整數(shù)")ReDima(m)EndSubPrivateSubCommand2_Click()m=InputBox("

請(qǐng)輸入一個(gè)正整數(shù)")RcDima(m)EndSub運(yùn)行程序時(shí)，單擊Command1后輸入整數(shù)

10,再單擊Command2后輸入整數(shù)5,則數(shù)組a中元素的個(gè)數(shù)是

A、5

B、6

C、10

D、11

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：本題考查的考點(diǎn)是有關(guān)動(dòng)態(tài)數(shù)組的。動(dòng)態(tài)數(shù)組以變量作為下標(biāo)值，在

程序運(yùn)行過程中完成定義，通常分為兩步：首先在窗體層、標(biāo)準(zhǔn)模塊或過程中用

Dim或Public聲明一個(gè)沒有下標(biāo)的數(shù)組(括號(hào)不能省略)，然后在過程中隨時(shí)用

ReDim語句可以重定義變量作為下標(biāo)的數(shù)組，重定義后原數(shù)組的所有元素值被清

孔。本題中由于數(shù)組下標(biāo)從0開始，所以單擊Commandl后輸入10,數(shù)組被重定

義成了11個(gè)元素：然后單擊Command2輸入5,數(shù)組又被霞定義成了6個(gè)元素，

所以最后數(shù)組中有6個(gè)元素。

10、在窗體上畫一個(gè)命令按鈕和一個(gè)標(biāo)簽，其名稱分別為Commandl和Labell,

然后編寫如下事件過程：PrivateSubCommandl_Click()Dimarr(10)Fori=6To10

arr(i)=i-5NextiLabel1.Caplion=arr(0)+arr(arr(10)/arr(6))EndSub運(yùn)行程序，單擊命

令按鈕，則在標(biāo)簽中顯示的是

A、0

B、1

C、2

D、3

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：在本能題的循環(huán)中分別將arr(6)到am10)的數(shù)組元素賦值為-5,而

arr(0)到arr(5)的數(shù)組元素沒有被賦值，將保留默認(rèn)初值0,即最后標(biāo)簽上顯示的是

arr(0)+arr(5)=0o

11、以下過程的功能是從數(shù)組中尋找最大值：PrivateSubFindMax(a()As

Integer,ByRefMaxAsInteger)DimsAsInteger,fAsIntegerDimiAsInteger

s=LBound(a):f=UBound(a)Max=a(s)Fori=sTofIfa(i)>MaxThenMax=a(i)Next

EndSub以下關(guān)于上述過程的敘述中，錯(cuò)誤的是

A、語句CallFindMax(a,m)可以調(diào)用該過程，其中的a是數(shù)組，m是Integer類型變

量

B、For循環(huán)次數(shù)等于a數(shù)組的元素?cái)?shù)

C、過程末尾應(yīng)該增加一條返回最大值的語句FindMax=Max

D、參數(shù)Max用于存放找到的最大值

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析；本題中定義了一個(gè)子過程FindMax,第一個(gè)形參是一個(gè)數(shù)組，第二個(gè)

形參是一個(gè)整型值，所以調(diào)用此過程的實(shí)參也應(yīng)該是一個(gè)數(shù)組和一個(gè)整型變量；在

過程中遍歷整個(gè)數(shù)組，首先讓數(shù)組的第一個(gè)元素為最大值，然后依次用數(shù)組元素和

Max進(jìn)行比較，若其比Max大則令其成為新的最大值，所以For循環(huán)次數(shù)等于a

數(shù)組的元素?cái)?shù)，參數(shù)Max用于存放找到的最大值：子過程沒有返回值，也無需增

加一條返回最大值的語句FindMax=MaXo

12、窗體上有一個(gè)名稱為Commandl的命令按鈕，其單擊事件過程如下：Option

BaselPrivateSubCommand1_Click()Dima(4,4)AsIntegerFori=lTo4Forj=lTo4

a(ij)=Int(Rnd*100)NextNextx=a(l,l)y=a(l,l)Fori=lTo4Forj=lTo4Ifx<

a(i,j)Thenx=a(i,j)Ify>a(i,j)Theny=a(i,j)Nexts=s+a(i,i)NextPrintx,y,sEndSub關(guān)于

以上程序，以下敘述中錯(cuò)誤的是

A、二維數(shù)組元素的值是不大于99的隨機(jī)整數(shù)

B、計(jì)算結(jié)果x是二維數(shù)組各元素中的最大數(shù)

C、計(jì)算結(jié)果y是二維數(shù)組各元素中的最小數(shù)

D、計(jì)算結(jié)果s是二維數(shù)組各行第一個(gè)元素之和

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：隨機(jī)數(shù)函數(shù)Rnd的功能是用于產(chǎn)生一個(gè)小于【但大于或等于0的隨

機(jī)數(shù)，本題中產(chǎn)生的整數(shù)不會(huì)大于99；后一個(gè)二重循環(huán)用于遍歷整個(gè)二維數(shù)組并

且進(jìn)行比較，如果數(shù)組元素的值大于x則成為新的最大值，小于y則成為新的最小

值，循環(huán)結(jié)束后x是二維數(shù)組各元素中的最大數(shù)，y是二維數(shù)組各元素中的最小

數(shù)。s中存放的是二維數(shù)組對(duì)角線元素之和。

13、窗體上有名稱為Commandl的命令按鈕，其事件過程如下：OptionBasel

PrivateSubCommandl_Click()DimaDimb(IO)AsIntegera二Array(2,4,7,3,9,6)For

i=LBound(a)ToUBound(a)b(i)=a(i)+iSum=Sum+b(i)NextiPrintSumEndSub運(yùn)行?

程序，單擊命令按鈕時(shí)，窗體上顯示的是

A、44

B、46

C、50

D、52

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：本題中使用了一個(gè)循環(huán)為b數(shù)組進(jìn)行賦值，每個(gè)元素的值是對(duì)應(yīng)a數(shù)

組元素的值加上下標(biāo)的值。因此b數(shù)組中的元素為［3、6、10、7、14、12),然后

累加和為52。

14、在窗體上畫一個(gè)文本框，其名稱為Textl,然后編寫如下程序：OptionBasel

PrivateSubForm_Click(iDimArr(10)AsIntegerFori=6To10AiT(i)=i-3Nexti

Textl.Text=Str(Air(6)+AtT(A"(6)+Arr(10)))EndSub程序運(yùn)行后，單擊窗體，在文

本框中顯示的內(nèi)容是

A、7

B、8

C、9

D、10

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：本題中在循環(huán)中為數(shù)組部分元素賦值，把Arr(6)?Arr(10)分別賦值為

3?7,其余的數(shù)組元素保持默認(rèn)值0；最終輸出的是Arr(6)+Arr(Air(6)+Arr(10))即

Arr(6)+Arr(10)=10o

15N閱讀程序：OptionBaseIPrivateSubForm_Click()Dima(3,3)AsIntegerFori=1

To3Forj=lTo3a(i,j)=Printa(i,j);NextjPrintNextiEndSub運(yùn)行上

面的程序，單擊窗體，輸出結(jié)果如下：147258369則在橫線處應(yīng)填入的內(nèi)容為

A、i+j

B、i*j

C、(i-l)*3+j

D、i+(j-l)*3

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：本題中使用二重循環(huán)為數(shù)組賦值，分許輸出的結(jié)果，每個(gè)元素和行號(hào)

和列號(hào)的關(guān)系可以看出，每個(gè)元素的值應(yīng)該等于i+(H)*3。

16、在窗體上畫一個(gè)命令按鈕，然后編寫如下程序：OptionBaselPrivaieSub

Commandl_Click()DimArr(l0)AsIntegerFori=lTo10Arr(i)=11-iNexti

x=InputBox("輸入一個(gè)整數(shù)(3?10)")PrintArr(2+Arr(x))EndSub程序運(yùn)行后，單擊

命令按鈕，在輸入對(duì)話框中輸入7,則輸出結(jié)果為

A、3

B、4

C、5

D、6

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：本題是一個(gè)簡(jiǎn)單的數(shù)組操作，首先在一個(gè)循環(huán)中為數(shù)組元素賦值，然

后輸出指定的數(shù)組元素值。最終輸出的是Arr(2+Arr(7))=Arr(6)=5o

17、設(shè)有下面程序代碼：OplionBaselPrivateSubCommandl_Click()Dimx(6)

a=Array(4,2,5,1,6,3)b=Array?,24,98,27,58,41)Fork=1To6x(a(k))=b(k)NextkFor

k=lTo6Printx(k);NextkEndSub程序運(yùn)彳了時(shí)的輸出是

A、272441649858

B、642498275841

C、242741586498

D、986458412724

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：本題是一個(gè)簡(jiǎn)單的數(shù)組賦值，只要把握好每次為哪個(gè)元素賦以什么樣

的值就不會(huì)出錯(cuò)。最后x數(shù)組中存放的數(shù)據(jù)依次是27、24、41、64、98、58。

18、以下關(guān)于捽件數(shù)組的敘述中，錯(cuò)誤的是

A、各數(shù)組元素共用相同的事件過程

B、各數(shù)組元素通過下標(biāo)進(jìn)行區(qū)別

C、數(shù)組可以由不同類型的控件構(gòu)成

D、各數(shù)組元素具有相同的名稱

標(biāo)準(zhǔn)答案：c

知識(shí)點(diǎn)端析：控件數(shù)組是一組具有共同名稱和共同類型的控件，它們擁有共同的事

件，數(shù)組中的每個(gè)控件都有惟一的索引號(hào)(Index),即下標(biāo)。

19、窗體