《Access数据库》复习.ppt

Access数据库 复习,数据库基础知识,Access数据库的结构层次是 A)数据库管理系统应用程序表 B)数据库数据表记录字段 C)数据表记录数据项数据 D)数据表记录字段 参考答案：B 在Access数据库中，数据库是一个关于特定主题或用途的信息的集合，数据库使用表来存储数据，表中的数据单位是记录，记录的数据结构由字段定义。,数据库基础知识,关于Access窗口，下列说法错误的是（ ）。 A）Access窗口由标题栏、菜单栏、工具栏和状态栏等几部分组成 B）Access菜单栏是一成不变的 C）对象列表框默认状态下会显示创建此类对象的快捷方式 D）在组中添加对象不改变该对象原始的位置 参考答案：B,数据库基础知识,Access数据库最基础的对象是 A）表 B）宏 C）报表 D）查询 参考答案：A,数据库和表的基本操作,下列选项中，不属于Access数据类型的是 A)数字 B)文本 C)报表 D)时间/日期 参考答案：C 【解析】Access中可以使用的数据类型有10种：文本、备注、数字、日期/时间、货币、自动编号、是/否、OLE对象、超级链接和查阅向导。报表是Access提供的一种对象，不属于Access数据类型。,数据库和表的基本操作,如果在创建表中建立字段“性别“并要求用汉字表示，其数据类型应当是 A)是/否 B)数字 C)文本 D)备注 参考答案：C 【解析】建立新表时要求表中字段用汉字表示，则要设置该字段的数据类型为文本。,数据库和表的基本操作,下列关于空值的叙述中，正确的是 A)空值是双引号中间没有空格的值 B)空值是等于0的数值 C)空值是使用Null或空白来表示字段的值 D)空值是用空格表示的值 参考答案：C 【解析】使用Null或空白来表示字段的空值。空值是缺值或还没有值。,数据库和表的基本操作,下列字段的数据类型中，不能作为主键的数据类型是（ ）。 A）文本 B）货币 C）日期/时间 D）OLE对象 参考答案：D,数据库和表的基本操作,数据类型中，一个表中只能有一个的字段类型是（ ）。 A）文本 B）备注 C）自动编号 D）是/否 参考答案：D,数据库和表的基本操作,下列关于0LE对象的叙述中，正确的是 A)用于输入文本数据 B)用于处理超级链接数据 C)用于生成自动编号数据 D)用于链接或内嵌Windows支持的对象 参考答案：D 【解析】OLE对象是指字段允许单独地“链接“或“嵌入“OLE对象，如Word文档、Excel表格、图像、声音或其他二进制数据。,数据库和表的基本操作,下列关于货币数据类型的叙述中，错误的是 A）货币型字段在数据表中占8个字节的存储空间 B）货币型字段可以与数字型数据混合计算，结果为货币型 C）向货币型字段输入数据时，系统自动将其设置为4位小数 D）向货币型字段输入数据时，不必输入人民币符号和千位分隔符 参考答案：C,数据库和表的基本操作,在数据表视图中，不能进行的操作是 A）删除一条记录 B）修改字段的类型 C）删除一个字段 D）修改字段的名称 参考答案：B,数据库和表的基本操作,下列对数据输入无法起到约束作用的是 A）输入掩码 B）有效性规则 C）字段名称 D）数据类型 参考答案：C,数据库和表的基本操作,Access中，设置为主键的字段 A）不能设置索引 B）可设置为“有（有重复）”索引 C）系统自动设置索引 D）可设置为“无”索引 参考答案：C,数据库和表的基本操作,输入掩码字符“”的含义是 A）必须输入字母或数字 B）可以选择输入字母或数字 C）必须输入一个任意的字符或一个空格 D）可以选择输入任意的字符或一个空格 参考答案：C,数据库和表的基本操作,通配符“#”的含义是 A）通配任意个数的字符 B）通配任何单个字符 C）通配任意个数的数字字符 D）通配任何单个数字字符 参考答案：D,数据库和表的基本操作,在Access中，如果不想显示数据表中的某些字段，可以使用的命令是 A）隐藏 B）删除 C）冻结 D）筛选 参考答案：A,数据库和表的基本操作,若要求在文本框中输入文本时达到密码“*”的显示效果，则应该设置的属性是 A）默认值 B）有效性文本 C）输入掩码 D）密码 参考答案：C,数据库和表的基本操作,若将文本型字段的输入掩码设置为“#-#”,则正确的输入数据是 A）0755-abcdet B）077 -12345 C）a cd-123456 D）#-# 参考答案：B,数据库和表的基本操作,在定义表中字段属性时，对要求输入相对固定格式的数椐，例如电话号码01065971234，应该定义该字段的 A)格式 B)默认值 C)输入掩码 D)有效性规则 参考答案：C 【解析】在输入数据时，经常会遇到有些数据有相对固定的书写格式，可以定义一个输入掩码，将格式中不变的符号固定成格式的一部分，这样在输入数据时，只需要输入变化的值即可。,数据库和表的基本操作,在设计表时，若输入掩码属性设置为“LLLL“，则能够接收的输入是 A)abcd B)1234 C)ABC D)ABa9 参考答案：A 【解析】输入掩码属性设置为L代表必须输入字母(AZ)。,数据库和表的基本操作,在关系窗口中，双击两个表之间的连接线，会出现 A)数据表分析向导 B)数据关系图窗口 C)连接线粗细变化 D)编辑关系对话框 参考答案：D 【解析】在关系窗口中，两表间连接线是通过两表中共有字段所确立的关系，双击此线则弹出“编辑关系“对话框，可以重新编辑两表间关系。,数据库和表的基本操作,下列表达式计算结果为数值类型的是 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)表 参考答案：C 【解析】查询是Access数据库设计目的的体现，建立数据库之后，数据只有被使用者查询才能体现出它的价值。,查询的基本操作,关于查询，下列说法中错误的是（ ）。 获得的记录集显示在数据表视图中，并占用一定存储空间 是Access数据库的一个重要对象 可生成一个新表 可从一个或多个表中按照某种准则检索数据 参考答案：A,查询的基本操作,下列关于生成表查询说法错误的是（ ）。 A）属于操作查询的一种 B）可把选择查询得到的结果变成一个真正的表 C）得到的表独立于数据源 D）对生成表的操作可影响原表 参考答案：D,查询的基本操作,可以一次批量地处理大量记录的查询方式是（ ）。 A）选择查询 B）操作查询 C）SQL查询 D）交叉表查询 参考答案：B,查询的基本操作,下列说法中错误的是（ ）。 A）更新查询将改变原来的数据 B）追加查询要求源表和目标表必须有若干相同类型的字段 C）删除查询主要用于字段的删除 D）执行操作查询时系统会给出警告信息 参考答案：C,查询的基本操作,下列关于删除查询说法正确的是（ ）。 A）删除某个满足条件的字段所在的记录 B）删除某个满足条件的字段 C）只是删除查询结果中的数据，并不删除数据源中的数据 D）不可多次执行删除查询 参考答案：A,查询的基本操作,如果在查询条件中使用通配符“”,其含义是 A）错误的使用方法 B）通配不在括号内的任意字符 C）通配任意长度的字符 D）通配方括号内任一单个字符 参考答案：D,查询的基本操作,在成绩中要查找成绩80且成绩90的学生，正确的条件表达式是 A）成绩Between 80 And 90 B）成绩Between 80 To 90 C）成绩Between 79 And 91 D）成绩Between 79 To 91 参考答案：A,查询的基本操作,在SQL语言的SELECT语句中，用于实现选择运算的子句是 A）FOR B）IF C）WHILE D）WHERE 参考答案：D,查询的基本操作,在SQL查询中“GROUP BY”的含义是 A）选择行条件 B）对查询进行排序 C）选择列字段 D）对查询进行分组 参考答案：D,查询的基本操作,“学生表”中有“学号”、“姓名”、“性别”和“入学成绩”等字段。执行如下SQL命令后的结果是 Select avg（入学成绩）From学生表Group by性别 A）计算并显示所有学生的平均入学成绩 B）计算并显示所有学生的性别和平均入学成绩 C）按性别顺序计算并显示所有学生的平均入学成绩 D）按性别分组计算并显示不同性别学生的平均入学成绩 参考答案：D,查询的基本操作,假设“公司”表中有编号、名称、法人等字段，查找公司名称中有“网络”二字的公司信息，正确的命令是 A）SELECT * FROM公司FOR名称 = “ *网络* “ B）SELECT * FROM公司FOR名称LIKE “*网络* “ C）SELECT * FROM公司WHERE名称=“*网络* “ D）SELECT * FROM公司WHERE名称LIKE“*网络*“ 参考答案：D,查询的基本操作,已知“借阅“表中有“借阅编号“、“学号“和“借阅图书编号“等字段，每名学生每借阅一本书生成一条记录，要求按学生学号统计出每名学生的借阅次数，下列SQL语句中，正确的是 A)Select学号，Count(学号)from借阅 B)Select学号，Count(学号)from借阅Group By学号 C)Select学号，Sum(学号)from借阅 D)Select学号，Sum(学号)from借阅0rder By学号 参考答案：B 【解析】要将查询结果按某一列或多列的值分组，且值相等的为一组则使用GROUP BY子句；聚集函数COUNT( )用于统计元组个数。,查询的基本操作,利用对话框提示用户输入查询条件，这样的查询属于 A）选择查询 B）参数查询 C）操作查询 D）SQL查询 参考答案：B,查询的基本操作,在数据表中筛选记录，操作的结果是 A)将满足筛选条件的记录存入一个新表中 B)将满足筛选条件的记录追加到一个表中 C)将满足筛选条件的记录显示在屏幕上 D)用满足筛选条件的记录修改另一个表中已存在的记录 参考答案：C 【解析】在Access数据库中经过筛选之后的表，只显示满足条件的记录，而那些不满足条件的记录将被隐藏起来，但表还是原来的表，并没有将数据存入、追加或修改其他的表。,查询的基本操作,在学生借书数据库中，已有“学生”表和“借阅”表，其中“学生”表含有“学号”、“姓名”等信息，“借阅”表含有“借阅编号”、“学号”等信息。若要找出没有借过书的学生记录，并显示其“学号”和“姓名”，则正确的查询设计是 参考答案：A 【解析】首先，要找出没有借书记录的学生，在查询设计网格的“学号“列下的“条件“行中键入 Is Null。其次，由于只显示“学号“和“姓名“，取消“学号“列“显示“行中的复选框。,B),C),D),A,B,C,D,窗体的基本操作,启动窗体时，系统首先执行的事件过程是 A)Load B)Click C)Unload D)GotFocus 参考答案：C 【解析】窗体的事件比较多，在打开窗体时，将按照下列顺序发生相应的事件。打开(open)加载(load)调整大小(resize)激活(activate)成为当前(current)事件等。正确答案为A)。,窗体的基本操作,关于“自动创建窗体”下列说法中正确的是（ ）。 A）可创建基于多表或查询的窗体 B）用户可指定包含数据源的某些字段 C）字段布局与表中的字段顺序保持一致 D）只能生成“纵栏式”和“表格式”窗体 参考答案：C,窗体的基本操作,使用“窗体向导”创建窗体，下列说法错误的是（ ）。 A）用户可以对创建的窗体任意起名 B）当主窗体移动一个记录时，对应的子窗体记录不变 C）可创建基于多表的窗体 D）可创建基于单表或查询的窗体 参考答案：B,窗体的基本操作,可以在窗体中进行的操作是（ ）。 A）修改、添加 B）修改、删除 C）查找、修改 D）以上均正确 参考答案：D,窗体的基本操作,组合框的组成是（ ）。 A）列表框、文本框 B）复选框、文本框 C）选项组、文本框 D）列表框、选项组 参考答案：A,窗体的基本操作,下列说法错误的是（ ）。 A）修改记录要先定位记录 B）删除记录时系统会弹出提示信息 C）在窗体中可对记录进行排序 D）窗口中删除记录不会导致其他表数据丢失 参考答案：D,窗体的基本操作,窗体Caption属性的作用是 A)确定窗体的标题 B)确定窗体的名称 C)确定窗体的边界类型 D)确定窗体的字体 参考答案：A 【解析】本题主要对窗体的标题属性Caption进行考查，答案为A)。,窗体的基本操作,若在“销售总数”窗体中有“订货总数”文本框控件，能够正确引用控件值的是 A）Forms.销售总数.订货总数 B）Forms!销售总数l.订货总数 C）Forms.销售总数!订货总数 D）Forms!销售总数!订货总数 参考答案：D,报表的基本操作,在设计报表的过程中，如果要进行强制分页，应使用的工具图标是 A) B) C) D) 参考答案：D 【解析】本题考查报表中的控件，选项A)为切换按钮，选项B)为组合框，选项C)为列表框，选项D)是分页符，正确答案为D)。,报表的基本操作,在设计视图中创建报表，自动出现的三个节是（ ）。 A）报表页眉、组页眉、组页脚 B）报表页眉、主体、报表页脚 C）页面页眉、主体、页面页脚 D）组页眉、主体、组页脚 参考答案：C,报表的基本操作,要对报表中的所有记录求总计，则应将计算控件添加到（ ）。 A）主体节 B）组页眉节或组页脚节 C）页面页眉节或页面页脚节 D）报表页眉节或报表页脚节 参考答案：C,报表的基本操作,在报表设计过程中，不适合添加的控件是 A）标签控件 B）图形控件 C）文本框控件 D）选项组控件 参考答案：D,报表的基本操作,下列关于报表的叙述中，正确的是 A)报表只能输入数据 B)报表只能输出数据 C)报表可以输入和输出数据 D)报表不能输入和输出数据 参考答案：B 【解析】报表对象可以将数据库中的数据以格式化的形式显示和打印输出，但报表只能查看数据，不能通过报表修改或输入数据。,报表的基本操作,要实现报表按某字段分组统计输出，需要设置的是 A)报表页脚 B)该字段的组页脚 C)主体 D)页面页脚 参考答案：B 【解析】组页脚区主要安排文本框或其他类型控件显示分组统计数据。,报表的基本操作,在报表中，要计算“数学”字段的最低分，应将控件的“控件来源”属性设置为 A）=Min（数学） B）=Min（数学） C）=Min数学 D）Min（数学） 参考答案：A,数据访问页的基本操作,下列选项中不属于数据访问页类型的是（ ）。 A）交互式报表页 B）数据输入页 C）数据输出页 D）数据分析页 参考答案：A,宏,下列操作中，适宜使用宏的是 A)修改数据表结构 B)创建自定义过程 C)打开或关闭报表对象 D)处理报表中错误 参考答案：C 【解析】宏是由一个或多个操作组成的集合，其中的每个操作都能自动执行，并实现特定的功能。在Access中，可以在宏中定义各种操作，如打开或关闭窗体、显示及隐藏工具栏、预览或打印报表等。,宏,下列叙述中，错误的是 A)宏能够一次完成多个操作 B)可以将多个宏组成一个宏组 C)可以用编程的方法来实现宏 D)宏命令一般由动作名和操作参数组成 参考答案：D 【解析】宏是由一个或多个操作组成的集合，其中每个操作都实现特定的功能，宏可以是由一系列操作组成的一个宏，也可以是一个宏组。通过使用宏组，可以同时执行多个任务。既可以用Access中的宏生成器来创建和编辑宏，也可以通过编程实现。宏由宏名、参数、条件及宏操作等构成。,宏,为窗体或报表的控件设置属性值的正确宏操作命令是 A）Set B）SetData C）SetValue D）SetWarnings 参考答案：C,模块,下列数据类型中，不属于VBA的是 A)长整型 B)布尔型 C)变体型 D)指针型 参考答案：D 【解析】VBA的数据类型中有字符串型、字节型、布尔型、整数型、长整数型、单精度型、双精度型、日期型、货币型、小数点型 、变体型及对象型等，没有指针类型的数据。,模块,下列变量名中，合法的是 A）4A B）A-1 C）ABC_1 D）private 参考答案：C,模块,要将一个数字字符串转换成对应的数值，应使用的函数是 A）Val B）Single C）Asc D）Space 参考答案：A,模块,下列数组声明语句中，正确的是 A)Dim A3,4As Integer B)Dim A(3,4)As Integer C)Dim A3；4As Integer D)Dim A(3；4)As Integer 参考答案：B 【解析】在VBA中数组声明的格式为：dim 数组名(维数定义)as 类型，声明数组用圆括号，如果定义多维数组时，维数之间用逗号分隔。,模块,在模块的声明部分使用“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）PrintOut B）OutputTo C）MsgBox D）RunWarnings 参考答案：C,模块,能够实现从指定记录集里检索特定字段值的函数是 A）Nz B）Find C）Lookup D）DLookup 参考答案：D,模块,InputBox函数的返回值类型是 A）数值 B）字符串 C）变体 D）视输入的数据而定 参考答案：B,模块,执行语句：MsgBox “AAAA“，vbOKCancelvbQuestion，“BBBB“之后，弹出的信息框 A)标题为“BBBB“、框内提示符为“惊叹号“、提示内容为“AAAA“ B)标题为“AAAA“、框内提示符为“惊叹号“、提示内容为“BBBB“ C)标题为“BBBB“、框内提示符为“问号“、提示内容为“AAAA“ D)标题为“AAAA“、框内提示符为“问号“、提示内容为“BBBB“ 参考答案：C 【解析】消息框格式为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 DateDiff(” ww”, d1, d2) End Sub 打开窗体运行后，单击命令按钮，消息框中输出的结果是 A）1 B）2 C）10 D）11 参考答案：B,模块,【解析】DateDiff(interval, date1, date2, firstdayofweek, firstweekofyear) DateDiff 函数语法中有下列命名参数： 部分 描述 interval 必要。字符串表达式，表示用来计算date1 和 date2 的时间差的时间间隔 interval 参数的设定值如下： 设置 描述 yyyy 年 q 季 m 月 y 一年的日数 d 日 w 一周的日数 ww 周 h 时 n 分钟 s 秒,模块,下列程序段的功能是实现“学生”表中“年龄”字段值加1 Dim Str As String Str= Docmd.RunSQL Str 空白处应填入的程序代码是 A）年龄=年龄+1 B）Update学生 Set 年龄=年龄+1 C）Set 年龄=年龄+1 D）Edit 学生 年龄=年龄+l 参考答案：B,模块,下列能够交换变量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 参考答案：C,模块,由“For i=1 To 9 Step -3”决定的循环结构，其循环体将被执行 A）0次 B）1次 C）4次 D）5次 参考答案：A,模块,若变量i的初值为8,则下列循环语句中循环体的执行次数为 Do While i=17 i=i+2 Loop A）3次 B）4次 C）5次 D）6次 参考答案：C,模块,设有如下过程： x1 Do xx2 Loop Until 运行程序，要求循环体执行3次后结束循环，空白处应填入的语句是 A)x7 D)x7 参考答案：C 【解析】Loop Until循环语句：当条件表达式为真时，跳出循环。第1次循环xx1123，第2次循环xx2325；第3次循环xx2527，查看所有选项得出答案为C)。,模块,在窗体中有一个文本框Textl，编写事件代码如下： Private Sub Form_Click() Xval(Inputbox(“输入X的值“) Y1 If X0 Then Y2 Text1.ValueY End 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 Integer sum=0 Do m=InputBox（“输入m”） sum=sum+m Loop Until m=0 MsgBox sum End Sub A）0 B）17 C）20 D）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 j Next I Text1.valueStr(X) End Sub 打开窗体运行后，单击命令按钮，文本框Textl输出的结果是 A)6 B)12 C)18 D)21 参考答案：D 【解析】此题为3层嵌套循环，经过分析可见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 打开窗体运行后，单击命令按钮，文本框中显示的结果是 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 = 0 End Sub 打开窗体运行后，单击命令按钮，依次输入10、37、50、55、64、20、28、19、-19、0，立即窗口上输出的结果是 A）37 55 64 28 19 19 B）10 50 20 C）10 50 20 0 D）37 55 64 28 19 参考答案：D,模块,窗体中有3个命令按钮，分别命名为Commandl、Command2和Command3。当单击Cmmandl按钮时，Command2按钮变为可用，Command3按钮变为不可见。下列Commandl的单击事件过程中，正确的是 A) Private Sub Command1_Click() Command2.VisibleTrue Command3.VisibleFalse End Sub B) Private Sub Command1_Click() Command2.EnabledTrue Command3.EnabledFalse End Sub C) Private Sub Command1_Click() Command2.EnabledTrue Command3.VisibleFalse End Sub D) Private Sub Command1_Click() Command2.VisibleTrue Command3.EnabledFalse End Sub 参考答案：C 【解析】在按钮的属性中，Enable控制按钮的可用性，Visible控制按钮的可见性。,模块,在窗体上有一个命令按钮Commandl，编写事件代码如下： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 12: y = 32 Call Proc(x, y) Debug.Print x; y End Sub Public Sub Proc(n As Integer, ByVal m As Integer) n = n Mod 10 m = m Mod 10 End Sub 打开窗体运行后，单击命令按钮，立即窗口上输出的结果是 A）2 32 B）12 3 C）2 2 D）12 32 参考答案：A,模块,窗体中有命令按钮Commandl,事件过程如下： Public Function f（x As Integer） As Integer Dim y As Integer x=20 y=2 f=x*y End Function Private Sub Commandl_Click（） Dim y As Integer Static x As Integer x=10 y=5 y=f（x） Debug .Print x;y End Sub 运行程序，单击命令按钮，则立即窗口中显示的内容是 A）10 5 B）10 40 C）20 5 D）20 40 参考答案：B,模块,在窗体中有一个命令按钮Commandl，编写事件代码如下： Private Sub Command1_CliCk() Dim s As Integer sP(1)P(2)P(3)P(4) debug.Print S End SUb Public Function P(N As Integer) Dim Sum As Integer Sum0 For i1 To N SumSumi Next i PSum End Function 打开窗体运行后，单击命令按钮，输出结果是 A)15 B)20 C)25 D)35 参考答案：B 【解析】考察循环结构。当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 Integer k = 5 For i = 1 To 10 a(i) = i * i Next i For i = 1 To 3 p(i) = a(i * i) Next i For i = 1 To 3 k = k + p(i) *2 Next i MsgBox k End Sub 打开窗体运行后，单击命令按钮，消息框中输出的结果是【1】。 参考答案： 201,模块,在窗体文本框Text l中输入“456AbC”后，立即窗口上输出的结果是【2】。 Private Sub Textl_KeyPress(KeyAscii As Integer) Select Case DeyAscii Case 97 To 122 Debug.Print Ucase(Chr(KeyAscii); Case 65 To 90 Debug.Print Lcase(Chr(KeyAscii); Case 48 To 57 Debug.Print Chr(KeyAscii); Case Else KeyAscii = 0 End Select End Sub 参考答案： 456aBc,模块,一下列程序的功能是求方程：x2十y2=1000的所有整数解。请在空白处填入适当的语句，使程序完成指定的功能。 Private Sub Commandl_Click（） Dim as integer,y as integer For x= -34 To 34 For y= -34 To 34 If【1】Then Debug .Print x,y End If Next y Next x End 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 single a=1:s=0 For i=1 To 10 a=【2】 s=s+a Next i Debug .Print “1+1/2!十1/3!+. =”;s End Sub 参考答案： a/i,模块,下列程序的功能是找出被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 + 1 End If Loop Until Ncont = 5 End Sub 参考答案： n mod 5=1 and n mod 7=1,模块,以下程序的功能是在立即窗口中输出100到200之间所有的素数，并统计输出素数的个数。请在程序空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub Command2_Click() Dim i%