《《Access数据库》复习.ppt》由会员分享，可在线阅读，更多相关《《Access数据库》复习.ppt（94页珍藏版）》请在金锄头文库上搜索。
1、Access数据库数据库 复习数数据据库库基基础础知知识识 |Access数据库的结构层次是A)数据库管理系统应用程序表B)数据库数据表记录字段C)数据表记录数据项数据D)数据表记录字段|参考答案：Bz在Access数据库中，数据库是一个关于特定主题或用途的信息的集合，数据库使用表来存储数据，表中的数据单位是记录，记录的数据结构由字段定义。数数据据库库基基础础知知识识|关于Access窗口，下列说法错误的是（）。A）Access窗口由标题栏、菜单栏、工具栏和状态栏等几部分组成B）Access菜单栏是一成不变的C）对象列表框默认状态下会显示创建此类对象的快捷方式D）在组中添加对象不改变该对象原始
2、的位置|参考答案：B数数据据库库基基础础知知识识|Access数据库最基础的对象是A）表B）宏C）报表D）查询|参考答案：A数数据据库库和和表表的的基基本本操操作作|下列选项中，不属于Access数据类型的是A)数字 B)文本 C)报表 D)时间/日期|参考答案：Cz【解析】Access中可以使用的数据类型有10种：文本、备注、数字、日期/时间、货币、自动编号、是/否、OLE对象、超级链接和查阅向导。报表是Access提供的一种对象，不属于Access数据类型。数数据据库库和和表表的的基基本本操操作作|如果在创建表中建立字段性别并要求用汉字表示，其数据类型应当是A)是/否 B)数字 C)文本
3、D)备注|参考答案：Cz【解析】建立新表时要求表中字段用汉字表示，则要设置该字段的数据类型为文本。 数数据据库库和和表表的的基基本本操操作作|下列关于空值的叙述中，正确的是 A)空值是双引号中间没有空格的值 B)空值是等于0的数值 C)空值是使用Null或空白来表示字段的值 D)空值是用空格表示的值|参考答案：Cz【解析】使用Null或空白来表示字段的空值。空值是缺值或还没有值。 数数据据库库和和表表的的基基本本操操作作|下列字段的数据类型中，不能作为主键的数据类型是（）。A）文本 B）货币C）日期/时间 D）OLE对象|参考答案：D数数据据库库和和表表的的基基本本操操作作|数据类型中，一个表
4、中只能有一个的字段类型是（）。A）文本 B）备注 C）自动编号 D）是/否|参考答案：D数数据据库库和和表表的的基基本本操操作作|下列关于0LE对象的叙述中，正确的是A)用于输入文本数据B)用于处理超级链接数据C)用于生成自动编号数据D)用于链接或内嵌Windows支持的对象|参考答案：Dz【解析】OLE对象是指字段允许单独地链接或嵌入OLE对象，如Word文档、Excel表格、图像、声音或其他二进制数据。 数数据据库库和和表表的的基基本本操操作作|下列关于货币数据类型的叙述中，错误的是 A）货币型字段在数据表中占8个字节的存储空间B）货币型字段可以与数字型数据混合计算，结果为货币型C）向货币
5、型字段输入数据时，系统自动将其设置为4位小数D）向货币型字段输入数据时，不必输入人民币符号和千位分隔符|参考答案：C数数据据库库和和表表的的基基本本操操作作|在数据表视图中，不能进行的操作是A）删除一条记录 B）修改字段的类型C）删除一个字段 D）修改字段的名称|参考答案：B数数据据库库和和表表的的基基本本操操作作|下列对数据输入无法起到约束作用的是A）输入掩码B）有效性规则C）字段名称D）数据类型|参考答案：C数数据据库库和和表表的的基基本本操操作作|Access中，设置为主键的字段A）不能设置索引 B）可设置为“有（有重复）”索引C）系统自动设置索引 D）可设置为“无”索引|参考答案：C数
6、数据据库库和和表表的的基基本本操操作作|输入掩码字符“”的含义是A）必须输入字母或数字B）可以选择输入字母或数字C）必须输入一个任意的字符或一个空格D）可以选择输入任意的字符或一个空格|参考答案：C数数据据库库和和表表的的基基本本操操作作|通配符“#”的含义是A）通配任意个数的字符 B）通配任何单个字符C）通配任意个数的数字字符 D）通配任何单个数字字符|参考答案：D数数据据库库和和表表的的基基本本操操作作|在Access中，如果不想显示数据表中的某些字段，可以使用的命令是A）隐藏B）删除C）冻结D）筛选|参考答案：A数数据据库库和和表表的的基基本本操操作作|若要求在文本框中输入文本时达到密码
7、“*”的显示效果，则应该设置的属性是A）默认值 B）有效性文本 C）输入掩码 D）密码|参考答案：C数数据据库库和和表表的的基基本本操操作作|若将文本型字段的输入掩码设置为“#-#”,则正确的输入数据是A）0755-abcdet B）077 -12345C）a cd-123456 D）#-#|参考答案：B数数据据库库和和表表的的基基本本操操作作|在定义表中字段属性时，对要求输入相对固定格式的数椐，例如电话号码01065971234，应该定义该字段的A)格式 B)默认值 C)输入掩码 D)有效性规则|参考答案：Cz【解析】在输入数据时，经常会遇到有些数据有相对固定的书写格式，可以定义一个输入掩码
8、，将格式中不变的符号固定成格式的一部分，这样在输入数据时，只需要输入变化的值即可。 数数据据库库和和表表的的基基本本操操作作|在设计表时，若输入掩码属性设置为LLLL，则能够接收的输入是A)abcd B)1234 C)ABC D)ABa9|参考答案：Az【解析】输入掩码属性设置为L代表必须输入字母(AZ)。数数据据库库和和表表的的基基本本操操作作|在关系窗口中，双击两个表之间的连接线，会出现A)数据表分析向导 B)数据关系图窗口C)连接线粗细变化 D)编辑关系对话框|参考答案：Dz【解析】在关系窗口中，两表间连接线是通过两表中共有字段所确立的关系，双击此线则弹出编辑关系对话框，可以重新编辑两表
9、间关系。数数据据库库和和表表的的基基本本操操作作|下列表达式计算结果为数值类型的是A）#5/5/2010#-#5/1/2010# B）“102”“11”C）102=98+4 D）#5/1/2010#+5|参考答案：A查查询询的的基基本本操操作作|在Access数据库对象中，体现数据库设计目的的对象是A)报表 B)模块 C)查询 D)表|参考答案：Cz【解析】查询是Access数据库设计目的的体现，建立数据库之后，数据只有被使用者查询才能体现出它的价值。查查询询的的基基本本操操作作|关于查询，下列说法中错误的是（）。A.获得的记录集显示在数据表视图中，并占用一定存储空间B.是Access数据库的
10、一个重要对象C.可生成一个新表D.可从一个或多个表中按照某种准则检索数据|参考答案：A查查询询的的基基本本操操作作|下列关于生成表查询说法错误的是（）。A）属于操作查询的一种B）可把选择查询得到的结果变成一个真正的表C）得到的表独立于数据源D）对生成表的操作可影响原表|参考答案：D查查询询的的基基本本操操作作|可以一次批量地处理大量记录的查询方式是（）。A）选择查询 B）操作查询 C）SQL查询 D）交叉表查询|参考答案：B查查询询的的基基本本操操作作|下列说法中错误的是（）。A）更新查询将改变原来的数据B）追加查询要求源表和目标表必须有若干相同类型的字段C）删除查询主要用于字段的删除D）执行
11、操作查询时系统会给出警告信息|参考答案：C查查询询的的基基本本操操作作|下列关于删除查询说法正确的是（）。A）删除某个满足条件的字段所在的记录B）删除某个满足条件的字段C）只是删除查询结果中的数据，并不删除数据源中的数据D）不可多次执行删除查询|参考答案：A查查询询的的基基本本操操作作|如果在查询条件中使用通配符“”,其含义是A）错误的使用方法B）通配不在括号内的任意字符C）通配任意长度的字符D）通配方括号内任一单个字符|参考答案：D查查询询的的基基本本操操作作|在成绩中要查找成绩80且成绩90的学生，正确的条件表达式是A）成绩Between 80 And 90 B）成绩Between 80
12、To 90C）成绩Between 79 And 91 D）成绩Between 79 To 91|参考答案：A查查询询的的基基本本操操作作|在SQL语言的SELECT语句中，用于实现选择运算的子句是A）FORB）IFC）WHILED）WHERE|参考答案：D查查询询的的基基本本操操作作|在SQL查询中“GROUPBY”的含义是A）选择行条件B）对查询进行排序C）选择列字段D）对查询进行分组|参考答案：D查查询询的的基基本本操操作作|“学生表”中有“学号”、“姓名”、“性别”和“入学成绩”等字段。执行如下SQL命令后的结果是Selectavg（入学成绩）From学生表Groupby性别A）计算并显
13、示所有学生的平均入学成绩B）计算并显示所有学生的性别和平均入学成绩C）按性别顺序计算并显示所有学生的平均入学成绩D）按性别分组计算并显示不同性别学生的平均入学成绩|参考答案：D查查询询的的基基本本操操作作|假设“公司”表中有编号、名称、法人等字段，查找公司名称中有“网络”二字的公司信息，正确的命令是A）SELECT * FROM公司FOR名称 = *网络* B）SELECT * FROM公司FOR名称LIKE *网络* C）SELECT * FROM公司WHERE名称=*网络* D）SELECT * FROM公司WHERE名称LIKE*网络*|参考答案：D查查询询的的基基本本操操作作|已知借阅
14、表中有借阅编号、学号和借阅图书编号等字段，每名学生每借阅一本书生成一条记录，要求按学生学号统计出每名学生的借阅次数，下列SQL语句中，正确的是A)Select学号，Count(学号)from借阅B)Select学号，Count(学号)from借阅Group By学号C)Select学号，Sum(学号)from借阅D)Select学号，Sum(学号)from借阅0rder By学号|参考答案：Bz【解析】要将查询结果按某一列或多列的值分组，且值相等的为一组则使用GROUP BY子句；聚集函数COUNT( )用于统计元组个数。查查询询的的基基本本操操作作|利用对话框提示用户输入查询条件，这样的查询
15、属于A）选择查询B）参数查询C）操作查询D）SQL查询|参考答案：B查查询询的的基基本本操操作作|在数据表中筛选记录，操作的结果是A)将满足筛选条件的记录存入一个新表中B)将满足筛选条件的记录追加到一个表中C)将满足筛选条件的记录显示在屏幕上D)用满足筛选条件的记录修改另一个表中已存在的记录|参考答案：Cz【解析】在Access数据库中经过筛选之后的表，只显示满足条件的记录，而那些不满足条件的记录将被隐藏起来，但表还是原来的表，并没有将数据存入、追加或修改其他的表。查查询询的的基基本本操操作作|在学生借书数据库中，已有“学生”表和“借阅”表，其中“学生”表含有“学号”、“姓名”等信息，“借阅”
16、表含有“借阅编号”、“学号”等信息。若要找出没有借过书的学生记录，并显示其“学号”和“姓名”，则正确的查询设计是|参考答案：Az【解析】首先，要找出没有借书记录的学生，在查询设计网格的学号列下的条件行中键入 Is Null。其次，由于只显示学号和姓名，取消学号列显示行中的复选框。B)C)D)ABCD窗窗体体的的基基本本操操作作|启动窗体时，系统首先执行的事件过程是 A)Load B)Click C)Unload D)GotFocus|参考答案：Cz【解析】窗体的事件比较多，在打开窗体时，将按照下列顺序发生相应的事件。打开(open)加载(load)调整大小(resize)激活(activate
17、)成为当前(current)事件等。正确答案为A)。窗窗体体的的基基本本操操作作|关于“自动创建窗体”下列说法中正确的是（）。A）可创建基于多表或查询的窗体B）用户可指定包含数据源的某些字段C）字段布局与表中的字段顺序保持一致D）只能生成“纵栏式”和“表格式”窗体|参考答案：C窗窗体体的的基基本本操操作作|使用“窗体向导”创建窗体，下列说法错误的是（）。 A）用户可以对创建的窗体任意起名B）当主窗体移动一个记录时，对应的子窗体记录不变C）可创建基于多表的窗体D）可创建基于单表或查询的窗体|参考答案：B窗窗体体的的基基本本操操作作|可以在窗体中进行的操作是（）。 A）修改、添加 B）修改、删除
18、C）查找、修改 D）以上均正确|参考答案：D窗窗体体的的基基本本操操作作|组合框的组成是（）。A）列表框、文本框B）复选框、文本框C）选项组、文本框 D）列表框、选项组|参考答案：A窗窗体体的的基基本本操操作作|下列说法错误的是（）。A）修改记录要先定位记录B）删除记录时系统会弹出提示信息C）在窗体中可对记录进行排序D）窗口中删除记录不会导致其他表数据丢失|参考答案：D窗窗体体的的基基本本操操作作|窗体Caption属性的作用是A)确定窗体的标题 B)确定窗体的名称C)确定窗体的边界类型 D)确定窗体的字体|参考答案：Az【解析】本题主要对窗体的标题属性Caption进行考查，答案为A)。窗窗
19、体体的的基基本本操操作作|若在“销售总数”窗体中有“订货总数”文本框控件，能够正确引用控件值的是A）Forms.销售总数.订货总数 B）Forms!销售总数l.订货总数C）Forms.销售总数!订货总数 D）Forms!销售总数!订货总数 参考答案：D 报报表表的的基基本本操操作作 |在设计报表的过程中，如果要进行强制分页，应使用的工具图标是 A) B) C) D)|参考答案：Dz【解析】本题考查报表中的控件，选项A)为切换按钮，选项B)为组合框，选项C)为列表框，选项D)是分页符，正确答案为D)。报报表表的的基基本本操操作作|在设计视图中创建报表，自动出现的三个节是（）。 A）报表页眉、组页
20、眉、组页脚B）报表页眉、主体、报表页脚 C）页面页眉、主体、页面页脚D）组页眉、主体、组页脚|参考答案：C报报表表的的基基本本操操作作|要对报表中的所有记录求总计，则应将计算控件添加到（）。A）主体节B）组页眉节或组页脚节C）页面页眉节或页面页脚节D）报表页眉节或报表页脚节|参考答案：C报报表表的的基基本本操操作作|在报表设计过程中，不适合添加的控件是A）标签控件 B）图形控件C）文本框控件 D）选项组控件|参考答案：D报报表表的的基基本本操操作作|下列关于报表的叙述中，正确的是A)报表只能输入数据 B)报表只能输出数据C)报表可以输入和输出数据D)报表不能输入和输出数据|参考答案：Bz【解析
21、】报表对象可以将数据库中的数据以格式化的形式显示和打印输出，但报表只能查看数据，不能通过报表修改或输入数据。 报报表表的的基基本本操操作作|要实现报表按某字段分组统计输出，需要设置的是A)报表页脚 B)该字段的组页脚C)主体 D)页面页脚|参考答案：Bz【解析】组页脚区主要安排文本框或其他类型控件显示分组统计数据。报报表表的的基基本本操操作作|在报表中，要计算“数学”字段的最低分，应将控件的“控件来源”属性设置为A）=Min（数学）B）=Min（数学）C）=Min数学 D）Min（数学）|参考答案：A数数据据访访问问页页的的基基本本操操作作 |下列选项中不属于数据访问页类型的是（）。A）交互式
22、报表页 B）数据输入页C）数据输出页 D）数据分析页|参考答案：A宏宏 |下列操作中，适宜使用宏的是A)修改数据表结构 B)创建自定义过程C)打开或关闭报表对象 D)处理报表中错误|参考答案：Cz【解析】宏是由一个或多个操作组成的集合，其中的每个操作都能自动执行，并实现特定的功能。在Access中，可以在宏中定义各种操作，如打开或关闭窗体、显示及隐藏工具栏、预览或打印报表等。宏宏|下列叙述中，错误的是A)宏能够一次完成多个操作B)可以将多个宏组成一个宏组C)可以用编程的方法来实现宏D)宏命令一般由动作名和操作参数组成|参考答案：Dz【解析】宏是由一个或多个操作组成的集合，其中每个操作都实现特定
23、的功能，宏可以是由一系列操作组成的一个宏，也可以是一个宏组。通过使用宏组，可以同时执行多个任务。既可以用Access中的宏生成器来创建和编辑宏，也可以通过编程实现。宏由宏名、参数、条件及宏操作等构成。宏宏|为窗体或报表的控件设置属性值的正确宏操作命令是A）SetB）SetDataC）SetValueD）SetWarnings|参考答案：C模模块块 |下列数据类型中，不属于VBA的是A)长整型 B)布尔型 C)变体型 D)指针型|参考答案：Dz【解析】VBA的数据类型中有字符串型、字节型、布尔型、整数型、长整数型、单精度型、双精度型、日期型、货币型、小数点型 、变体型及对象型等，没有指针类型的数
24、据。模模块块|下列变量名中，合法的是A）4AB）A-1C）ABC_1D）private|参考答案：C模模块块|要将一个数字字符串转换成对应的数值，应使用的函数是A）Val B）Single C）Asc D）Space|参考答案：A模模块块|下列数组声明语句中，正确的是A)Dim A3,4As Integer B)Dim A(3,4)As IntegerC)Dim A3；4As Integer D)Dim A(3；4)As Integer|参考答案：Bz【解析】在VBA中数组声明的格式为：dim 数组名(维数定义)as 类型，声明数组用圆括号，如果定义多维数组时，维数之间用逗号分隔。模模块块|在
25、模块的声明部分使用“OptionBase1”语句，然后定义二维数组A(2to5,5)，则该数组的元素个数为A）20 B）24 C）25 D）36|参考答案：A模模块块|在调试VBA程序时，能自动被检查出来的错误是A）语法错误B）逻辑错误C）运行错误D）语法错误和逻辑错误|参考答案：A模模块块|下列关于对象“更新前”事件的叙述中，正确的是A）在控件或记录的数据变化后发生的事件B）在控件或记录的数据变化前发生的事件C）当窗体或控件接收到焦点时发生的事件D）当窗体或控件失去了焦点时发生的事件|参考答案：D模模块块|下列属于通知或警告用户的命令是A）PrintOutB）OutputToC）MsgBox
26、D）RunWarnings|参考答案：C模模块块|能够实现从指定记录集里检索特定字段值的函数是A）NzB）FindC）LookupD）DLookup|参考答案：D模模块块|InputBox函数的返回值类型是A）数值B）字符串C）变体D）视输入的数据而定|参考答案：B模模块块|执行语句：MsgBoxAAAA，vbOKCancelvbQuestion，BBBB之后，弹出的信息框A)标题为BBBB、框内提示符为惊叹号、提示内容为AAAAB)标题为AAAA、框内提示符为惊叹号、提示内容为BBBBC)标题为BBBB、框内提示符为问号、提示内容为AAAAD)标题为AAAA、框内提示符为问号、提示内容为BB
27、BB|参考答案：Cz【解析】消息框格式为MsgBox(prompt，buttons ，title ，helpfile ，context)，AAAA为prompt项，显示为显示内容。VbOKCancel显示确定及取消按钮，VbQuestion显示问号图标，这两部分对应buttons项，BBBB为标题title项。后两项helpfile及context省略。 模模块块|在窗体上有一个命令按钮Commandl，编写事件代码如下：PrivateSubCommandl_Click()Dimd1AsDateDimd2AsDatedl=#12/25/2009#d2=#1/5/2010#MsgBoxDateD
28、iff(”ww”,d1,d2)EndSub打开窗体运行后，单击命令按钮，消息框中输出的结果是A）1 B）2 C）10 D）11|参考答案：B模模块块|【解析】DateDiff(interval,date1,date2,firstdayofweek,firstweekofyear)zDateDiff 函数语法中有下列命名参数： 部分 描述 interval 必要。字符串表达式，表示用来计算date1 和 date2 的时间差的时间间隔 zinterval 参数的设定值如下： 设置 描述z yyyy 年 q 季 m 月 zy 一年的日数 d 日 zw 一周的日数 ww 周 zh 时 n 分钟 s
29、秒 模模块块|下列程序段的功能是实现“学生”表中“年龄”字段值加1DimStrAsStringStr=Docmd.RunSQLStr空白处应填入的程序代码是A）年龄=年龄+1 B）Update学生 Set 年龄=年龄+1C）Set 年龄=年龄+1 D）Edit 学生 年龄=年龄+l|参考答案：B模模块块|下列能够交换变量X和Y值的程序段是A）Y=X:X=YB）Z=X:Y=Z:X=YC）Z=X:X=Y:Y=ZD）Z=X:W=Y:Y=Z:X=Y|参考答案：C模模块块|由“Fori=1To9Step-3”决定的循环结构，其循环体将被执行A）0次 B）1次 C）4次 D）5次|参考答案：A模模块块|若
30、变量i的初值为8,则下列循环语句中循环体的执行次数为DoWhilei=17i=i+2LoopA）3次B）4次C）5次D）6次|参考答案：C模模块块|设有如下过程： x1 Do xx2 Loop Until 运行程序，要求循环体执行3次后结束循环，空白处应填入的语句是A)x7 B)x7 D)x7|参考答案：Cz【解析】Loop Until循环语句：当条件表达式为真时，跳出循环。第1次循环xx1123，第2次循环xx2325；第3次循环xx2527，查看所有选项得出答案为C)。模模块块|在窗体中有一个文本框Textl，编写事件代码如下：Private Sub Form_Click()Xval(In
31、putbox(输入X的值)Y1IfX0 Then Y2Text1.ValueYEnd Sub打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是|A)1B)2C)3D)4|参考答案：B【解析】本题中窗体单击事件是通过从输入框输入数值，根据所输入数值内容对y进行赋值，运行时输入框输入12，此值不等于0所以y的值为2，正确答案为B)。模模块块|运行下列程序，输入数据8,9,3,0后，窗体中显示结果是Private Sub Form _click（）Dim sum AsInteger,m As Integersum=0Dom=InputBox（“输入m”）sum=sum+mLoop
32、 Until m=0MsgBox sumEnd SubA）0B）17C）20D）21|参考答案：C模模块块|在窗体中有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：Private Sub Commandl_Click() For I1 To 4 X3 For j1 To 3 For k1 To 2 xx3 Next k Next jNext I Text1.valueStr(X)End Sub打开窗体运行后，单击命令按钮，文本框Textl输出的结果是A)6 B)12 C)18 D)21|参考答案：Dz【解析】此题为3层嵌套循环，经过分析可见I的最外层循环没有实际意义，I
33、值从1到4时，x的结果是一样的。当j1，k1时，xx36，next k，这时k2，x639；最内层循环执行完毕，执行第二层循环，即j2，重复上面步骤，以此类推到j3，最终x值为21。模模块块|在窗体上有一个命令按钮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 Textl.Value=Str(x)End Sub打开窗体运行后，单击命令按钮，文本框中显示的结果是A
34、）1B）7C）17D）400|参考答案：A模模块块|在窗体上有一个命令按钮Commandl，编写事件代码如下：Private Sub Commandl_Click() Dim y As Integer y = 0 Do y = InputBox(y=) If (y Mod 10) + Int(y / 10) = 10 Then Debug.Print y; Loop Until y = 0End Sub打开窗体运行后，单击命令按钮，依次输入10、37、50、55、64、20、28、19、-19、0，立即窗口上输出的结果是A）37 55 64 28 19 19 B）10 50 20C）10 50
35、 20 0 D）37 55 64 28 19|参考答案：D模模块块|窗体中有3个命令按钮，分别命名为Commandl、Command2和Command3。当单击Cmmandl按钮时，Command2按钮变为可用，Command3按钮变为不可见。下列Commandl的单击事件过程中，正确的是A) Private Sub Command1_Click()Command2.VisibleTrueCommand3.VisibleFalseEnd SubB) Private Sub Command1_Click()Command2.EnabledTrueCommand3.EnabledFalseEnd
36、SubC) Private Sub Command1_Click()Command2.EnabledTrueCommand3.VisibleFalseEnd SubD) Private Sub Command1_Click()Command2.VisibleTrueCommand3.EnabledFalseEnd Sub|参考答案：Cz【解析】在按钮的属性中，Enable控制按钮的可用性，Visible控制按钮的可见性。模模块块|在窗体上有一个命令按钮Commandl，编写事件代码如下：Private Sub Command1_Click() Dim x As Integer, y As In
37、teger x = 12: y = 32 Call Proc(x, y) Debug.Print x; yEnd SubPublic Sub Proc(n As Integer, ByVal m As Integer)n = n Mod 10m = m Mod 10End Sub打开窗体运行后，单击命令按钮，立即窗口上输出的结果是A）232B）123C）22D）1232|参考答案：A模模块块|窗体中有命令按钮Commandl,事件过程如下：Public Function f f（x As Integer） As IntegerDim y As Integerx=20y=2f=x*yEnd Fu
38、nctionPrivate Sub Commandl_Click（）Dim y As IntegerStatic x As Integerx=10y=5y=f f（x）Debug .Print x;yEnd Sub运行程序，单击命令按钮，则立即窗口中显示的内容是A）10 5 B）10 40C）20 5D）20 40|参考答案：B模模块块|在窗体中有一个命令按钮Commandl，编写事件代码如下：Private Sub Command1_CliCk() Dim s As Integer sP(1)P(2)P(3)P(4) debug.Print SEnd SUbPublic Function P
39、(N As Integer) Dim Sum As Integer Sum0 For i1 To N SumSumi Next i PSumEnd Function打开窗体运行后，单击命令按钮，输出结果是A)15 B)20 C)25 D)35|参考答案：Bz【解析】考察循环结构。当N1时，p(1)1；当N2时，p(2)3；当N3时，p(3)6；当N4时，p(4)10；所以s20。模模块块|在窗体上有一个命令按钮Commandl，编写事件代码如下：Private Sub Command1_Click()Dim a(10), p(3) As Integerk = 5For i = 1 To 10a
40、(i) = i * iNext iFor i = 1 To 3p(i) = a(i * i)Next iFor i = 1 To 3k = k + p(i) *2Next iMsgBox k End Sub打开窗体运行后，单击命令按钮，消息框中输出的结果是【1】。|参考答案： 201模模块块|在窗体文本框Textl中输入“456AbC”后，立即窗口上输出的结果是【2】。Private Sub Textl_KeyPress(KeyAscii As Integer)Select Case DeyAsciiCase 97 To 122Debug.Print Ucase(Chr(KeyAscii);C
41、ase 65 To 90Debug.Print Lcase(Chr(KeyAscii);Case 48 To 57Debug.Print Chr(KeyAscii); Case ElseKeyAscii = 0End SelectEnd Sub|参考答案： 456aBc模模块块|一下列程序的功能是求方程：x2十y2=1000的所有整数解。请在空白处填入适当的语句，使程序完成指定的功能。Private Sub Commandl_Click（）Dim as integer,y as integerFor x= -34 To 34For y= -34 To 34If【1】Then Debug .Pr
42、int x,yEnd If Next y Next xEnd Sub|参考答案： x2+y2=1000模模块块|下列程序的功能是求算式：1+1/2!+1/3!+1/4!+前10项的和（其中n!的含义是n的阶乘）。请在空白处填入适当的语句，使程序完成指定的功能。Private Sub Commandl_Click（）Dim i as integer,s as single,a as singlea=1:s=0For i=1 To 10a=【2】 s=s+aNext iDebug .Print “1+1/2!十1/3!+. =”;sEnd Sub|参考答案： a/i模模块块|下列程序的功能是找出被
43、5、7除，余数为1的最小的5个正整数。请在程序空白处填入适当的语句，使程序可以完成指定的功能。Private Sub Form_Click()Dim Ncount %, n% n=1：Ncount=0 do n = n + 1 If 【3】 Then Debug.Print n Ncount =Ncount + 1End IfLoop Until Ncont = 5End Sub|参考答案： n mod 5=1 and n mod 7=1模模块块|以下程序的功能是在立即窗口中输出100到200之间所有的素数，并统计输出素数的个数。请在程序空白处填入适当的语句，使程序可以完成指定的功能。Priv
44、ate Sub Command2_Click()Dim i%, j%, k%, t % t 为统计素数的个数Dim b As BooleanFor i = 100 To 200b = Truek = 2j = Int(Sqr(i)Do While k = j And bIf I Mod k = 0 Then b = 【4】 End Ifk = 【5】 Loop If b = True Then t = t + 1 Debug.Print iEnd IfNext iDebug.Print “t=”; tEnd Sub|参考答案：【4】false 【5】k+1模模块块|某次大奖赛有7个评委同时为一
45、位选手打分，去掉一个最高分和一个最低分，其余5个分数的平均值为该名参赛者的最后得分。请填空完成规定的功能。sub command1_click()Dim mark！，aver！，i%，max1！，min1!aver0For i1 To 7markInputBox(请输入第 & i &位评委的打分)If i1 Thenmax1mark：min1markElseIf markmax1 Then_【6】_ End IfEnd If_【7】_Next iaver(avermax1min1)/5MsgBox averEnd sub|参考答案：【6】max1mark 【7】averavermarkz【解析
46、解析】通过mark和min1比较得出最低分存入min1中，通过mark和max1比较得出最高分存入max1中，然后利用aver累加所有的评分，最后从aver中减去最高分和最低分再除以5即为参赛者最后得分。 模模块块|数据库中有工资表，包括“姓名”、“工资”和“职称”等字段，现要对不同职称的职工增加工资，规定教授职称增加15%，副教授职称增加10%，其他人员增加5%。下列程序的功能是按照上述规定调整每位职工的工资，并显示所涨工资之总和。请在空白处填入适当的语句，使程序可以完成指定的功能。PrivateSubCommand5_Click()DimwsAsDAO.WorkspaceDimdbAsDA
47、O.DatabaseDimrsAsDAO.RecordsetDimgzAsDAO.FieldDimzcAsDAO.FieldDimsumAsCurrencyDimrateAsSingleSetdb=CurrentDb()Setrs=db.OpenRecordset(工资表）Setgz=rs.Fields(工资)Setzc=rs.Fields(职称)sum=0模模块块DoWhileNot【8】rs.EditSelectCasezcCaseIs=“教授”rate=0.15CaseIs=“副教授”rate=0.1CaseElserate=0.05EndSelectsum=sum+gz*rategz=gz+gz*rate【9】rs.MoveNextLooprs.Closedb.CloseSetrs=NothingSetdb=NothingMsgBox涨工资总计:&sumEndSub|参考答案：【8】rs.EOF 【9】rs.update
