A. 14 B. 17 C. 16 D. 18
39．为了增强程序的可读性，可以在程序中加入注释。方法是使用一个英文单引号'，也可以使用__________。
A．英文双引号\ B．英文#号 C．Rem D．英文$号 40．在 VBA 中，类型说明符___________表示的类型是长整型。 A．& B．% C．# D．\41．下面___________是合法的字符常量。
A．$ABC$ B．'ABC888' C．\ D．\
42．下列语句中，定义 txt1 文本框的离开该文本框事件过程的头语句是__________。 A．Private Sub Txt1_Change() B．Private Sub Txt1_LostFocus() C．Private Sub Form_LostFocus() D．Private Sub Text_LostFocus()
43．下面正确的赋值语句是___________。
A．a+b=9 B．Y=X^2-8 C．Y=2R D．8a=b+6
44．Access 的控件对象可以设置某个属性来控制该对象是否可见。需要设置的属性是__________。 A．Enabled B．Visible C．Default D．Cancel 45．以下 VBA 程序段运行后，变量 x 的值是__________。 x=2 y=4 Do
x=x*y y=y+1
Loop While y<4
A．2 B．4 C．8 D．20 46．表达式 IIf(2^6<59, 59, 100) 的结果是___________。 A．59 B．60 C．90 D．100 47．在 VBA 中，“Dim A(3, 3) AS String”语句定义了一个数组，该数组A中的全部元素都初始化为__________。
A．Null B．0 C．\ D．False 48．在 VBA 某个模块中，有如下声明语句 Option Base 1
Dim A(5, 10) AS integer
那么数组 A 总共有_________个数组元素。
A．50 B．15 C．60 D．66
49．在 Access2010 中，宏操作 Quit Access 的功能是___________。 A．关闭表 B．退出 Access C．退出宏 D．退出查询
50．在 VBA 中，要打开名为“职工信息录入”的窗体，应使用的语句是___________。 A．DoCmd.OpenWindow \职工信息录入\ B．OpenWindow \职工信息录入\
C．DoCmd.OpenForm \职工信息录入\ D．OpenForm \职工信息录入\
51． 在 VBA 某个模块中，有如下声明语句 Dim B(5, 2 TO 10) AS Integer
那么数组 B 总共有___________个数组元素。
《Access2010数据库基础与应用》期末考试题（A卷）（含答案）第5页/总8页
A．54 B．40 C．15 D．13
52．设x=\，执行下列程序段后，变量t的值是__________。 n = InStr(x,\
y = Left(x,n-1) & \ t = Len(y)
A. 6 B. 7 C. 8 D. 9 53．“X 是小于100的正数”，VBA逻辑表达式应表示为__________。 A. X>0 And <100 B. 0 54．以下 VBA 程序段运行后，变量 n 的值是___________。 j=0 n=0 DoCE j=j+10 n=n+1 Loop Until j>10 A．1 B．2 C．4 D．10 55．在 VBA中，下列表达式中格式正确的是__________。 A. x(y + z) B. 7x + 8y/2 C. (x+y)≥6 D. -x^2-1 56．下列语句执行后，s的值是__________。 t = \计算机程序设计\ s = Right(t, 2) + Mid(t, 4, 1) + Left(t, 3) A. \设计程计算机\ B. \计算机程序设计\ C. \设计程序计算机 D. \设计程计算\57．有三个关系 R、S 和 T 如下： R S T A B C A B C m 1 3 m 1 3 n 1 3 n 由关系 R 和 S 通过运算得到关系 T，则所使用的运算是________。 A．交 B．笛卡儿积 C．并 D．除 58．在窗体上已经建立1个文本框 txt1,以及3个命令按钮cmd1、cmd2 和 cmd3。请 选答案来完善程序，使之完成以下操作： 打开窗体时，文本框 txt1 上显示“诚信应考，绝不作弊!”； 单击命令按钮 cmd1 时，使 txt1 文本框不可用； 单击命令按钮 cmd2 时，使 txt1 文本框可用,文本框 txt1 上显示“警示：考试作弊，不授予学士学位!”； 单击命令按钮 cmd3 时，关闭本窗体。 《Access2010数据库基础与应用》期末考试题（A卷）（含答案）第6页/总8页 Private Sub Form_Load() txt1.Value = \诚信应考，绝不作弊!\ End Sub Private Sub cmd1_Click() ____________ ‘选答案来完善程序 End Sub Private Sub cmd2_Click() txt1 = \警示：考试作弊，不授予学士学位!\ txt1.Enabled = True End Sub Private Sub cmd3_Click() DoCmd.Close End Sub 请从下列选项中选择答案来完善上述程序 A. txt1.Enabled = True B. text1.Value = False C. txt1.Enabled = False D. txt1.Name = True 59．在窗体上已经建立1个文本框控件 text1 和1个命令按钮控件 cmd1。请选答案来完善程序，使之完成以下操作： 打开窗体时，文本框上显示“VBA程序设计”； 单击命令按钮 cmd1 时，文本框上显示“Access数据库”； 单击窗体时清除文本框中的内容 (使之为空值)。 Private Sub Form_Load() text1.Value = \程序设计\ End Sub Private Sub _________( ) ‘选答案来完善程序 text1.Value = \数据库\ End Sub Private Sub Form_Click() text1.Value = \ End Sub 请从下列选项中选择答案来完善上述程序 A. command1_Click B. cmd1_Click C. Form_Load D. Form_Click 60．在窗体上已经建立了一个文本框Txt1和一个命令按钮Cmd1，打开窗体后单击命令按钮，则在文本框Txt1中显示的内容是__________。 Private Sub Cmd1_Click() a = 10: b = 20 Call MySub(a, c) Call MySub(b, d) Txt1.Value = c + d End Sub Sub MySub(x, y) y = x Mod 7 + 1 End Sub 《Access2010数据库基础与应用》期末考试题（A卷）（含答案）第7页/总8页 A. 9 B. 11 C. 13 D. 15 二、多选择题（答案要填写在答题卡上） 61．在 VBA 中，属于逻辑运算符的是__________。 A．+ B．Not C．Or D．And 62．VBA 的错误处理主要使用 On Error 语句结构。 On Error 语句的形式有__________。 A．On Error Resume Next B．On Error 语句标号 C．On Error GoTo 0 D．On Error GoTo 语句标号 63．数据表中有一个“姓名”字段，查找姓名最后二个字为“小明”的记录的条件是 ___________。 A．Left([姓名],2)=\小明\ B．Like \小明\ C．Like \小明\ D．Like \小明*\ E．Right([姓名],2)=\小明\ 64．在 VBA 中，下面___________是合法的变量名。 A．intx_99 B．for C．dim_168_ D．123abc 65．下列函数中，其值为字符串 \的是__________。 A．Mid(\ B．String(2, \ C．Left(\ D．Val(\ 《Access2010数据库基础与应用》期末考试题（A卷）（含答案）第8页/总8页