2010年计算机二级考试试题 试题及参考答案（一）(4)

　　Private Sub Command1_Click()
　　Dim x As Integer, y As Integer
　　x = 12: y = 32
　　Call Proc(x, y)
　　Debug.Print x; y
　　End Sub
    Public Sub Proc(n As Integer, ByVal m As Integer)
　　n = n Mod 10
　　m = m Mod 10
　　End Sub
　　打开窗体运行后，单击命令按钮，立即窗口上输出的结果是
　　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
　　打开窗体运行后，单击命令按钮，消息框中输出的结果是
　　A)1
　　B)2
　　C)10
　　D)11
　　(35)下列程序段的功能是实现“学生”表中“年龄”字段值加1
　　Dim Str As String
　　Str=" "
　　Docmd.RunSQL Str
　　空白处应填入的程序代码是
　　A)年龄=年龄+1
　　B)Update学生 Set 年龄=年龄+1
　　C)Set 年龄=年龄+1
　　D)Edit 学生 年龄=年龄+l
    2010年计算机二级考试Access笔试试题参考答案

    一、选择题

    1-10  ADBAC BADAA   11-20  DCCCA CACDDB  21-30  ACDDB  CDBBA  31-35  ADABB