《《Access数据库》复习.ppt》由会员分享,可在线阅读,更多相关《《Access数据库》复习.ppt(94页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、Access数据库数据库 复习数数据据库库基基础础知知识识|Access数据库的结构层次是A)数据库管理系统应用程序表B)数据库数据表记录字段C)数据表记录数据项数据D)数据表记录字段|参考答案:B z在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
12、 80 To 90C)成绩Between 79 And 91 D)成绩Between 79 To 91|参考答案:A 查查询询的的基基本本操操作作|在SQL语言的SELECT语句中,用于实现选择运算的子句是A)FORB)IFC)WHILED)WHERE|参考答案:D 查查询询的的基基本本操操作作|在SQL查询中“GROUP BY”的含义是A)选择行条件B)对查询进行排序C)选择列字段D)对查询进行分组|参考答案:D查查询询的的基基本本操操作作|“学生表”中有“学号”、“姓名”、“性别”和“入学成绩”等字段。执行如下SQL命令后的结果是Select avg(入学成绩)From学生表Group b
13、y性别A)计算并显示所有学生的平均入学成绩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()用于统计元组个数。查查询询的的基基本本操操作作|利用对话框提示用户输入查询条件,这样的查询属于A)选
15、择查询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)修改、删除 C)查找、
18、修改 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)报表页眉、组页眉、组页脚B)报表
20、页眉、主体、报表页脚 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)交互式报表页 B)数据输入
22、页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、Option Base 1”语句,然后定义二维数组A(2 to 5,5),则该数组的元素个数为A)20 B)24 C)25 D)36|参考答案:A模模块块|在调试VBA程序时,能自动被检查出来的错误是A)语法错误B)逻辑错误C)运行错误D)语法错误和逻辑错误|参考答案:A模模块块|下列关于对象“更新前”事件的叙述中,正确的是A)在控件或记录的数据变化后发生的事件B)在控件或记录的数据变化前发生的事件C)当窗体或控件接收到焦点时发生的事件D)当窗体或控件失去了焦点时发生的事件|参考答案:D模模块块|下列属于通知或警告用户的命令是A)PrintOutB)OutputToC)MsgBoxD)RunW
26、arnings|参考答案:C 模模块块|能够实现从指定记录集里检索特定字段值的函数是A)NzB)FindC)LookupD)DLookup|参考答案:D 模模块块|InputBox函数的返回值类型是A)数值B)字符串C)变体D)视输入的数据而定|参考答案:B 模模块块|执行语句:MsgBox AAAA,vbOKCancelvbQuestion,BBBB之后,弹出的信息框A)标题为BBBB、框内提示符为惊叹号、提示内容为AAAAB)标题为AAAA、框内提示符为惊叹号、提示内容为BBBBC)标题为BBBB、框内提示符为问号、提示内容为AAAAD)标题为AAAA、框内提示符为问号、提示内容为BBBB
27、|参考答案:Cz【解析】消息框格式为MsgBox(prompt,buttons,title,helpfile,context),AAAA为prompt项,显示为显示内容。VbOKCancel显示确定及取消按钮,VbQuestion显示问号图标,这两部分对应buttons项,BBBB为标题title项。后两项helpfile及context省略。模模块块|在窗体上有一个命令按钮Commandl,编写事件代码如下:Private Sub Commandl_Click()Dim d1 As Date Dim d2 As Date dl=#12/25/2009#d2=#1/5/2010#MsgBox
28、DateDiff(”ww”,d1,d2)End Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是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
29、分钟 s 秒 模模块块|下列程序段的功能是实现“学生”表中“年龄”字段值加1Dim Str As String Str=Docmd.RunSQL Str空白处应填入的程序代码是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 模模块块|由“For i=1 To 9 Step-3”决定的循环结构,其循环体将被执行A)0次 B)1次 C)4次 D
30、)5次|参考答案:A 模模块块|若变量i的初值为8,则下列循环语句中循环体的执行次数为Do While i=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 F
31、orm_Click()Xval(Inputbox(输入X的值)Y1IfX0 Then Y2Text1.ValueYEnd Sub打开窗体运行后,在输入框中输入整数12,文本框Text1中输出的结果是|A)1 B)2 C)3 D)4|参考答案:B【解析】本题中窗体单击事件是通过从输入框输入数值,根据所输入数值内容对y进行赋值,运行时输入框输入12,此值不等于0所以y的值为2,正确答案为B)。模模块块|运行下列程序,输入数据8,9,3,0后,窗体中显示结果是Private Sub Form _click()Dim sum AsInteger,m As Integersum=0Dom=InputBo
32、x(“输入m”)sum=sum+mLoop 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层嵌套循环,经
33、过分析可见I的最外层循环没有实际意义,I值从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打开窗体运行后,单击命令按钮,文本
34、框中显示的结果是A)1 B)7 C)17 D)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 20
35、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 SubC)P
36、rivate 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 Integer x=12
37、: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)2 32B)12 3C)2 2D)12 32|参考答案:A 模模块块|窗体中有命令按钮Commandl,事件过程如下:Public Function f f(x As Integer)As IntegerDim y As Integerx=20y=2f=x*yEnd FunctionPrivate Sub C
38、ommandl_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(N As Integer)Dim Sum
39、 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(i)=i*iNext iFor i=1 To 3p(i
40、)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iMsgBox k End Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是【1】。|参考答案:201201 模模块块|在窗体文本框Text l中输入“456AbC”后,立即窗口上输出的结果是【2】。Private Sub Textl_KeyPress(KeyAscii As Integer)Select Case DeyAsciiCase 97 To 122Debug.Print Ucase(Chr(KeyAscii);Case 65 To 90Debug.Print Lcase(Chr(KeyAsci
41、i);Case 48 To 57Debug.Print Chr(KeyAscii);Case ElseKeyAscii=0End SelectEnd Sub|参考答案:456aBc456aBc模模块块|一下列程序的功能是求方程:x2十y2=1000的所有整数解。请在空白处填入适当的语句,使程序完成指定的功能。Private Sub Commandl_Click()Dim as integer,y as integerFor x=-34 To 34For y=-34 To 34If【1】Then Debug.Print x,yEnd If Next y Next xEnd Sub|参考答案:x2
42、+y2=1000 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/ia/i模模块块|下列程序的功能是找出被5、7除,余数为1的最小的5个正整数。请在程序空白处填入适当的语句,
43、使程序可以完成指定的功能。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=1n mod 5=1 and n mod 7=1模模块块|以下程序的功能是在立即窗口中输出100到200之间所有的素数,并统计输出素数的个数。请在程序空白处填入适当的语句,使程序可以完成指定的功能。Private Sub Command2_Click()Di
44、m 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 false 【5】k+1模模块块|某次大奖赛有7个评委同时为一位选手打分,去掉一个最高分和一个最低分,其余5个分数的平均值为该名参赛者的最后得分。请填空完成规定的功
45、能。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】max1max1mark mark 【7】averaveraveravermarkmarkz【解析解析】通过mark和min1比较得出最低分存入min1中,通过ma
46、rk和max1比较得出最高分存入max1中,然后利用aver累加所有的评分,最后从aver中减去最高分和最低分再除以5即为参赛者最后得分。模模块块|数据库中有工资表,包括“姓名”、“工资”和“职称”等字段,现要对不同职称的职工增加工资,规定教授职称增加15%,副教授职称增加10%,其他人员增加5%。下列程序的功能是按照上述规定调整每位职工的工资,并显示所涨工资之总和。请在空白处填入适当的语句,使程序可以完成指定的功能。Private Sub Command5_Click()Dim ws As DAO.WorkspaceDim db As DAO.DatabaseDim rs As DAO.Re
47、cordsetDim gz As DAO.FieldDim zc As DAO.FieldDim sum As CurrencyDim rate As SingleSet db=CurrentDb()Set rs=db.OpenRecordset(工资表)Set gz=rs.Fields(工资)Set zc=rs.Fields(职称)sum=0模模块块Do While Not【8】rs.EditSelect Case zcCase Is=“教授”rate=0.15Case Is=“副教授”rate=0.1Case Elserate=0.05End Selectsum=sum+gz*rategz=gz+gz*rate【9】rs.MoveNextLooprs.Closedb.CloseSet rs=NothingSet db=NothingMsgBox 涨工资总计:&sumEnd Sub|参考答案:【8】rs.EOF rs.EOF 【9】rs.updaters.update