四川省普通高校职教师资班和高职班对口招生统一考试信息技术一类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) ＝"共" & Pages & "页，第" & Page & "页"D) ＝"共" & [Pages] & "页，第" & [Page] & "页"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）TextlC）[F1].[Textl] D）[Forms][Fl][Textl]10.在VBA中要打开名为"学生信息录入"的窗体，应使用的语句是()。

A) DoCmd.OpenForm "学生信息录入" B) OpenForm "学生信息录入"C) DoCmd.OpenWindow "学生信息录入"D) OpenWindow "学生信息录入"11.若要使某命令按钮获得控制焦点，可使用的方法是()。

A) LostFocus B) SetFocus C) Point D) Value12.表达式"B ＝INT(A＋0.5)"的功能是()。

A) 将变量A保留小数点后1位B)将变量A四舍五入取整C 将变量A保留小数点后5位D)舍去变量A的小数部分13.下列表达式计算结果为数值类型的是()。

A) #5/5/2010# －#5/1/2010# B) "102" > "11"C) 102 ＝98 ＋ 4 D) #5/1/2010# ＋514.下列变量名中，合法的是()。

A) 4A B) A－1 C) ABC_1 D) private15.下列能够交换变量X和Y值的程序段是()。

A) Y＝X ：X＝Y B) Z＝X ：Y＝Z ：X＝YC) Z＝X ：X＝Y ：Y＝Z D) Z＝X ：W＝Y ：Y＝Z ：X＝Y16.Dim b1，b2 As Boolean语句显式声明变量()。

A) b1和b2都为布尔型变量 B) b1是整型，b2是布尔型C) b1是变体型(可变型)，b2是布尔型D) b1和b2都是变体型(可变型)17.将逻辑型数据转换成整型数据，转换规则是()。

A) 将True转换为-1 ，将False转换为0B) 将True转换为1 ，将False转换为-1C) 将True转换为0 ，将False转换为-1D) 将True转换为1 ，将False转换为018.在模块的声明部分使用"Option Base 1"语句，然后定义二维数组A(2 to 5,5)，则该数组的元素个数为()。

A) 20B) 24C) 25D) 3619.要判断a和b中有且只有一个为0，其正确的表达式是()。

A) a＝0 or b＝0 B) a＝0 Not b＝0C) a＝0 And b＝0 D) a*b＝0 And a＋b<>020.设有如下过程：x=1Dox=x+2Loop Until_______运行程序，要求循环体执行3次后结束循环，空白处应填入的语句是()。

A）x<=7 B）x<7 C）x>=7 D）x>7二、多项选择题（5×3=15分）21.在VBA中，以下（）属于循环结构A.For…NextB.Do…While…LoopC.Do While…LoopD.Do…Loop Until22.在VBA中，分支结构分为（）。

A. 单分支结构B. 双分支结构C.多分支结构D.其他分支23.以下程序运行后，变量x,y,z的值分别是（）。

For x=1 to 5For y=1 to x step 2z=z+1Next yNext xA. 6B. 7C. 8D. 924.在VBA中，可以用来定义数组的关键词有（）。

A. DimB. PublicC. StaticD. Private25.以下函数返回的数据类型是数值型的有（）。

A. AscB. YearC. DayD. Msgbox三、判断题（10×2=20分）26.报表与窗体既可以查看数据，也可以修改数据；（）27.在窗体中，可以使用标签控件来绑定数据；（）28.在窗体视图中，可以对窗体的布局进行修改；（）29.设置文本框的默认值，可以使文本框控件在进入窗体视图时具备一个初始值；（）30.在为宏设置条件时，可以引用窗体上控件的值；（）31.如果直接运行宏组，则会执行所有子宏的操作；（）32.多分支语句只能采用If语句进行编写代码；（）33.在DO循环中使用While关键词时，表示条件为真就执行循环体；（）34.在For循环中，循环步长不能为负数；（）35.所有的For循环都可以转换为Do循环，反之则不然；（）四、填空题。

（20×2=40分）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("123456",3,2)的结果是____________；50.如有数组声明语句Dim a(2，-3 to 2,4)，则数组a包含元素的个数是_____个；51._______变量一旦定义就可以被所有的过程、模块和窗体使用；52.使用立即窗口输出变量x的值的语句是_____________;53.如果要使两行VBA代码写在一行，则可以在两行代码之间加_____符号；54.在VBA中，如果要添加代码注释，除了使用单引号以外，还可以使用______关键词；55.在VBA中使用Msgbox函数弹出消息框后，如果用户单击了消息框上的“否”按钮，则该函数文档收集于互联网，已重新整理排版.word版本可编辑.欢迎下载支持.的返回值是______；五、合题（35分）56.写出下列程序的运行结果。

（每题3分，共15分）（1）有代码如下：Private Sub Command0_Click()a＝24b＝328select case b\10case 0c＝a*10＋bcase 1 to 9c＝a*100＋bcase 10 to 99c＝a*1000＋bend selectMsgbox cEnd Sub该段代码运行后，消息框显示的内容为:____①____ （2）有代码如下：Private Sub Command0_Click()a＝Sqr(8)b＝Sqr(9)c＝a>bMsgBox c+2End Sub该段代码运行后，消息框中显示的内容为：____②____ （3）有代码如下：Private Sub Command0_Click()Dim s As IntegerFor i=9 to 1 step 0s=s+iNext iMsgbox s & “,” & iEnd Sub该段代码运行后，消息框中显示的内容为：____③____（4）有代码如下：Private Sub Command0_Click()Static b As IntegerB=0B=b+3Msgbox bEnd Sub当单击按钮Command0三次后，消息框显示的内容为：___④___（5）有代码如下：Private Sub Command0_Click()Dim i，j，xFor i ＝ l To 20 step 2x ＝ 0For j ＝ i To 20 step 3x ＝ x ＋ 1Next jNext iText1.Value ＝ Str(x)End Sub程序运行后，文本框Text1显示的内容为：______⑤_______57.程序填空（10分，每空2分）以下程序的功能是：接收从键盘上输入的一个数，判断这个数是否为素数。