21.在模塊的聲明部分使用“Option Base 1”語句，然后定義二維數(shù)組A(2 to 5,5)，則該數(shù)組的元素個(gè)數(shù)為( )。答案：A

　　A)20

　　B)24

　　C)25

　　D)36

　　22.VBA中不能進(jìn)行錯誤處理的語句結(jié)構(gòu)是( )。答案：C

　　A)On Error Then標(biāo)號

　　B)On Error Goto標(biāo)號

　　C)On Error Resume Next

　　D)On Error Goto 0

　　23.表達(dá)式Val("12 3E2CD")的值是( )。答案：A

　　A)123

　　B)12.3

　　C)0

　　D)123E2CD

　　24.設(shè)有如下過程：

　　x=1

　　Do

　　x=x+2

　　Loop Until _________

　　運(yùn)行程序，要求循環(huán)體執(zhí)行3次后結(jié)束循環(huán)，空白處應(yīng)填入的語句是( )。答案：C

　　A)x<=7

　　B)x<7

　　C)x>=7

　　D)x>7

　　25.窗體中有命令按鈕Command1，事件過程如下：

　　Public Function f(x As Integer)As Integer

　　Dim y As Integer

　　x=20

　　y=2

　　f=x*y

　　End Function

　　Private Sub Command1_Click()

　　Dim y As Integer

　　Static x As Integer

　　x=10

　　y=5

　　y=f(x)

　　Debug.Print x;y

　　End Sub

　　運(yùn)行程序，單擊命令按鈕，則立即窗口中顯示的內(nèi)容是( )。答案：D

　　A)10 5

　　B)10 40

　　C)20 5

　　D)20 40

　　26.兩個(gè)日期變量 D1=#2003-5-28 20:8:36# ，D2=#2004-2-29 10:40:11#。下列函數(shù)表達(dá)式中可以返回-9，即間隔9月的是( )。答案：B

　　A)DateAdd("m",-9,D1)

　　B)DateDiff("m",D2,D1)

　　C)DateDiff("m",D1,D2)

　　D)DateSerial(2004,2,29)

　　27.由“For i=1 To 9 Step -3”決定的循環(huán)結(jié)構(gòu)，其循環(huán)體將被執(zhí)行( )。答案：A

　　A)0次

　　B)1次

　　C)4次

　　D)5次

　　28.On Error Goto 0語句的含義是( )。答案：B

　　A)忽略錯誤并執(zhí)行下一條語句

　　B)取消錯誤處理

　　C)遇到錯誤執(zhí)行定義的錯誤

　　D)退出系統(tǒng)

　　29.在窗體中有一個(gè)命令按鈕Command1，編寫事件代碼如下：

　　Private Sub Command1_Click()

　　Dim s As Integer

　　s = P(1)+P(2)+P(3)+P(4)

　　debug.Print s

　　End Sub

　　Public Function P(N As Integer)

　　Dim Sum As Integer

　　Sum = 0

　　For i = 1 To N

　　Sum = Sum + i

　　Next i

　　P = Sum

　　End Function

　　打開窗體運(yùn)行后，單擊命令按鈕，輸出結(jié)果是( )。答案：B

　　A)15

　　B)20

　　C)25

　　D)35

　　30.表達(dá)式“B=INT(A+0.5)”的功能是( )。答案：B

　　A)將變量A保留小數(shù)點(diǎn)后1位

　　B)將變量A四舍五入取整

　　C)將變量A保留小數(shù)點(diǎn)后5位

　　D)舍去變量A的小數(shù)部分

編輯推薦：

考試吧考后首發(fā)2013年9月計(jì)算機(jī)等級考試試題及答案

2013年計(jì)算機(jī)等級考試備考精華資料匯總

全國計(jì)算機(jī)等級考試教材目錄（2013年版）

全國計(jì)算機(jī)等級考試考試大綱（2013年版）