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

　　A)20

　　B)24

　　C)25

　　D)36

　　22.VBA中不能進行錯誤處理的語句結構是( )。答案：C

　　A)On Error Then標號

　　B)On Error Goto標號

　　C)On Error Resume Next

　　D)On Error Goto 0

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

　　A)123

　　B)12.3

　　C)0

　　D)123E2CD

　　24.設有如下過程：

　　x=1

　　Do

　　x=x+2

　　Loop Until _________

　　運行程序，要求循環體執行3次后結束循環，空白處應填入的語句是( )。答案：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

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

　　A)10 5

　　B)10 40

　　C)20 5

　　D)20 40

　　26.兩個日期變量 D1=#2003-5-28 20:8:36# ，D2=#2004-2-29 10:40:11#。下列函數表達式中可以返回-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”決定的循環結構，其循環體將被執行( )。答案：A

　　A)0次

　　B)1次

　　C)4次

　　D)5次

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

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

　　B)取消錯誤處理

　　C)遇到錯誤執行定義的錯誤

　　D)退出系統

　　29.在窗體中有一個命令按鈕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

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

　　A)15

　　B)20

　　C)25

　　D)35

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

　　A)將變量A保留小數點后1位

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

　　C)將變量A保留小數點后5位

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

編輯推薦：

考試吧考后首發2013年9月計算機等級考試試題及答案

2013年計算機等級考試備考精華資料匯總

全國計算機等級考試教材目錄（2013年版）

全國計算機等級考試考試大綱（2013年版）