内容发布更新时间 : 2024/5/20 12:13:54星期一 下面是文章的全部内容请认真阅读。

A

四川省普通高校职教师资班和高职班对口招生统一考试

信息技术一类Access模拟试题(二）

（考试时间80分钟，满分150分）

学校：长宁县职业技术学校 班级： 姓名： 成绩： 一、单项选择题（每题2分，共40分）

1. 下列关于报表的叙述中，正确的是( )。

A）报表只能输入数据 B）报表只能输出数据 C）报表可以输入和输出数据 D）报表不能输入和输出数据

2. 报表的作用不包括( )。

A) 分组数据 B) 汇总数据 C) 格式化数据 D) 输入数据

3. 在报表中要显示格式为\共N页，第N页\的页码，正确的页码格式设置是( )。

A) ＝ \共\＋ Pages ＋ \页，第\＋ Page ＋ \页\ B) ＝ \共\＋ [Pages] ＋ \页，第\＋ [Page] ＋ \页\ C) ＝ \共\页，第\页\ D) ＝ \共\页，第\页\

4. 在报表设计过程中，不适合添加的控件是( )。

A) 标签控件 B) 图形控件 C) 文本框控件 D) 选项组控件

5. 主窗体和子窗体通常用于显示多个表或查询中的数据，这些表或查询中的数据一般应该具有的

关系是( )。

A) 一对一 B) 一对多 C) 多对多 D) 关联

6. 在运行宏的过程中，宏不能修改的是( )。

A）窗体 B）宏本身 C）表 D）数据库

7. 下列操作中，适宜使用宏的是( )。

A) 修改数据表结构 B) 创建自定义过程

C) 打开或关闭报表对象 D) 处理报表中错误

8. 对象可以识别和响应的行为称为( )。

A) 属性 B) 方法 C) 继承 D) 事件

9. 在宏的参数中，要引用窗体F1上的Textl文本框的值，应该使用的表达式( )。

A）[Forms]![F1]![Text1] B）Textl

C）[F1].[Textl] D）[Forms][Fl][Textl]

《Access 2010应用基础·模拟试题（二））》 第 1页，共8页

10. 在VBA中要打开名为\学生信息录入\的窗体，应使用的语句是( )。

A) DoCmd.OpenForm \学生信息录入\ B) OpenForm \学生信息录入\ C) DoCmd.OpenWindow \学生信息录入\ D) OpenWindow \学生信息录入\

11.若要使某命令按钮获得控制焦点，可使用的方法是( )。

A) LostFocus B) SetFocus C) Point D) Value

12.表达式\B ＝ INT(A＋0.5)\的功能是( )。

A) 将变量A保留小数点后1位 B)将变量A四舍五入取整 C 将变量A保留小数点后5位 D)舍去变量A的小数部分

13.下列表达式计算结果为数值类型的是( )。

A) #5/5/2010# － #5/1/2010# B) \ C) 102 ＝ 98 ＋ 4 D) #5/1/2010# ＋ 5

14.下列变量名中，合法的是( )。

A) 4A B) A－1 C) ABC_1 D) private

15.下列能够交换变量X和Y值的程序段是( )。

A) Y＝X ： X＝Y B) Z＝X ：Y＝Z ：X＝Y

C) Z＝X ：X＝Y ：Y＝Z D) Z＝X ：W＝Y ：Y＝Z ： X＝Y

16.Dim b1，b2 As Boolean语句显式声明变量( )。

A) b1和b2都为布尔型变量 B) b1是整型，b2是布尔型 C) b1是变体型(可变型)，b2是布尔型 D) b1和b2都是变体型(可变型)

17. 将逻辑型数据转换成整型数据，转换规则是( )。

A) 将True转换为-1 ，将False转换为0 B) 将True转换为1 ，将False转换为-1 C) 将True转换为0 ，将False转换为-1 D) 将True转换为1 ，将False转换为0

18.在模块的声明部分使用\Option Base 1\语句，然后定义二维数组A(2 to 5,5)，则该数组的元素个

数为( )。

A) 20 B) 24 C) 25 D) 36

19.要判断a和b中有且只有一个为0，其正确的表达式是( )。

A) a＝0 or b＝0 B) a＝0 Not b＝0 C) a＝0 And b＝0 D) a*b＝0 And a＋b<>0

《Access 2010应用基础·模拟试题（二）》 第2页，共8页

A

20.设有如下过程：

x=1 Do x=x+2

Loop Until_______

运行程序，要求循环体执行3次后结束循环，空白处应填入的语句是( )。 31. 如果直接运行宏组，则会执行所有子宏的操作；（ ） 32. 多分支语句只能采用If语句进行编写代码；（ ）

33. 在DO循环中使用While关键词时，表示条件为真就执行循环体；（ ） 34. 在For循环中，循环步长不能为负数；（ ）

35. 所有的For循环都可以转换为Do循环，反之则不然；（ ）

四、填空题。（20×2=40分）

A）x<=7 B）x<7 C）x>=7 D）x>7 二、多项选择题（5×3=15分）

21. 在VBA中，以下（ ）属于循环结构

A.For…Next B.Do…While…Loop C.Do While…Loop D.Do…Loop Until

22. 在VBA中，分支结构分为（ ）。

A. 单分支结构 B. 双分支结构 C.多分支结构 D.其他分支

23. 以下程序运行后，变量x,y,z的值分别是（ ）。

For x=1 to 5 For y=1 to x step 2 z=z+1 Next y Next x

A. 6 B. 7 C. 8 D. 9

24. 在VBA中，可以用来定义数组的关键词有（ ）。

A. Dim B. Public C. Static D. Private

25. 以下函数返回的数据类型是数值型的有（ ）。

A. Asc B. Year C. Day D. Msgbox 三、判断题（10×2=20分）

26. 报表与窗体既可以查看数据，也可以修改数据；（ ） 27. 在窗体中，可以使用标签控件来绑定数据；（ ） 28. 在窗体视图中，可以对窗体的布局进行修改；（ ）

29. 设置文本框的默认值，可以使文本框控件在进入窗体视图时具备一个初始值；（30. 在为宏设置条件时，可以引用窗体上控件的值；（ ）

《Access 2010应用基础·模拟试题（二））》 第 3页，共8页

）

36. 要在窗体或者报表中绑定文本框控件的数据，应设置属性窗口中的数据选项卡中的_________

属性；

37. 在报表中____________节用于显示每一页的页眉信息；

38. 若要在报表中对“语文”进行统计平均分，应设置文本框控件的控件来源属性为______________； 39. 在窗体中，_________节一般用于放置窗体的标题；

40. ___________窗体在进入窗体视图后，如果未关闭当前窗体则无法进行其他对象的操作； 41. 在Access 2010中已经设计好一系列窗体，如果需要为这些窗体之间建立一个相互连接的窗体，

则可以创建一个__________窗体实现；

42. 在利用设计视图创建窗体时，如果要对选中的控件进行改变布局，除了直接拖动控件外，还可

以使用功能区_______选项卡中的相关命令；

43. 如果希望达到某种条件时才执行宏操作，这类宏称为__________； 44. 如果已经存在一个宏，若要调用该宏，则需要使用__________操作命令； 45. 如果要打开一个查询，应使用__________宏操作命令； 46. 在For循环中，如果要强制终止循环，应使用_________语句；

47. 在VBA中，如果要实现点击按钮后，窗体中的当前记录跳转到最后一条，则应使用语句

DoCmd.__________, , AcLast ;

48. 如果在Do While后面出现的循环条件为数字0，则循环体____________； 49. 表达式 123 ＋ Mid(\的结果是____________；

50. 如有数组声明语句Dim a(2，-3 to 2,4)，则数组a包含元素的个数是_____个； 51. _______变量一旦定义就可以被所有的过程、模块和窗体使用； 52. 使用立即窗口输出变量x的值的语句是_____________;

53. 如果要使两行VBA代码写在一行，则可以在两行代码之间加_____符号；

54. 在VBA中，如果要添加代码注释，除了使用单引号以外，还可以使用______关键词； 55. 在VBA中使用Msgbox函数弹出消息框后，如果用户单击了消息框上的“否”按钮，则该函数

《Access 2010应用基础·模拟试题（二）》 第4页，共8页

A

的返回值是______； 五、合题（35分）

56.写出下列程序的运行结果。（每题3分，共15分）

（1） 有代码如下：

Private Sub Command0_Click() a＝24 b＝328

select case b\\10 case 0 c＝a*10＋b case 1 to 9 c＝a*100＋b case 10 to 99 c＝a*1000＋b end select Msgbox c End Sub

该段代码运行后，消息框显示的内容为:____①____

（2） 有代码如下：

Private Sub Command0_Click() a＝Sqr(8) b＝Sqr(9) c＝a>b MsgBox c+2 End Sub

该段代码运行后，消息框中显示的内容为：____②____

（3） 有代码如下：

Private Sub Command0_Click() Dim s As Integer For i=9 to 1 step 0

《Access 2010应用基础·模拟试题（二））》 第 5页，共8页

s=s+i Next i

Msgbox s & “,” & i End Sub

该段代码运行后，消息框中显示的内容为：____③____

（4） 有代码如下：

Private Sub Command0_Click() Static b As Integer B=0 B=b+3 Msgbox b End Sub

当单击按钮Command0三次后，消息框显示的内容为：___④___

（5） 有代码如下：

Private Sub Command0_Click() Dim i，j，x

For i ＝ l To 20 step 2 x ＝ 0

For j ＝ i To 20 step 3 x ＝ x ＋ 1 Next j Next i

Text1.Value ＝ Str(x) End Sub

程序运行后，文本框Text1显示的内容为：______⑤_______

57. 程序填空（10分，每空2分）

以下程序的功能是：接收从键盘上输入的一个数，判断这个数是否为素数。请对下列代码进行填空。

Private Sub Command0_Click() Dim num As Integer, i As Integer

《Access 2010应用基础·模拟试题（二）》 第6页，共8页

A

num = Val(InputBox(\请任意输入一个整数：\ i = ____①____ Do

If num Mod i = ___②___ Then ___③___ For i = 3 To _③__ Step __④__ For j = ___⑤___ Debug.Print \ Next j

Debug.Print __②__(10) End If i =__④____

Loop While i __⑤__ num If i = num Then

MsgBox num & \是一个素数\Else

MsgBox num & \不是素数\End If End Sub

58. 程序填空（10分，每空2分） * * * * * * * * * * * * * * * * 图1

图1是运行以下代码后立即窗口输出的显示效果，请对下列程序进行填空。 Private Sub Command0_Click() Dim i As Integer, j As Integer For i = 1 To __①__ For j = 1 To i Debug.Print \ Next j

Debug.Print ___②__(10) Next i

《Access 2010应用基础·模拟试题（二））》 第 7页，共8页

Next i End Sub

Access 2010应用基础·模拟试题（二）》第8页，共8页

《