河北省对口招生考试计算机专业综合模拟卷（六）

河北省一般高等学校对口招生考试 计算机专业 综合模拟卷（六） 考前须知： 1.本试卷共八道大题。总分 240分。 2.第I卷“一、选择题”、第Ⅱ卷“二、推断题”的答案填涂在机读卡上，其余各题答案写在答题纸上，答在试卷上不得分。用蓝黑钢笔、碳素笔或圆珠笔答题。 3，答愿前将密封线内工程填写清晰。 第I卷(选择题 共100分) 一、选择题（本大题共50小题，每题2分，共100分。在题所给出的四个选项中，只有一个符合题目要求，将正确选项填涂在机读卡上） 1、下列选项中属于计算机的应用领域中目前最热门的应用领域的是（ ） A.科学计算 B.实时控制 C.人工智能 D. 网络应用 2、 在计算机指令中，规定其所执行操作功能的部分称为（ ） A.地址码 B.源操作数 C.操作数 D.操作码 3、 计算机的主频指的是（ ） A. 软盘读写速度，用HZ表示 B.显示器输出速度，用MHZ表示 C.时钟频率，用MHZ表示 D.硬盘读写速度 4、操作系统对磁盘进行读/写操作的单位是（ ） A.磁道 B.字节 C.扇区 D.KB 5、 RAM具有的特点是（ ） A． 海量存储 B．存储在其中的信息可以永久保存 C．一旦断电，存储在其上的信息将全部消失且无法恢复 D．存储在其中的数据不能改写 6、 为了提高软件开发效率，开发软件时应尽量采用（ ） A．汇编语言 B．机器语言 C．指令系统 D．高级语言 7、 在下列各种编码中，每个字节最高位均是“1”的是（ ） A．外码 B．ASCII码 C．汉字机内码 D．汉字国标码 8、 下列关于计算机病毒，说法正确的是（ ） A. 计算机病毒只在可执行文件中传染 B. 计算机病毒主要通过读/写移动存储器或Internet网络进行传播 C. 只要删除所有感染了病毒的文件就可以彻底消除病毒 D. 计算机杀毒软件可以查出和清除任意已知的和未知的计算机病毒 9、 Windows 7的文件夹窗口中，若想一次选中多个分散且非连续的文件或文件夹，正确的操作是（ ） A． 按住Alt键，用鼠标右键逐个选取文件或文件夹 B． 按住Shift键，用鼠标左键逐个选取文件或文件夹 C． 按住Shift键，用鼠标右键逐个选取文件或文件夹 D． 按住Ctrl键，用鼠标左键逐个选取文件或文件夹 10、在Windows环境下，下列操作中与剪贴板无关的是（ ） A.剪切 B.复制 C.粘贴 D.删除 11、安装64位的Windows 7操作系统，至少需要（ ）的内存。 A.512MB B.1GB C.2GB D.4GB 12、 使用Word 2010处理一段纯文本，要想选定文本中一个规则的矩形区域，应在鼠标左键框选文字之前，持续按下的键是（ ） A．Alt B．Shift C．Ctrl D．空格 13、在 Word2010 中，可以设置和显示页眉页脚的视图方式是( ) A.阅读版式视图 B.Web 版式视图 C.大纲视图 D.页面视图 14、在 Word2010 的编辑状态下，按下（ ）键，可以打开“文件”选项卡。 A.Tab+F B、Alt+F C、Ins+F D、Shift+F 15、在Excel 2010中，用来快速分析数据的工具通常是( ) A. 筛选 B. 排序 C. 公式和函数 D. 图表 16、 在Excel 2010中，关于分页符，下列说法正确的是（ ） A. 自动分页符不能删除，手动分页符可以删除 B. 可以在页面布局视图中调整手动分页符位置 C. 自动分页符位置不能改 D. 如果C列右边有个手动分页符，可以选择C列删除该分页符 17、在Excel 2010中，若工作表A1单元格的内容为公式=SUM(B2:D7)，用删除行的命令将第二行删除后，A1单元格的公式将调整为( )。 A.=SUM(ERR) B.=SUM(B3:D7) C.=SUM(B2:D6) D.#VALUE! 18、PowerPoint 2010中，在PowerPoint左侧的幻灯片缩略图中，如何选定多张不连续的幻灯片（ ） A. 按住Shift键单击多张幻灯片 B. 按住Ctrl键单击多张幻灯片 C. 按住Alt键单击多张幻灯片 D. 单击每一张幻灯片 19、在PowerPoint 2010中，创建演示文稿时默认创建（ ）版式的幻灯片。 A. 标题幻灯片 B. 标题和内容 C. 标题和表格 D. 空白版式 20、在Visual Basic中，若变量未经Dim语句声明便直接使用，系统会默认其为（ ） A．整型 B．字符型 C．单精度 D．变体型 21、在Visual Basic中，表达式Print 5 * Sqr(25) + Sgn(4 ^ 4)的值是（ ） A．25 B．26 C．29 D．36 22、 在Visual Basic中，Int(50* Rnd(1)-5)产生的随机整数的闭区间是（ ） A．[-5,50] B．[-5,44] C．[5,44] D．[5,50] 23、 在Visual Basic中，下列数组定义的语句中，错误的是（ ） A．Dim a(10)as Integer B．Dim a(0 to 5,1 to 3)as Integer C．Dime a(3,5)as Integer D．Dim a(3,1 to 4)as Integer 24、 在Visual Basic中，能够容纳其他控件的是容器控件，框架与图片框都是容器控件，下列说法正确的是（ ） A． 当图片框移动时，里面的控件也随之移动，而框架不能 B． 图片框可以容纳能显示图片的控件（例如图像框），而框架不能 C． 在图片框中可以用Print方法输出文本，而框架不能 D． 以上说法都正确 25、 在Visual Basic中，关于过程的描述错误的是（ ） A． 各窗体通用的过程一般在标准模块中用Private定义 B． 如果过程被定义为Static类型，则过程中定义的局部变量都是Static C． 如果过程被定义为Public类型，则该过程可以在程序的任何地方被调用 D． 一个Sub过程必须用End Sub语句结束 26、 在Visual Basic中，删除列表框中的一个列表项，应使用的列表框方法是（ ） A．Move B．Remove C．RemoveItem D．Clear 27、 在Visual Basic中，向一个顺序文件写入数据，但又要保留文件中的原有内容，应采用的文件打开方式是（ ） A．Append B．Output C．Random D．Input 28、 在Visual Basic中，单击窗体，下列程序的运行结果为（ ） Private Sub Form_Click() Dim N As Integer, J As Integer N = 0 J = 1 Do Until N > 2 N = N + 1 J = J + N * (N + 1) Loop Print N; J End Sub A．0 1 B．3 7 C．3 13 D．3 21 29、 在Visual Foxpro中，一个表的全部备注字段的内容存储在（ ）中。 A．同一备注文件 B．不同备注文件 C．同一文本文件 D．同一数据库文件 30、 在Visual Foxpro中,字段的有效性规则不包括（ ） A． 规则 B．信息 C．默认值 D．输入掩码 31、在Visual Foxpro中，不能使用loop语句的程序结构是（ ） A．FOR....ENDFOR B．DO CASE....ENDCASE C．SCAN....ENDSCAN D．DO WHILE....ENDDO 32、 在SQL语句中，在进行分组查询时，为了去掉不满足条件的分组，应当（ ） A．使用WHERE子句 B．先使用WHERE子句，再使用HAVING子句 C．先使用HAVING子句，再使用WHERE子句 D．在GROUP BY后面使用HAVING子句 33、 在Visual Foxpro中，视图设计器的选项卡有（ ） A．字段、联接、筛选、排序依据、分组依据、更新条件、杂项 B．字段、联接条件、筛选、排序依据、分组依据、更新、杂项 C．字段、联接、筛选条件、排序依据、分组依据、更新条件、杂项 D．字段、联接、筛选条件、排序依据、分组依据、更新、杂项 34、在Visual Foxpro中，一个表单从加载到显示，依次触发的事件是（ ） A．Load、Activate、Init B．Init、Load、Activate C．Load、Init、Activate D．Activate、Load、Init 35、下列关于Visual FoxPro中报表的叙述，正确的是（ 　 　） A．在报表设计器中默认的三个基本带区是“标题”、“细节”、“总结” B．报表的数据源是表或视图 C．设置报表的标题，需使用“标签”控件 D. 报表的“细节”带区的内容每页打印一次 36、 关于HTTP协议的描述中，正确的是（ ） A． 定义了FTP客户机与服务器之间的传输协议 B．建立在传输层UDP协议的基础上 C.定义了请求报文和响应报文的格式 D. 要求客户机和服务器使用相同的操作系统 37、 关于虚电路交换方式的描述中，正确的是（ ） A． 源结点与目的结点之间需要预先建立逻辑连接 B． 数据分组通过虚电路传输时需要执行路由选择 C． 在数据分组中需要携带源地址和目的地址 D． 源结点发送分组的顺序与目的结点接收分组的顺序可能不同 38、 关于计算机网络的描述，错误的是（ ） A． 主要功能是控制其他计算机 B．网络结点之间通信应遵循相同协议 C．资源共享是其主要目的之一 D．网络结点可分布在不同地理位置 39、 若要对数据进行字符转换和数字转换，以及数据压缩，应在OSI的（ ）上实现。 A．网络层 B．传输层 C．会话层 D．表示层 40、 在令牌总线控制方法中，如果某一节点要进行数据发送，则必须( ) A.可立即发送 B.等到总线空闲 C.等到空令牌 D.等发送时间到 41、 以太网采用的交换技术是（ ） A.分组交换技术 B.电路交换技术 C.报文交换技术 D.分组交换与电路交换结合技术 42、 一个路由器的路由表项通常包含（ ） A. 目标网络和到达该网络的完整路径 B.所有目标主机和到达目标主机的完整路径 C.目标网络和到达该网络路径的下一个路由器的IP地址 D.互联网中所有路由器的IP地址 43、 POP3邮件传递过程可以分为三个阶段，它们是（ ） A． 认证阶段、事务处理阶段、更新阶段 B．连接建立阶段、认证阶段、更新阶段 C. 连接建立阶段、认证阶段、连接关闭阶段 D.连接建立阶段、邮件传递阶段、连接关闭阶段 44、 下列网络中的设备，哪个可以没有MAC地址（ ） A.网关 B.集线器 C.路由器 D.网卡 45、若某大学分配给计算机系的IP地址块为202.113.16.128/26，分配给自动化系的的IP地址块为202.113.16.192/26，那么这两个地址块经过聚合后的地址为（ ） A．202.113.16.0/24 B．202.113.16.0/25 C．202.113.16.128/25 D．202.113.16.128/24 46、分组交换比电路交换（ ） A．实时性好、线路利用率高 B．实时性好但线路利用率低 C．实时性差但线路利用率高 D．实时性和线路利用率都低 47、 下列说法中正确的是（ ） A． 虚电路与线路交换没有实质不同 B．在通信的两个节点间只能建立一条虚电路 C．虚电路在传送数据前必须建立起专用的通信线路 D．虚电路中的各个节点不需要为每个分组作路由选择 48、无冗余无校验的磁盘阵列是指（ ） A.RAID0 B. RAID1 C.RAID3 D.RAID5 49、 为了保证数据的真实性，可采用（ ） A.访问控制 B.加密机制 C.数字签名 D.路由控制 50、关于搜索引擎的叙述，不正确的是（ ） A.搜索引擎是在Internet上专门提供信息搜索的一类网站 B.利用搜索引擎可以方便用户在Internet上检索信息，但对信息检索效率的提高并不大 C.利用搜索引擎搜索到的匹配条目一般以超链接的形式显示在搜索结果网页中 D.常见的搜索引擎有谷歌、百度和雅虎 第II卷(非选择题 共140分) 2、 判断题（本大题共14小题，每题1分，共14分。将答案填涂在机读卡上，正确的填涂“√”格，错误的填涂“×”格） 51、平均修复时间MTTR是衡量计算机的指标之一，它说明了计算机的可维护性。 52、 计算机工作时，内存储器中存储的是正在执行的程序与数据。（ ） 53、 Windows 7中，删除回收站中的文件，可以释放磁盘空间。（ ） 54、 Windows 7中，卸载应用程序的正确方法是进入资源管理器。（ ） 55、在Word 2010编辑状态下，可以对文字进行动态效果设置。（ ） 56、Word 2010不允许同时打开多个文档。（ ） 57、 Excel 2010中，单元格中的数据显示为一串“#”，说明单元格数据长度小于该列的宽度。（ ） 58、 Excel 2010中,使用组合键Shift+Enter能够实现单元格内换行。（ ） 59、 PowerPoint中的占位符主要用指示内容放置位置。（ ） 60、 在Visual Basic中，程序运行时，控件的位置可以通过程序代码改变Left和Top属性来定位，也可以直接用鼠标拖动控件来定位。（ ） 61、在Visual FoxPro中，视图在物理上能以文件形式独立保存。（ ） 62、在网络电缆中，使用屏蔽的好处是减少电磁干扰辐射。( ) 63、 IPV6采用ARP协议来完成地址解析。（ ） 64、 ISDN提供从终端用户到终端用户的全数字化服务，实现了语音、数据、图形、视频等综合业务的一个全数字化传输方式。（ ） 三、填空题（本大题共13小题，每题2分，共26分，请将答案填写在答题纸上） 65、微机的“内存条”是指________存储器。 66、系统总线包括AB、CB和_______。 67、 汇编程序、解释程序和编译程序属于系统软件中的__________程序。 68、 Windows 7中,当启动程序或打开文档时，不知道某个文件位于何处，则可以使用系统提供的_______功能。 69、 Word 2010中，插入图片后，若希望其成为水印，则应该将图片置于文字_____层。 70、 在Excel 2010中，对单元格的引用有绝对引用、相对引用和________。 71、PowerPoint演示文稿的默认文件扩展名是_______。 72、在Visual Basic中，调用Sub过程时，使用______语句，该语句用于把程序控制传送到一个Sub过程。 73、在Visual Basic中，在程序运行时，要清除图片框Picture1中的图像，应使用的语句是________________。 74、在Visual FoxPro中，已知a="1"，则?type("&a")的结果为________。 75、 在数字通信中，使收发双方在时间基准上保持一致的技术是___________。 76、 交换式以太网的核心设备是___________。 77、 在结构化布线系统中的六个子系统中，____________是整个布线系统的主干线路。 四、依据环境与题意，写出相应的Visual FoxPro语句或SQL语句，要求每题用一条语句完成（本大题共5小题，每题4分，共20分，请填写在答题纸上） 设有现有数据库“DDGL.DBC”，其中包含表“DD.dbf”，该表有以下字段：客户号(C,6)、订单号(C,6)、订购日期(D)、数量(I)、单价(N,10,2)，总金额(N,10,1)。在相应数据库和表已打开的前提下，写出完成下述功能的命令 78、恢复“DD”表中被逻辑删除的记录中“单价”大于等于 450 的记录。（用 Visual FoxPro命令） 79、使用“DD”表，建立以“订单号”和“单价”为关键字，名称为“SY”的降序的唯一索引，复合索引文件名为 DD.CDX。（用 Visual FoxPro 命令） 80、建立“ZG”表，字段为：职工号(C,6)，姓名(C,8)，性别(C,2)，设置“职工号”字段为候选索引，并对“性别”字段建立有效性规则为：“性别”字段只能填“男”或“女”，如果填入其他数据则提示信息“性别错误！”。（用 SQL 语句） 81、计算“DD”表中“总金额”字段的值，总金额=数量*单价。（用 SQL 语句） 82、查询“DD”表中“客户号”为 202430、“总金额”大于等于 10000 的记录，结果保存到数组“CC”中。（用 SQL 语句） 五、程序分析（本大题共2小题，每题5分，共10分，读程序并分析结果，请填写在答题纸上） 83、分析Visual Basic程序，该程序实现的功能是___________ Private Sub Command1_Click() Dim ch As String ch = "" For i = 0 To List1.ListCount - 1 If Left(List1.List(k), Len("数据")) = "数据" Then List1.RemoveItem k End If Next i For j = List1.ListCount - 1 To 0 Step -1 ch = ch & " " & List1.List(j) Next j Text1 = ch End Sub 84、在Visual FoxPro中,下列程序的功能是_________________________________ SELECT 1 USE CJB ZAP SELECT 2 USE XS INDEX ON 学号 TO XS.IDX SELECT 3 USE CJ SET RELATION TO 学号 INTO B INDEX ON 课程名+STR(240-成绩)TO KCCJ GO TOP SCAN FOR 课程名="计算机专业理论" SCATTER TO SZ FIELDS 学号，B->姓名，B->班级，课程名，成绩 SELECT 1 APPEND BLANK GATHER FROM SZ SELECT 3 ENDSCAN SELECT 1 六、写出以下程序的运行结果（本大题共5小题，每题5分，共25分，请填写在答题纸上） 85、运行下列Visual Basic程序，单击命令按钮COMMAND1，在窗体上显示的结果为____________ Private Sub Command1_Click() Dim i As Integer Dim a(10) As Integer Dim p(3) As Integer k = 5 For i = 0 To 10 a(i) = i Next i For i = 0 To 2 p(i) = a(i * (i + 1)) Next i For i = 0 To 2 k = k + p(i) * 2 Next i Print k End Sub 86、分析Visual Basic程序： Private Sub Command1_Click() a = Array(1, 2, 7, 10, 6) b = Array(5, 4, 7, 8, 2) i = 0 j = 0 Do If i <= UBound(a) And j <= UBound(b) Then If a(i) < b(j) Then Print a(i); i = i + 1 Else Print b(j); j = j + 1 End If Else If i <= UBound(a) Then Print a(i); i = i + 1 End If If j <= UBound(b) Then Print b(j); j = j + 1 End If End If Loop Until i > UBound(a) And j > UBound(b) End Sub 运行该程序，程序的运行结果为________ 87、有如下Visual FoxPro程序： CLEAR PUBLIC A,B A=1 B=A+1 C=B+2 DO SUB1 ?A,B,C DO SUB2 WITH A,B,C ?A,B,C RETURN PROC SUB1 A=A+2 ENDPROC PROC SUB2 PARA X,Y,Z X=X+Y Y=X*Y Z=X+Y ?X,Y,Z DO SUB3 WITH X,Y ENDPROC PROC SUB3 PARA M,N M=M+1 ?M,N N=N+2 ENDPROC 运行程序后，程序运行的结果为_______________________ 88、有如下Visual FoxPro程序： CLEAR SET COLLATE TO "Machine" ACCEPT"输入原始字符串："TO STARSTR ENDSTR="" M="" FOR I= 1 TO LEN(STARSTR) L=SUBSTR(STARSTR,I,1) IF L>="A" AND L<="Z" M=CHR(ASC("A")+ASC("Z")-ASC(L)) ELSE IF L>="a" AND L<="z" M=CHR(ASC("a")+ASC("z")-ASC(L)) ELSE IF L>="0" AND L<="9" M=CHR(ASC("0")+ASC("9")-ASC(L)) ELSE M=L ENDIF ENDIF ENDIF ENDSTR=ENDSTR+M ENDFOR ?"加密后的字符串为：",ENDSTR 运行上面的程序，输入字符串“23Ae*98”，则加密后的字符串ENDSTR的内容为：___________________ 89、 数据库文件XSXK.DBC包含3张表，表结构和表数据如下图所示。 学生.dbf 课程.dbf 选课.dbf 有如下Visual FoxPro程序： CLEAR SELECT 1 USE 学生 SELECT 2 USE 课程 INDEX ON 课程号 TO KCH1 SELECT 3 USE 选课 SET RELATION TO 课程号 INTO B INDEX ON 课程号 TO KCH2 DO WHILE .T. ACCEPT"请输入课程名:"TO KCM S=0 N=0 SELECT 2 LOCATE FOR ALLT(课程名)=ALLT(KCM) IF EOF() ?"没有该课程相关信息！" ELSE KCH=课程号 SELECT 3 SEEK KCH DO WHILE NOT EOF() AND 课程号=KCH N=N+1 S=S+成绩 SKIP SKIP IN A ENDDO ?N,ROUND(S/N,2) ENDIF WAIT"继续查询吗(Y/N)?"TO P IF !UPPER(P)="Y" EXIT ENDIF ENDDO CLOSE ALL 运行上面的程序，从键盘上先后输入“计算机基础” 和N，显示的结果为________ 7、 Visual Basic程序改错（本大题共有两个小题，每题5分，共10分，每个程序有两个错误行，请在答题纸上写出错误行和对应的正确行，改对一处得一处分，改错不扣分） 90、程序完成的功能是找出1-1000之间各位的数字的阶乘相加之和等于该数的数，并在列表框List1中显示出来。 Private Sub Command1_Click() Dim p As Integer For k = 1 To 1000 a = LTrim(Str(k)) n = 0 For i = 1 To Len(a) p = Val(Mid(a, i, 1)) n = fact(p) Next i If n = k Then List1.AddItem k Next k End Sub Private Function fact(x) If x <= 1 Then fact = 1 Else fact = x * fact(x ) End If End Function 91、程序实现的功能：输入一串字符，判别其是否是回文。所谓回文，是指正读反读都一样的字符串，如ABA、ABBA均是回文，ABCA不是回文。窗口如图所示。 Private Sub Command1_Click() Dim S As String, n As Integer, m As Integer S = Text1.Text n = 1 m=Len(s) Do While n<=m If Mid(S, n, 1)=Mid(S, m, 1) Then n=n+1 m=m+1 Else Exit End If Loop If n>=m Then Text2.Text="是回文" Else Text2.Text="不是回文" End If End Sub 八、程序填空（本大题共7个空，每空5分，共35分，按程序要求在答题纸上填入相应的内容，使程序完整正确） 92、（Visual Basic试题)下列程序的功能：将一个正整数分解为质因数乘积。例如，78=2×3×13。 Option Explicit Private Sub Command1_Click() Dim n As Integer, k As Integer n = InputBox("输入正整数n= ") k = 2 Print n; "= "; Do While n >= k If n Mod k = 0 Then If _________Then Print k Else Print k; "×"; End If _________ Else k = k + 1 End If Loop End Sub 93、（Visual Basic试题)下列程序的功能：先输入一个字符串，再输入3个字符，然后统计这个3个字符分别在字符串中出现的次数并输出。补充下列程序。 Private Sub Command1_Click() Dim ch$(3), str$, prompt$, count%(3) str = InputBox("请输入一个字符串：") For i = 1 To 3 prompt = "请输入要查找的第" & i & "个字符" ch(i) = InputBox(prompt) Next i For i = 1 To Len(str) For j = 1 To 3 If ch(j) = _________ Then _________ End If Next j Next i Print str For i = 1 To 3 Print ch(i); "出现的次数为："; count(i) Next i End Sub 94、（Visual Foxpro试题）表单设计如下图所示，表单数据环境中加入”成绩.DBF”，表单中包含一个标签LABEL1，Caption属性分别为“学生成绩表”、一个表格控件，一个选项按钮组，一个命令按钮组和三个文本框。控件布局如下图所示： 程序实现的功能如下：程序运行后，可以在选项按钮组中选择课目，如”数学”，分别单击”总成绩”、”平均成绩”、”优秀率”，可以在文本框1中显示所有学生该科目的总成绩，文本框2中显示所有学生该科目的平均成绩，文本框3中显示该科目的优秀率（优秀率：成绩>=85分以上学生人数与总人数的比值）。程序运行如下图： Command1的Click编写事件如下代码： DO CASE CASE THISFORM.OPTIONGROUP1.VALUE=1 KC="语文" CASE THISFORM.OPTIONGROUP1.VALUE=2 KC="数学" CASE THISFORM.OPTIONGROUP1.VALUE=3 KC="英语" CASE THISFORM.OPTIONGROUP1.VALUE=4 KC="vf程序设计" ENDCASE _______________________ DO CASE CASE AA=1 SELECT 成绩 GO TOP SUM=0 DO WHILE NOT EOF() ______________ SKIP ENDDO THISFORM.TEXT1.VALUE=SUM CASE AA=2 SELECT AVG(&KC) FROM 成绩 INTO ARRAY TEMP ___________________ CASE AA=3 SELECT 成绩 GO TOP S=0 N=0 DO WHILE NOT EOF() IF &KC>=85 N=N+1 ENDIF S=S+1 SKIP ENDDO THISFORM.TEXT3.VALUE=STR(N,3)+"/"+STR(S,3) ENDCASE 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $$ 河北省一般高等学校对口招生考试 计算机专业 综合模拟卷（六）答案 考前须知： 1.本试卷共八道大题。总分 240分。 2.第I卷“一、选择题”、第Ⅱ卷“二、推断题”的答案填涂在机读卡上，其余各题答案写在答题纸上，答在试卷上不得分。用蓝黑钢笔、碳素笔或圆珠笔答题。 3，答愿前将密封线内工程填写清晰。 第I卷(选择题 共100分) 一、选择题（本大题共50小题，每题2分，共100分。在题所给出的四个选项中，只有一个符合题目要求，将正确选项填涂在机读卡上） 1、下列选项中属于计算机的应用领域中目前最热门的应用领域的是（ ） A.科学计算 B.实时控制 C.人工智能 D. 网络应用 【答案】 C 2、 在计算机指令中，规定其所执行操作功能的部分称为（ ） A.地址码 B.源操作数 C.操作数 D.操作码 【答案】 D 3、 计算机的主频指的是（ ） A. 软盘读写速度，用HZ表示 B.显示器输出速度，用MHZ表示 C.时钟频率，用MHZ表示 D.硬盘读写速度 【答案】 C 4、操作系统对磁盘进行读/写操作的单位是（ ） A.磁道 B.字节 C.扇区 D.KB 【答案】 C 5、 RAM具有的特点是（ ） A． 海量存储 B．存储在其中的信息可以永久保存 C．一旦断电，存储在其上的信息将全部消失且无法恢复 D．存储在其中的数据不能改写 【答案】 C 6、 为了提高软件开发效率，开发软件时应尽量采用（ ） A．汇编语言 B．机器语言 C．指令系统 D．高级语言 【答案】 D 7、 在下列各种编码中，每个字节最高位均是“1”的是（ ） A．外码 B．ASCII码 C．汉字机内码 D．汉字国标码 【答案】 C 8、 下列关于计算机病毒，说法正确的是（ ） A. 计算机病毒只在可执行文件中传染 B. 计算机病毒主要通过读/写移动存储器或Internet网络进行传播 C. 只要删除所有感染了病毒的文件就可以彻底消除病毒 D. 计算机杀毒软件可以查出和清除任意已知的和未知的计算机病毒 【答案】 B 9、 Windows 7的文件夹窗口中，若想一次选中多个分散且非连续的文件或文件夹，正确的操作是（ ） A． 按住Alt键，用鼠标右键逐个选取文件或文件夹 B． 按住Shift键，用鼠标左键逐个选取文件或文件夹 C． 按住Shift键，用鼠标右键逐个选取文件或文件夹 D． 按住Ctrl键，用鼠标左键逐个选取文件或文件夹 【答案】 D 10、在Windows环境下，下列操作中与剪贴板无关的是（ ） A.剪切 B.复制 C.粘贴 D.删除 【答案】 D 11、安装64位的Windows 7操作系统，至少需要（ ）的内存。 A.512MB B.1GB C.2GB D.4GB 【答案】C 12、 使用Word 2010处理一段纯文本，要想选定文本中一个规则的矩形区域，应在鼠标左键框选文字之前，持续按下的键是（ ） A．Alt B．Shift C．Ctrl D．空格 【答案】 A 13、在 Word2010 中，可以设置和显示页眉页脚的视图方式是( ) A.阅读版式视图 B.Web 版式视图 C.大纲视图 D.页面视图 【答案】 D 14、在 Word2010 的编辑状态下，按下（ ）键，可以打开“文件”选项卡。 A.Tab+F B、Alt+F C、Ins+F D、Shift+F 【答案】 B 15、在Excel 2010中，用来快速分析数据的工具通常是( ) A. 筛选 B. 排序 C. 公式和函数 D. 图表 【答案】D 16、 在Excel 2010中，关于分页符，下列说法正确的是（ ） A. 自动分页符不能删除，手动分页符可以删除 B. 可以在页面布局视图中调整手动分页符位置 C. 自动分页符位置不能改 D. 如果C列右边有个手动分页符，可以选择C列删除该分页符 【答案】 A 17、在Excel 2010中，若工作表A1单元格的内容为公式=SUM(B2:D7)，用删除行的命令将第二行删除后，A1单元格的公式将调整为( )。 A.=SUM(ERR) B.=SUM(B3:D7) C.=SUM(B2:D6) D.#VALUE! 【答案】C 18、PowerPoint 2010中，在PowerPoint左侧的幻灯片缩略图中，如何选定多张不连续的幻灯片（ ） A. 按住Shift键单击多张幻灯片 B. 按住Ctrl键单击多张幻灯片 C. 按住Alt键单击多张幻灯片 D. 单击每一张幻灯片 【答案】B 19、在PowerPoint 2010中，创建演示文稿时默认创建（ ）版式的幻灯片。 A. 标题幻灯片 B. 标题和内容 C. 标题和表格 D. 空白版式 【答案】A 20、在Visual Basic中，若变量未经Dim语句声明便直接使用，系统会默认其为（ ） A．整型 B．字符型 C．单精度 D．变体型 【答案】 D 21、在Visual Basic中，表达式Print 5 * Sqr(25) + Sgn(4 ^ 4)的值是（ ） A．25 B．26 C．29 D．36 【答案】 B 22、 在Visual Basic中，Int(50* Rnd(1)-5)产生的随机整数的闭区间是（ ） A．[-5,50] B．[-5,44] C．[5,44] D．[5,50] 【答案】 B 23、 在Visual Basic中，下列数组定义的语句中，错误的是（ ） A．Dim a(10)as Integer B．Dim a(0 to 5,1 to 3)as Integer C．Dime a(3,5)as Integer D．Dim a(3,1 to 4)as Integer 【答案】 C 24、 在Visual Basic中，能够容纳其他控件的是容器控件，框架与图片框都是容器控件，下列说法正确的是（ ） A． 当图片框移动时，里面的控件也随之移动，而框架不能 B． 图片框可以容纳能显示图片的控件（例如图像框），而框架不能 C． 在图片框中可以用Print方法输出文本，而框架不能 D． 以上说法都正确 【答案】 C 25、 在Visual Basic中，关于过程的描述错误的是（ ） A． 各窗体通用的过程一般在标准模块中用Private定义 B． 如果过程被定义为Static类型，则过程中定义的局部变量都是Static C． 如果过程被定义为Public类型，则该过程可以在程序的任何地方被调用 D． 一个Sub过程必须用End Sub语句结束 【答案】 A 26、 在Visual Basic中，删除列表框中的一个列表项，应使用的列表框方法是（ ） A．Move B．Remove C．RemoveItem D．Clear 【答案】 C 27、 在Visual Basic中，向一个顺序文件写入数据，但又要保留文件中的原有内容，应采用的文件打开方式是（ ） A．Append B．Output C．Random D．Input 【答案】 A 28、 在Visual Basic中，单击窗体，下列程序的运行结果为（ ） Private Sub Form_Click() Dim N As Integer, J As Integer N = 0 J = 1 Do Until N > 2 N = N + 1 J = J + N * (N + 1) Loop Print N; J End Sub A．0 1 B．3 7 C．3 13 D．3 21 【答案】 D 29、 在Visual Foxpro中，一个表的全部备注字段的内容存储在（ ）中。 A．同一备注文件 B．不同备注文件 C．同一文本文件 D．同一数据库文件 【答案】 A 30、 在Visual Foxpro中,字段的有效性规则不包括（ ） A． 规则 B．信息 C．默认值 D．输入掩码 【答案】 D 31、在Visual Foxpro中，不能使用loop语句的程序结构是（ ） A．FOR....ENDFOR B．DO CASE....ENDCASE C．SCAN....ENDSCAN D．DO WHILE....ENDDO 【答案】 B 32、 在SQL语句中，在进行分组查询时，为了去掉不满足条件的分组，应当（ ） A．使用WHERE子句 B．先使用WHERE子句，再使用HAVING子句 C．先使用HAVING子句，再使用WHERE子句 D．在GROUP BY后面使用HAVING子句 【答案】 D 33、 在Visual Foxpro中，视图设计器的选项卡有（ ） A．字段、联接、筛选、排序依据、分组依据、更新条件、杂项 B．字段、联接条件、筛选、排序依据、分组依据、更新、杂项 C．字段、联接、筛选条件、排序依据、分组依据、更新条件、杂项 D．字段、联接、筛选条件、排序依据、分组依据、更新、杂项 【答案】 A 34、在Visual Foxpro中，一个表单从加载到显示，依次触发的事件是（ ） A．Load、Activate、Init B．Init、Load、Activate C．Load、Init、Activate D．Activate、Load、Init 【答案】 C 35、下列关于Visual FoxPro中报表的叙述，正确的是（ 　 　） A．在报表设计器中默认的三个基本带区是“标题”、“细节”、“总结” B．报表的数据源是表或视图 C．设置报表的标题，需使用“标签”控件 D. 报表的“细节”带区的内容每页打印一次 【答案】 B 36、 关于HTTP协议的描述中，正确的是（ ） A． 定义了FTP客户机与服务器之间的传输协议 B．建立在传输层UDP协议的基础上 C.定义了请求报文和响应报文的格式 D. 要求客户机和服务器使用相同的操作系统 【答案】 C 37、 关于虚电路交换方式的描述中，正确的是（ ） A． 源结点与目的结点之间需要预先建立逻辑连接 B． 数据分组通过虚电路传输时需要执行路由选择 C． 在数据分组中需要携带源地址和目的地址 D． 源结点发送分组的顺序与目的结点接收分组的顺序可能不同 【答案】 A 38、 关于计算机网络的描述，错误的是（ ） A． 主要功能是控制其他计算机 B．网络结点之间通信应遵循相同协议 C．资源共享是其主要目的之一 D．网络结点可分布在不同地理位置 【答案】 A 39、 若要对数据进行字符转换和数字转换，以及数据压缩，应在OSI的（ ）上实现。 A．网络层 B．传输层 C．会话层 D．表示层 【答案】D 40、 在令牌总线控制方法中，如果某一节点要进行数据发送，则必须( ) A.可立即发送 B.等到总线空闲 C.等到空令牌 D.等发送时间到 【答案】C 41、 以太网采用的交换技术是（ ） A.分组交换技术 B.电路交换技术 C.报文交换技术 D.分组交换与电路交换结合技术 【答案】 A 42、 一个路由器的路由表项通常包含（ ） A. 目标网络和到达该网络的完整路径 B.所有目标主机和到达目标主机的完整路径 C.目标网络和到达该网络路径的下一个路由器的IP地址 D.互联网中所有路由器的IP地址 【答案】 C 43、 POP3邮件传递过程可以分为三个阶段，它们是（ ） A． 认证阶段、事务处理阶段、更新阶段 B．连接建立阶段、认证阶段、更新阶段 C. 连接建立阶段、认证阶段、连接关闭阶段 D.连接建立阶段、邮件传递阶段、连接关闭阶段 【答案】 A 44、 下列网络中的设备，哪个可以没有MAC地址（ ） A.网关 B.集线器 C.路由器 D.网卡 【答案】 B 45、若某大学分配给计算机系的IP地址块为202.113.16.128/26，分配给自动化系的的IP地址块为202.113.16.192/26，那么这两个地址块经过聚合后的地址为（ ） A．202.113.16.0/24 B．202.113.16.0/25 C．202.113.16.128/25 D．202.113.16.128/24 【答案】 C 46、分组交换比电路交换（ ） A．实时性好、线路利用率高 B．实时性好但线路利用率低 C．实时性差但线路利用率高 D．实时性和线路利用率都低 【答案】 C 47、 下列说法中正确的是（ ） A． 虚电路与线路交换没有实质不同 B．在通信的两个节点间只能建立一条虚电路 C．虚电路在传送数据前必须建立起专用的通信线路 D．虚电路中的各个节点不需要为每个分组作路由选择 【答案】 D 48、无冗余无校验的磁盘阵列是指（ ） A.RAID0 B. RAID1 C.RAID3 D.RAID5 【答案】A 49、 为了保证数据的真实性，可采用（ ） A.访问控制 B.加密机制 C.数字签名 D.路由控制 【答案】 C 50、关于搜索引擎的叙述，不正确的是（ ） A.搜索引擎是在Internet上专门提供信息搜索的一类网站 B.利用搜索引擎可以方便用户在Internet上检索信息，但对信息检索效率的提高并不大 C.利用搜索引擎搜索到的匹配条目一般以超链接的形式显示在搜索结果网页中 D.常见的搜索引擎有谷歌、百度和雅虎 【答案】 B 第II卷(非选择题 共140分) 2、 判断题（本大题共14小题，每题1分，共14分。将答案填涂在机读卡上，正确的填涂“√”格，错误的填涂“×”格） 51、平均修复时间MTTR是衡量计算机的指标之一，它说明了计算机的可维护性。 【答案】 A 52、 计算机工作时，内存储器中存储的是正在执行的程序与数据。（ ） 【答案】 A 53、 Windows 7中，删除回收站中的文件，可以释放磁盘空间。（ ） 【答案】 A 54、 Windows 7中，卸载应用程序的正确方法是进入资源管理器。（ ） 【答案】 B 55、在Word 2010编辑状态下，可以对文字进行动态效果设置。（ ） 【答案】 A 56、Word 2010不允许同时打开多个文档。（ ） 【答案】 B 57、 Excel 2010中，单元格中的数据显示为一串“#”，说明单元格数据长度小于该列的宽度。（ ） 【答案】 B 58、 Excel 2010中,使用组合键Shift+Enter能够实现单元格内换行。（ ） 【答案】 B 59、 PowerPoint中的占位符主要用指示内容放置位置。（ ） 【答案】 A 60、 在Visual Basic中，程序运行时，控件的位置可以通过程序代码改变Left和Top属性来定位，也可以直接用鼠标拖动控件来定位。（ ） 【答案】 B 61、在Visual FoxPro中，视图在物理上能以文件形式独立保存。（ ） 【答案】 B 62、在网络电缆中，使用屏蔽的好处是减少电磁干扰辐射。( ) 【答案】 A 63、 IPV6采用ARP协议来完成地址解析。（ ） 【答案】 A 64、 ISDN提供从终端用户到终端用户的全数字化服务，实现了语音、数据、图形、视频等综合业务的一个全数字化传输方式。（ ） 【答案】 A 三、填空题（本大题共13小题，每题2分，共26分，请将答案填写在答题纸上） 65、微机的“内存条”是指________存储器。 【答案】RAM 66、系统总线包括AB、CB和_______。 【答案】DB 67、 汇编程序、解释程序和编译程序属于系统软件中的__________程序。 【答案】语言处理 68、 Windows 7中,当启动程序或打开文档时，不知道某个文件位于何处，则可以使用系统提供的_______功能。 【答案】搜索 69、 Word 2010中，插入图片后，若希望其成为水印，则应该将图片置于文字_____层。 【答案】下 70、 在Excel 2010中，对单元格的引用有绝对引用、相对引用和________。 【答案】混合引用 71、PowerPoint演示文稿的默认文件扩展名是_______。 【答案】.pptx 72、在Visual Basic中，调用Sub过程时，使用______语句，该语句用于把程序控制传送到一个Sub过程。 【答案】call 73、在Visual Basic中，在程序运行时，要清除图片框Picture1中的图像，应使用的语句是________________。 【答案】 Picture1.Picture=LoadPicture() 74、在Visual FoxPro中，已知a="1"，则?type("&a")的结果为________。 【答案】 N 75、 在数字通信中，使收发双方在时间基准上保持一致的技术是___________。 【答案】 同步技术 76、 交换式以太网的核心设备是___________。 【答案】 交换机 77、 在结构化布线系统中的六个子系统中，____________是整个布线系统的主干线路。 【答案】 垂直竖井系统 四、依据环境与题意，写出相应的Visual FoxPro语句或SQL语句，要求每题用一条语句完成（本大题共5小题，每题4分，共20分，请填写在答题纸上） 设有现有数据库“DDGL.DBC”，其中包含表“DD.dbf”，该表有以下字段：客户号(C,6)、订单号(C,6)、订购日期(D)、数量(I)、单价(N,10,2)，总金额(N,10,1)。在相应数据库和表已打开的前提下，写出完成下述功能的命令 78、恢复“DD”表中被逻辑删除的记录中“单价”大于等于 450 的记录。（用 Visual FoxPro命令） 【答案】recall all for 单价>=450 79、使用“DD”表，建立以“订单号”和“单价”为关键字，名称为“SY”的降序的唯一索引，复合索引文件名为 DD.CDX。（用 Visual FoxPro 命令） 【答案】index on 订单号+str(单价,10,2) tag sy of dd desc uniq 80、建立“ZG”表，字段为：职工号(C,6)，姓名(C,8)，性别(C,2)，设置“职工号”字段为候选索引，并对“性别”字段建立有效性规则为：“性别”字段只能填“男”或“女”，如果填入其他数据则提示信息“性别错误！”。（用 SQL 语句） 【答案】create table zg ( 职工号 C(6) uniq ，姓名 C(8)，性别 C(2) check 性别="男"or 性别="女"error "性别错误！") 81、计算“DD”表中“总金额”字段的值，总金额=数量*单价。（用 SQL 语句） 【答案】 update dd set 总金额=数量*单价 82、查询“DD”表中“客户号”为 202430、“总金额”大于等于 10000 的记录，结果保存到数组“CC”中。（用 SQL 语句） 【答案】sele * from dd where 客户号="202430" and 总金额>=10000 into array cc 五、程序分析（本大题共2小题，每题5分，共10分，读程序并分析结果，请填写在答题纸上） 83、分析Visual Basic程序，该程序实现的功能是___________ Private Sub Command1_Click() Dim ch As String ch = "" For i = 0 To List1.ListCount - 1 If Left(List1.List(k), Len("数据")) = "数据" Then List1.RemoveItem k End If Next i For j = List1.ListCount - 1 To 0 Step -1 ch = ch & " " & List1.List(j) Next j Text1 = ch End Sub 【答案】将列表框中以“数据”开头的字符串删除，并将剩余项按从下往上的顺序，连接成一个新的字符串，并显示在文本框中。 84、在Visual FoxPro中,下列程序的功能是_________________________________ SELECT 1 USE CJB ZAP SELECT 2 USE XS INDEX ON 学号 TO XS.IDX SELECT 3 USE CJ SET RELATION TO 学号 INTO B INDEX ON 课程名+STR(240-成绩)TO KCCJ GO TOP SCAN FOR 课程名="计算机专业理论" SCATTER TO SZ FIELDS 学号，B->姓名，B->班级，课程名，成绩 SELECT 1 APPEND BLANK GATHER FROM SZ SELECT 3 ENDSCAN SELECT 1 【答案】将选修了所有课程名为“计算机专业理论”的学生按计算机专业理论的成绩由高到低下的顺序添加到CJB.DBF表中。 六、写出以下程序的运行结果（本大题共5小题，每题5分，共25分，请填写在答题纸上） 85、运行下列Visual Basic程序，单击命令按钮COMMAND1，在窗体上显示的结果为____________ Private Sub Command1_Click() Dim i As Integer Dim a(10) As Integer Dim p(3) As Integer k = 5 For i = 0 To 10 a(i) = i Next i For i = 0 To 2 p(i) = a(i * (i + 1)) Next i For i = 0 To 2 k = k + p(i) * 2 Next i Print k End Sub 【答案】 21 86、分析Visual Basic程序： Private Sub Command1_Click() a = Array(1, 2, 7, 10, 6) b = Array(5, 4, 7, 8, 2) i = 0 j = 0 Do If i <= UBound(a) And j <= UBound(b) Then If a(i) < b(j) Then Print a(i); i = i + 1 Else Print b(j); j = j + 1 End If Else If i <= UBound(a) Then Print a(i); i = i + 1 End If If j <= UBound(b) Then Print b(j); j = j + 1 End If End If Loop Until i > UBound(a) And j > UBound(b) End Sub 运行该程序，程序的运行结果为________ 【答案】 1 2 5 4 7 7 8 2 10 6 87、有如下Visual FoxPro程序： CLEAR PUBLIC A,B A=1 B=A+1 C=B+2 DO SUB1 ?A,B,C DO SUB2 WITH A,B,C ?A,B,C RETURN PROC SUB1 A=A+2 ENDPROC PROC SUB2 PARA X,Y,Z X=X+Y Y=X*Y Z=X+Y ?X,Y,Z DO SUB3 WITH X,Y ENDPROC PROC SUB3 PARA M,N M=M+1 ?M,N N=N+2 ENDPROC 运行程序后，程序运行的结果为_______________________ 【答案】 3 2 4 5 10 15 6 10 6 12 15 88、有如下Visual FoxPro程序： CLEAR SET COLLATE TO "Machine" ACCEPT"输入原始字符串："TO STARSTR ENDSTR="" M="" FOR I= 1 TO LEN(STARSTR) L=SUBSTR(STARSTR,I,1) IF L>="A" AND L<="Z" M=CHR(ASC("A")+ASC("Z")-ASC(L)) ELSE IF L>="a" AND L<="z" M=CHR(ASC("a")+ASC("z")-ASC(L)) ELSE IF L>="0" AND L<="9" M=CHR(ASC("0")+ASC("9")-ASC(L)) ELSE M=L ENDIF ENDIF ENDIF ENDSTR=ENDSTR+M ENDFOR ?"加密后的字符串为：",ENDSTR 运行上面的程序，输入字符串“23Ae*98”，则加密后的字符串ENDSTR的内容为：___________________ 【答案】 76Zv*01 89、 数据库文件XSXK.DBC包含3张表，表结构和表数据如下图所示。 学生.dbf 课程.dbf 选课.dbf 有如下Visual FoxPro程序： CLEAR SELECT 1 USE 学生 SELECT 2 USE 课程 INDEX ON 课程号 TO KCH1 SELECT 3 USE 选课 SET RELATION TO 课程号 INTO B INDEX ON 课程号 TO KCH2 DO WHILE .T. ACCEPT"请输入课程名:"TO KCM S=0 N=0 SELECT 2 LOCATE FOR ALLT(课程名)=ALLT(KCM) IF EOF() ?"没有该课程相关信息！" ELSE KCH=课程号 SELECT 3 SEEK KCH DO WHILE NOT EOF() AND 课程号=KCH N=N+1 S=S+成绩 SKIP SKIP IN A ENDDO ?N,ROUND(S/N,2) ENDIF WAIT"继续查询吗(Y/N)?"TO P IF !UPPER(P)="Y" EXIT ENDIF ENDDO CLOSE ALL 运行上面的程序，从键盘上先后输入“计算机基础” 和N，显示的结果为________ 【答案】 4 80.00 7、 Visual Basic程序改错（本大题共有两个小题，每题5分，共10分，每个程序有两个错误行，请在答题纸上写出错误行和对应的正确行，改对一处得一处分，改错不扣分） 90、程序完成的功能是找出1-1000之间各位的数字的阶乘相加之和等于该数的数，并在列表框List1中显示出来。 Private Sub Command1_Click() Dim p As Integer For k = 1 To 1000 a = LTrim(Str(k)) n = 0 For i = 1 To Len(a) p = Val(Mid(a, i, 1)) n = fact(p) Next i If n = k Then List1.AddItem k Next k End Sub Private Function fact(x) If x <= 1 Then fact = 1 Else fact = x * fact(x ) End If End Function 【答案】 （1）n = fact(p)改成n = n + fact(p) （2）fact = x * fact(x )改成 fact = x * fact(x-1 ) 91、程序实现的功能：输入一串字符，判别其是否是回文。所谓回文，是指正读反读都一样的字符串，如ABA、ABBA均是回文，ABCA不是回文。窗口如图所示。 Private Sub Command1_Click() Dim S As String, n As Integer, m As Integer S = Text1.Text n = 1 m=Len(s) Do While n<=m If Mid(S, n, 1)=Mid(S, m, 1) Then n=n+1 m=m+1 Else Exit End If Loop If n>=m Then Text2.Text="是回文" Else Text2.Text="不是回文" End If End Sub 【答案】 (1)m=m+1改成m-1 (2)Exit 改成Exit Do 八、程序填空（本大题共7个空，每空5分，共35分，按程序要求在答题纸上填入相应的内容，使程序完整正确） 92、（Visual Basic试题)下列程序的功能：将一个正整数分解为质因数乘积。例如，78=2×3×13。 Option Explicit Private Sub Command1_Click() Dim n As Integer, k As Integer n = InputBox("输入正整数n= ") k = 2 Print n; "= "; Do While n >= k If n Mod k = 0 Then If _________Then Print k Else Print k; "×"; End If _________ Else k = k + 1 End If Loop End Sub 【答案】 （1）n = k （2）n = n \ k 93、（Visual Basic试题)下列程序的功能：先输入一个字符串，再输入3个字符，然后统计这个3个字符分别在字符串中出现的次数并输出。补充下列程序。 Private Sub Command1_Click() Dim ch$(3), str$, prompt$, count%(3) str = InputBox("请输入一个字符串：") For i = 1 To 3 prompt = "请输入要查找的第" & i & "个字符" ch(i) = InputBox(prompt) Next i For i = 1 To Len(str) For j = 1 To 3 If ch(j) = _________ Then _______________ End If Next j Next i Print str For i = 1 To 3 Print ch(i); "出现的次数为："; count(i) Next i End Sub 【答案】 （1）Mid(str, i, 1) （2）count(j)=count(j) + 1 94、（Visual Foxpro试题）表单设计如下图所示，表单数据环境中加入”成绩.DBF”，表单中包含一个标签LABEL1，Caption属性分别为“学生成绩表”、一个表格控件，一个选项按钮组，一个命令按钮组和三个文本框。控件布局如下图所示： 程序实现的功能如下：程序运行后，可以在选项按钮组中选择课目，如”数学”，分别单击”总成绩”、”平均成绩”、”优秀率”，可以在文本框1中显示所有学生该科目的总成绩，文本框2中显示所有学生该科目的平均成绩，文本框3中显示该科目的优秀率（优秀率：成绩>=85分以上学生人数与总人数的比值）。程序运行如下图： Command1的Click编写事件如下代码： DO CASE CASE THISFORM.OPTIONGROUP1.VALUE=1 KC="语文" CASE THISFORM.OPTIONGROUP1.VALUE=2 KC="数学" CASE THISFORM.OPTIONGROUP1.VALUE=3 KC="英语" CASE THISFORM.OPTIONGROUP1.VALUE=4 KC="vf程序设计" ENDCASE _______________________ DO CASE CASE AA=1 SELECT 成绩 GO TOP SUM=0 DO WHILE NOT EOF() ____________ SKIP ENDDO THISFORM.TEXT1.VALUE=SUM CASE AA=2 SELECT AVG(&KC) FROM 成绩 INTO ARRAY TEMP __________________ CASE AA=3 SELECT 成绩 GO TOP S=0 N=0 DO WHILE NOT EOF() IF &KC>=85 N=N+1 ENDIF S=S+1 SKIP ENDDO THISFORM.TEXT3.VALUE=STR(N,3)+"/"+STR(S,3) ENDCASE 【答案】 (1)AA=THISFORM.COMMANDGROUP1.VALUE (2)SUM=SUM+&KC (3)THISFORM.TEXT2.VALUE=TEMP(1) 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $$