【正文】
B)圖形控件 C)文本框控件 D)選項組控件 (25)下列關(guān)于對象“更新前”事件的敘述中,正確的是 A)在控件或記錄的數(shù)據(jù)變化后發(fā)生的事件 B)在控件或記錄的數(shù)據(jù)變化前發(fā)生的事件 C)當窗體或控件接收到焦點時發(fā)生的事件 D)當窗體或控件失去了焦點時發(fā)生的事件 (26)下列屬于通知或警告用戶的命令是 A)PrintOut B)OutputTo C)MsgBox D)RunWarnings (27)能夠?qū)崿F(xiàn)從指定記錄集里檢索特定字段值的函數(shù)是 A)Nz B)Find C)Lookup D)DLookup (28)如果X是一個正的實數(shù),保留兩位小數(shù)、將千分位四舍五入的表達式是 A)*Int(x+) B)*Int(100*(X+)) C)*Int(x+) D)*Int(100*(X+)) (29)在模塊的聲明部分使用“Option Base 1”語句,然后定義二維數(shù)組A(2 to 5,5),則該數(shù)組的元素個數(shù)為 A)20 B)24 C)25 D)36 (30)由“For i=1 To 9 Step 3”決定的循環(huán)結(jié)構(gòu),其循環(huán)體將被執(zhí)行 A)0次 B)1次 C)4次 D)5次(31)在窗體上有一個命令按鈕Commandl和一個文本框Textl,編寫事件代碼如下: Private Sub Command1_Click() Dim i,j,x For i = 1 To 20 step 2 x = 0 For j = To 20 step 3 x = x + 1 Next j Next i =Str(x) End Sub 打開窗體運行后,單擊命令按鈕,文本框中顯示的結(jié)果是 A)1 B)7 C)17 D)400 (32)在窗體上有一個命令按鈕Commandl,編寫事件代碼如下: Private Sub Commandl_Click() Dim y As Integer y = 0 Do y = InputBox(y=) If (y Mod 10) + Int(y / 10) = 10 Then y。 y End Sub Public Sub Proc(n As Integer, ByVal m As Integer) n = n Mod 10 m = m Mod 10 End Sub 打開窗體運行后,單擊命令按鈕,立即窗口上輸出的結(jié)果是 A)2 32 B)12 3 C)2 2 D)12 32 34)在窗體上有一個命令按鈕Commandl,編寫事件代碼如下: Private Sub Commandl_Click() Dim d1 As Date Dim d2 As Date dl = 12/25/2009 d2 = 1/5/2010 MsgBox DateDiff(” ww”, d1, d2) End Sub 打開窗體運行后,單擊命令按鈕,消息框中輸出的結(jié)果