2017年河北省对口升学计算机专业理论试题

1、精选优质文档-倾情为你奉上2017 年河北省普通高等学校对口招生考试计算机专业理论试题（A）一、选择题（本大题共50小题，每小题2分，共100分。在每小题所给出的四个选项中，只有一个符合题目要求，将正确选项填涂在机读卡上）1下列关于计算机语言的描述不正确的是.（ ）A程序设计语言通常分为机器语言、汇编语言和高级语言三类BVisual Basic程序设计语言属于结构化程序设计语言C汇编语言编写的程序必须编译成机器语言才能执行D常见的解释型语言有C语言2影响计算机运行速度的主要性能指标是.（ ）A显示器的分辨率、打印机的性能B硬盘的容量和内存的容量C字长、内存容量和CPU的时钟频率D计算机所配备的

2、语言、操作系统、外部设备3下列描述不正确的是.（ ）A多媒体技术最主要的两个特点是集成性和交互性B所有计算机的字长都是固定不变的，都是8位CCPU主要包括运算器和控制器两大部件D各种高级语言的编译系统都属于系统软件4下列关于计算机数制的描述正确的是.（ ）A八进制数有8个数码，范围是从1到8B一般在数字后面加一个大写字母B表示十六进制数C计算机内部所有信息都是以二制数表示的D十进制整数转换为二进制的规则是“除2取余数，余数顺序排列”5下列4种不同数制表示的数中，数值最大的一个是.（ ）A八进制数367B十进制数258 C十六进制数F6 D二进制数6下列选项体现了冯· 诺依曼计算机体系

3、结构特点的是.（ ）A引入了CPU的概念 BASCII编码和指令系统C程序存储和程序控制 D机器语言和十六进制7下列关于病毒的描述，正确的是.（ ）A只要不上网，就不会感染病毒B不随意打开陌生、可疑邮件是预防病毒的一种手段C只要安装最好的杀毒软件，就不会感染病毒D所有的病毒都会导致计算机越来越慢，甚至可能使系统崩溃8为了解决计算机中CPU与内存储器之间速度不匹配问题，常使用的部件是.（ ）ACacheBEPROMCROM DFlash9在Windows XP中，为避免文件内容被任意更改，可将其属性设置为.（ ）A系统B压缩C存档 D只读10在Windows XP中，关于文件快捷方式的描述正确的

4、是.（ ）A删除文件快捷方式，即删除该快捷方式所指向的文件B对快捷方式重新命名后，双击该快捷方式图标，则不能打开其指向的文件C在桌面上创建文件的快捷方式，就是将相应的文件复制到桌面D创建文件快捷方式，就是建立指向相应文件的链接11在Windows XP中，下列关于回收站的描述正确的是.（ ）A放入回收站的内容，不占用硬盘的存储空间BU盘上被删除的文件或文件夹，可以利用回收站的“还原”命令将其恢复C执行回收站中的“清空回收站”命令，可以将回收站中的内容还原到原来位置D放置在回收站中的文件或文件夹，在回收站被清空之前，可以恢复12在Word 2003中，实现下图显示的排版效果，正确的操作方法是.（

5、 ）A将光标置于此段中，单击“格式”菜单中的“首字下沉”菜单项，选择“下沉” 格式。“下沉行数”设置为“2”，单击“确定”B将光标置于此段中，单击“工具”菜单中的“首字下沉”菜单项，选择“下沉” 格式。“下沉行数”设置为“2”，单击“确定” C选中相关文字，单击“格式”菜单中的“字体”菜单项，将“效果”中“上标” 前面的复选框选中，单击“确定” D将光标置于此段中，单击“插入”菜单中的“首字下沉”菜单项，选择“下沉”格式。“下沉行数”设置为“2”，单击“确定” 13在Word 2003中，若要计算如下表中第2行第6列“厂家A”的“季度平均值”，需在“表格”菜单中打开“公式”对话框，如下图所示，

6、应在“=”后面输入正确的公式是.（ ） AAVERAGE(B2:E2)BAVERAGE(LEFT) CAVERAGE(ABOVE) DAVERAGE(B2:D2) 14在Word 2003文档的页面设置中，不能进行的操作是.（ ）A设置页边距 B设置纸张大小 C设置纸张来源 D设置分栏15Excel 2003的数据表 “销售业绩提成表” 如下图所示。若“总销量”达到或高于“奖励标准”，则在“有无奖金”列填充“有”，否则填充“无”。 单元格H6中是“奖励标准”的值。现要求在单元格F3中填入公式，判断是否有奖金，并向下自动填充F列其他单元格； H9中填入公式计算奖励比例（有奖金人数除以总人数）。下

7、列是F3和H9中分别填入的公式，其中完全正确的选项是.（ ）A=IF(E3>=H6,"有","无")； =COUNTIF(F3:F10,"有")/COUNT(E3:E10)B=IF(E3>=$H$6,"有","无")； =COUNTIF(F3:F10,"有")/COUNT(E3:E10)C=IF(E3>=H$6,"有","无")； =COUNTIF(F3:F10,F6)/COUNT(F3:F10) D=IF(E3>

8、;=$H6,"有","无")； =COUNTIF(F3:F10,F6)/COUNT(F3:F10)16在Excel 2003中，对数据进行分类汇总前，必须进行的操作是.（ ）A查询B筛选C检索D排序17在Excel 2003工作表中，用“高级筛选”方式筛选数据时，在条件区同一行输入的多个条件之间的关系是. .（ ）A“与”关系B“或”关系 C“非”关系 D“异或”关系18在Visual Basic中，要产生10到80之间（含10和80）的随机整数，下列表达式中正确的是.（ ）AInt(Rnd*80+10)BInt(Rnd*71+10) CInt(Rnd*

9、71+70) DInt(Rnd*10+80) 19在Visual Basic中, 使用PictureBox控件装载图形，下列方法中不能实现此功能的选项是.（ ）A在设计时使用对象的 Picture 属性 B在设计时使用剪贴板把图形从剪贴板粘贴到控件上C在运行时使用剪贴板把图形从剪贴板粘贴到控件上 D在运行时使用 LoadPicture 函数装入指定的图形文件,然后将函数返回值赋值给控件的 Picture 属性20在Visual Basic中，下列为双精度类型的变量是.（ ）Aa$Ba!Ca%Da#21在Visual Basic中，表达式String$(3,"abc")的值是

10、.（ ）A"abcabcabc "B"aaa"C"abc"D"cba"22在Visual Basic 的窗体上有一个定时器控件Timer1和一个命令按钮C1，假定定时器控件Timer1的Interval属性值为500，Enabled属性值为True；命令按钮C1的Left属性值为400，Width属性值为200。Timer1的Timer事件代码为：Private Sub Timer1_Timer() C1.Left = C1.Left - 100End Sub 则程序开始运行多少秒后，命令按钮恰好完全从窗体的左边移

11、出.（ ）A5 B4 C3 D223在Visual Basic中，下列控件没有Caption属性的是.（ ）A列表框 B复选按钮 C单选按钮 D框架24在Visual Basic的窗体中，有名称为List1的列表框，程序运行时，如果选中了列表项号为5的列表项（列表框中最上面的列表项号为0），下列描述不成立的是（ ）AList1.Selected(List1.ListIndex) 的值为逻辑值TrueBList1.Selected(5) 的值为逻辑值TrueCList1.List(5) 的值为逻辑值TrueDList1.Listindex 的值为525在Visual Basic中，下列程序运行后

12、，单击命令按钮，则输出结果为.（ ）Private Sub Command1_Click()Dim x As Integer, y As Integerx = 10y = 15Call proc(x, y)Print x, yEnd SubPublic Sub proc(a As Integer, ByVal b As Integer)a = a * bx = a + bb = b + 100End SubA10 165B150 15C165 15D150 11526在Visual Basic 中，为了使一个复选框被禁用（灰色显示），应把它的Value属性设置为.（ ）A0B1C2DFalse

13、27在Visual Basic中，有如下程序段。程序运行后，单击命令按钮，在输入对话框中依次输入25，33，55，66，输出结果是.（ ）Private Sub Command1_Click()Dim x As Integer, y As Integer，a As Integerx = 100For i = 1 To 4y = InputBox("请输入一个整数")If y Mod 5 = 0 Then a = a + y x = yElse a = a + xEnd IfNext iPrint aEnd SubA160B.100C120D9028在Visual Foxpr

14、o中，恢复系统菜单默认设置的命令是.（ ）ASET DEFAULT SYSTEM BSET MENU TO DEFAULTCSET SYSTEM TO DEFAULT DSET SYSMENU TO DEFAULT29在Visual Foxpro中，如果指定参照完整性的“删除规则”为“级联”，则当删除父表中的记录时.（ ）A系统自动备份子表相关记录到一个新表中B若子表中有相关记录，则禁止删除父表中记录C会自动删除子表中所有相关记录D不作参照完整性检查，删除父表记录与子表无关30在Visual Foxpro中，在DO WHILEENDDO循环结构中LOOP语句的作用是.（ ）A转移到DO WHI

15、LE语句行，开始下一次判断和循环B终止循环，将控制转移到本循环结构ENDDO后面的第一条语句继续执行C该语句在DO WHILE循环结构中不起任何作用 D退出循环，返回到程序开始处31在Visual Foxpro中，下列表达式返回结果为.T.的是.（ ）AAT("计算机", "电子计算机") BTYPE("CTOD('01/01/2017')")="D"C"计算机系统结构"$"计算机" DSUBSTR(STR(120),3,1)="0"32在

16、Visual Foxpro中，下列关于查询的描述正确的是.（ ）A不能将查询结果保存在报表文件中B查询文件的扩展名为.pqrC只能对数据库表建立查询D查询是从指定的表或视图中提取满足条件的记录，可将结果定向输出33在Visual Foxpro中，用报表向导创建报表时，可设置的报表布局方式有.（ ）A列数、方向、字段布局 B列数、行数、字段布局C行数、方向、字段布局 D列数、行数、方向34在Visual Foxpro中，关于过程调用的描述正确的是.（ ）A当实参的数量多于形参的数量时，多余的实参被忽略B过程中必须包含RETURN语句，否则不能返回调用程序C参数传递都是按引用传递D上面的都不正确3

17、5在Visual Foxpro中，下列程序段执行以后，显示的结果为.（ ）CLEARA=10B=20SET UDFPARMS TO REFERENCESWA(A),B)?A,BPROCEDURE SWA PARAMETERS X1,Y1 TEMP=X1 X1=Y1 Y1=TEMPENDPROCA 10 10B 10 20C 20 10D 20 2036下列选项不属于计算机网络性能指标的是.（ ）A速率B带宽C主频D时延37在同一种网络体系结构下，下列关于网络协议与网络服务的描述中，正确的是（ ）A网络协议与网络服务同时存在，可以相互替代B网络协议与网络服务没有联系，可以独立存在并独立运行C网络

18、协议是分层次的，而网络服务是不分层次的D网络协议水平存在于不同网络结点（即同层次同协议），网络服务垂直存在于同一网络结点相邻层次之间38在互联网中的两台计算机间传递文件时，组成该文件的数据被划分为若干个数据包进行传送。下列关于数据传送过程的描述中，不正确的是.（ ）A受网络协议控制，数据包可能需要重新发送B数据包的长度不一定都是相同的C不同的数据包经过的传送路径是相同的D数据包不一定按发送顺序到达目标计算机39下列关于物理层通信的描述不正确的是.（ ）A信号是数据的载体，可以通过物理层无差错传递B基带传输时，传送的是数字信号；宽带传输时，传送的是模拟信号C并行传输比串行传输效率高、信息吞吐量大

19、D全双工通信的效率比半双工通信、单工通信高40在下列通信介质中，对抗电磁干扰最为理想的是.（ ）A同轴电缆B光纤C卫星通信D屏蔽双绞线41NIC（网络适配器，即网卡）不具备下列哪个功能.（ ）A透明传输B拥塞控制C封装成帧D差错检测42为了通过共享信道、最大限度提高信道利用率，在网络通信中广泛使用多路复用技术。下列关于多路复用技术的描述不正确的是.（ ）A频分复用是指在同一物理连接中使用不同的频率来传输不同的信号B时分复用是指在同一物理连接的不同时段来传输不同的信号C码分复用是指使用同一码制携带多路信号D波分复用是指将波长不同的光信号合成一束，沿着单根光纤进行传输43下列关于以太网标准10BA

20、SE-T的描述不正确的是.（ ）A“10”表示信号在电缆上的传输速率为10MB/sB“T”表示连网介质为双绞线C“BASE”表示通过连网介质传送的信号是基带信号D使用10BASE-T标准的网络，其物理拓朴结构为星形44下列关于网络设备的描述正确的是.（ ）A网卡工作在数据链路层，可以进行路由选择B集线器与交换机都是工作在数据链路层的，但交换机性能优于集线器C中继器可以有效扩展网络范围，其工作在物理层D路由器在传输层将不同网络进行了互连45下列关于网络协议及拓朴的描述正确的是.（ ）A使用不同协议的网络，不能进行互连B不同拓朴结构的网络，可以进行互连C拓朴结构与网络协议有关，即一种网络结构只能使

21、用一种特定的网络协议D环形网中使用的硬件设备，可以直接应用到星形网络中46下列对CSMA/CD的描述正确的是.（ ）ACSMA/CD通过令牌帧的传递控制结点数据的收、发过程BCSMA/CD工作方式允许多个结点同时发送数据而不会产生信道冲突CCSMA/CD指载波监听多点接入/碰撞检测，是一种公共介质竞争使用的控制方法DCSMA/CD是环形网络广泛使用的工作方式47计算机网络中主机的硬件地址是指.（ ）A域名地址B端口地址CIP地址DMAC地址48下列关于子网掩码的描述不正确的是.（ ）A子网掩码由四个十进制数组成，这四个十进制数只能是0或255B子网掩码与IP地址按位与运算，可以得到该计算机所在

22、的网络地址C子网掩码可以用来屏蔽IP地址的一部分，以区别网络标识和主机标识D子网掩码可以用于将一个大的IP网络划分为若干小的子网络49有下列6个IP地址，下列关于IP地址分类的描述不正确的是.（ ）（1） （2）7 （3）53 （4）48 （5） （6）A(2)和(5)是A类B(6)和(2)是D类C(1)和(3)是B类D(4)和(6)是C类50下列关于ARP协议的描述正确的是.（ ）AARP协议向网络层提供地址转换服务，所以ARP工作在数据链路层BARP协议工作时只通过

23、检索方式，即可获得目标MAC地址CARP协议完成从IP地址到MAC地址的转换DARP协议通过向服务器问询，获得目标MAC地址二、判断题（本大题14小题，每小题1分，共14分。将答案填涂在机读卡上，正确的填涂“”格，错误的填涂“×”格）1目前在生活和工作中普遍使用的计算机，主要电子元器件采用的是大规模和超大规模集成电路。（ ） 2CPU可以直接访问硬盘存储器。（ ）3操作系统的主要功能是对计算机所有资源进行统一控制和管理，为用户使用计算机提供方便。（ ）4在Windows XP中，将文件以鼠标左键拖拽方式释放至另一文件夹，完成的功能是复制而非移动。（ ）5在Word 2003中，表格外

24、框线的线型可以设置不同，但表中内框线的线型设置必须一致。（ ）6在Word 2003中，通过“插入”菜单中的“页眉和页脚”菜单项，可以为文档设置页眉和页脚。（ ）7在Excel 2003中，可以通过使用“条件格式”功能，将满足条件的数据进行突出显示。（ ）8在Excel 2003中，如果要一次性在多个单元格中填入相同内容 ，采取的步骤是：选中多个单元格；输入内容；按Ctrl+Enter键。（ ） 9在Visual Basic中，单击滚动条上的箭头，可触发滚动条的Scroll事件。（ ）10在Visual FoxPro中，当表单运行时，数据环境中的表处于只读状态，只能显示不能修改。（ ）11DH

25、CP协议的主要功能是建立IP地址与域名的对应关系。（ ）12网络防火墙工作在网络层，可以实现基于IP地址的数据包过滤。（ ）13能够共享到网络中的资源，只能是以文件、数据等形式提供的软件资源，而不能是计算机硬件资源。（ ）14FTP是一个应用层协议，可以用来传输各种格式的文件。（ ）三、填空题（本大题共13小题，每小题2分，共26分。请将答案填写在答题纸上）1已知字母a的ASCII码是(97)10，则字母f的ASCII码是( )10。2在计算机中，供用户自定义计算机外观和功能，添加或删除程序，设置网络连接和用户账户等的应用程序的集合是 。3在Windows XP中，要将整个桌面以图片的方式存入

26、剪贴板，应按_ 键。4“计算机辅助设计”的英文缩写是 。5在Word 2003中，去除图片的部分边缘,使用的是图片工具栏中的 命令。6在Excel 2003中，在某一单元格填充分数2/3，输入方法为 。7. 在Visual Basic中，顺序文件关闭语句是 。8. Visual Basic中，由a和b两个变量组成的代数式的算术表达式 是 。9. 在Visual FoxPro中，设M=200，N=300，X="M+N"，Y="01/01/2017"，则表达式IIF(TYPE("&Y") $ X,REPLICATE("A

27、AA",2),REPLICATE("BBB",2)的值为 。10. 在Visual FoxPro中，使用命令DECLARE MM(5,6)定义的数组，包含的数组元素的个数为 。11与IPv4不同，IPv6协议使用 个字节来表示一个IP地址。12计算机网络的OSI参考模型，其中文名称为 。 交换机 PC1 PC2 PC3 PC4 PC5路由器LAN口：00WAN口：2 Internet13如下图所示，5台计算机（PC1PC5，IP地址为：）均连接到交换机组成一个局域网络，交换机与一

28、台路由器连接，路由器已经连接到Internet，路由器参数如图所示。若5台计算机能够访问Internet，则其网关参数应设置为 四、根据已知的环境与题意，写出相应的Visual FoxPro操作命令或SQL语句，要求每小题用一条命令或语句完成（本大题共5小题，每小题4分，共20分，请将答案填写在答题纸上）现有数据库“JXC.DBC”，其中包含表“PROINFO.DBF”，该表有以下字段：商品编号(C,6)、商品名称(C,40)、商品类别(C,4)、商品单位(C,6)、商品单价(N,8,1)，库存下限(N,8,0)，产地（C,40），并建立了以“商品编号”为关键字的主索引。相应的数据库和表已打开

29、，写出实现下述功能的命令(注意：每个命令只能写一条语句，多于一条不得分)。1删除所有“库存下限”小于100,“商品单位”不是“箱”的记录。（要求使用Visual FoxPro命令）2假设表“GOODS.DBF”与表“PROINFO.DBF”结构相同，将“GOODS.DBF”中的数据添加到“PROINFO.DBF”表中。（要求使用Visual FoxPro命令）3.创建“SALLINFO.DBF”表（商品编号（C，6），售价（N，8,1）,并与“PROINFO.DBF”建立关联，关联字段为“商品编号”。（要求使用SQL语句）4将“PROINFO.DBF”表所有“商品单位”为“听”，商品类别为“0

30、001”的商品“库存下限”调整为200。（要求使用SQL语句）5按不同“商品类别”计算“PROINFO.DBF”表中“商品单价”的平均值。（要求使用SQL语句）五、程序分析（本大题共2小题，每小题5分，共10分，读程序并分析结果，请填写在答题纸上）1分析下面的Visual Basic程序，循环体中的语句s = s + 1循环了_次。Option Base 1Private Sub Command1_Click()Dim i As IntegerDim s As IntegerDim k As Integeri = 0: s = 0a = Array(80, 20, 100, 40, 70, 6

31、0, 50, 10, 90, 30)For k = 1 To 10 For i = a(k) To 1 Step -1 If i >= 45 Then goto Lab1 s = s + 1 Next iLab1:Next kPrint s End Sub2分析下面的Visual FoxPro程序，要使输出结果为VhayagawVgavIx,则输入的字符串应为 。CLEARACCEPT "请输入字符串：" TO CHARINN=LEN(CHARIN)DIME YCHAR(N)FOR I=1 TO N IF I % 2=0 YCHAR(I)=SUBSTR(CHARIN,

32、I,1) ELSE YCHAR(I)=UPPER(SUBSTR(CHARIN,I,1) ENDIFENDFORFOR I=1 TO N/2 TEMP=YCHAR(I) YCHAR(I)=YCHAR(N-I+1) YCHAR(N-I+1)=TEMPENDFORDCHAR=""FOR I=1 TO N IF ASC(YCHAR(I)>=ASC("A") AND ASC(YCHAR(I)<=ASC("Z") DCHAR=DCHAR+LOWER(CHR(ASC("A")+ASC("Z")-A

33、SC(YCHAR(I) ELSE IF ASC(YCHAR(I)>ASC("a") AND ASC(YCHAR(I)<=ASC("z") DCHAR=DCHAR+UPPER(CHR(ASC("a")+ASC("z")-ASC(YCHAR(I) ELSE DCHAR=DCHAR+YCHAR(I) ENDIF ENDIFENDFOR?DCHAR六、写出下列程序的运行结果（本大题共5小题，每小题5分，共25分，请将答案填写在答题纸上）1分析下面Visual Basic程序。窗体中有一命令按钮（名称为Comma

34、nd1）。Option Base 1Private Sub Command1_Click()Dim i As IntegerDim k As IntegerDim m As Integera = Array(6, 4, 8, 2, 1, 3, 9, 12, 43, 67, 8)For i = 1 To 10 For k = i + 1 To 11 If a(i) > a(k) Then a(i) = a(i) + a(k): a(k) = a(i) - a(k): a(i) = a(i) - a(k) End If Next k If a(i) >= 10 Then a(i) =

35、Int(a(i) / 10)Next iIf a(i) >= 10 Then a(i) = Int(a(i) / 10)m = 0For i = 1 To 11 m = m + a(i)Next iPrint mEnd Sub 窗体启动后，单击命令按钮，窗体显示的结果为_。2分析下面Visual Basic程序。如图所示，界面中有两个文本框和一个命令按钮，上面有字符的控件是文本框1（名称Text1），中间的控件是文本框2（名称Text2），最下面的控件是命令按钮（名称Command1）。Private Sub Command1_Click()Dim num As StringDim nu

36、m1 As StringDim num2 As StringDim c As StringDim i As IntegerDim length As IntegerDim length1 As IntegerDim length2 As Integerlength1 = 0: length2 = 0num = Text1.Textlength = Len(num)For i = 1 To length c = Mid(num, i, 1) If c <> "8" Then num1 = num1 + c length1 = length1 + 1 Else If

37、 length1 > length2 Then length2 = length1: num2 = num1 length1 = 0: num1 = "" Else length1 = 0: num1 = "" End If End IfNext iIf length1 > length2 Then num2 = num1End IfText2.Text = num2End Sub窗体运行后，在文本框1中输入图中所示的字母和数字，单击命令按钮，则在文本框2显示的内容是_。3有如下Visual FoxPro程序：CLEARPUBLIC C,DA

38、=B=10C=20D=30N=0DO SUB1 WITH A,B?A,B,C,DPROCEDURE SUB1 PARAMETERS X,Y PRIVATE C Y=0 FLAG=.T. DO WHILE FLAG Y=X%10+Y*10 X=INT(X/10) N=N+1 I=0 E=Y%10 DO WHILE I<=NE=E*10I=I+1 ENDDO D=E+D IF X<100FLAG=.F. ENDIF ENDDO C=STR(X)+STR(Y) RETURNENDPROC运行上面的程序，显示的结果为： 。4现有表“CJB.DBF”，结构为：BJ_NAME(C,30)、XM

39、(C，8)、YW(N,4,1),表中数据如下图所示：有如下Visual FoxPro程序： ACCEPT "请输入班级名：" TO BJMUSE CJB.DBFINDEX ON YW TAG YWSXDIME TEMP(10)K=0SAV=0N=0DO WHILE NOT EOF()IF TRIM(BJ_NAME)=TRIM(BJM) TEMP(K+1)=YW K=K+1ENDIFN=N+1SAV=SAV+YWSKIPENDDOFOR M=1 TO 1ZH1=TEMP(M)ENDFORFOR M=2 TO 2ZH2=TEMP(M)ENDFORFOR M=3 TO 3 IF

40、K<3 ZH3=ZH2 ELSE ZH3=TEMP(K) ENDIFENDFORP=ZH1*0.5+ZH2*0.35+ZH3*0.15-SAV/N?P运行上面的程序，输入“高三（1）班”，显示的结果是： 。5. 数据库文件ZKSCORE.DBC包含1个表“CJB.DBF”，表结构为：准考证号(C,9)、姓名(C,8)、学校名称(C,20)、班级名称(C,20)、总分（N,5,1）。表数据如下图所示：有如下Visual FoxPro程序： ACCEPT "请输入准考证号：" TO ZKZOPEN DATABASE ZKSCOREALTER TABLE CJB ADD X

41、2 N(2,0)SELECT 准考证号,姓名,学校名称,班级名称,总分,X2 FROM CJB ORDER BY;学校名称,班级名称,总分 DESC INTO TABLE CJTMPGO TOPX=1Y=XNX1=CJTMP.总分BJ=CJTMP.班级名称XX=学校名称DO WHILE NOT EOF() IF BJ=CJTMP.班级名称 AND XX=CJTMP.学校名称 REPLACE X2 WITH IIF(NX1=CJTMP.总分,Y,X) Y=CJTMP.X2 X=X+1 BJ=CJTMP.班级名称 XX=学校名称 NX1=CJTMP.总分 ELSE X=1 Y=X NX1=CJTM

42、P.总分 REPLACE X2 WITH X X=X+1 BJ=CJTMP.班级名称 XX=CJTMP.学校名称 ENDIF SKIPENDDOSELECT 准考证号,姓名,X2 WHERE 准考证号=ZKZ FROM CJTMP INTO TABLE TMPJG?准考证号,姓名,X2运行上面的程序，输入“”，显示的结果是： 。七、Visual Basic程序改错(本大题共2小题，每题5分，共10分，每个小题的程序有两个错误行，请在答题纸上写出错误行代码和对应的改正后代码，错误行代码和改正后代码完全正确方可得分) 1下面的程序是利用InputBox函数依次输入两个长度小于20的、均由数字字符组

43、成的字符串，依次存入到两个字符串变量中，然后从两个字符串的起始位置开始依次取出一个字符进行操作，操作的规则是：（1）把取出的字符转换成数字分别存入到数组a和数组b中，将两个数组中下标相同的元素值相加，如果它们的和大于9，则存入数组c中，否则不存入。然后再分别取下一个字符，进行同样的操作。（2）如果某个字符串中的字符已经取完，则把另一个未取完的字符串中的字符单个取出，转换成数字后加上10直接存入到数组c中。例如输入的字符串是：“”和“”,则最后数组c中存入的应该是:10,10,11,12,13,14,15,16,16。Option Base 1Private Sub Command1_Click

44、()Dim a(20) As IntegerDim b(20) As IntegerDim c(20) As IntegerDim i As IntegerDim j As IntegerDim len1 As IntegerDim len2 As IntegerDim str1 As StringDim str2 As Stringstr1 = InputBox("请输入第一个数字字符串：")str2 = InputBox("请输入第二个数字字符串：")len1 = Len(str1)len2 = Len(str2)i = 1: j = 1Do Whi

45、le i <= len1 And i <= len2 a(i) = Val(Mid(str1, i, 1) b(i) = Val(Mid(str2, i, 1) If a(i) + b(i) > 9 Then c(j) = a(i) + b(i): j = j + 1 i = i + 1LoopIf len1 > len2 Then str1 = Mid(str1, i)Else Str2 = Mid(str2, i)End Iflen1 = Len(str1)i = 1Do While i <= len1 c(j) = Val(Mid(str1, i, 1) +

46、 10 i = i + 1: j = j + 1LoopFor i = 1 To j Print c(i);Next iEnd Sub2下面程序的功能是：定义一个4行4列的数组并赋值， 要求第1行至第4行产生的数分别在10至19、20至29、30至39、40至49之间，再用Inputbox函数输入一个1到4之间的数字，然后求该数字所对应行与列元素的和。如产生的数组是： 10 17 18 1921 24 25 2335 32 30 3841 44 47 42若输入一个数字2，则求第2行与第2列元素的和，结果为210。Option Base 1Private Sub Command1_Click(

47、)Dim a(4, 4) As IntegerDim num As IntegerDim s As IntegerDim i As Integer, j As IntegerFor i = 1 To 4 For j = 1 To 4 a(i, j) = 10 + Int(Rnd * 10) Print a(i, j); Next j PrintNext inum = InputBox("请输入一个1至4的数字：")s = a(num, num)For i = 1 To 4 For j = 1 To 4 If i = num Or j = num Then s = s + a

48、(num, num) End If Next jNext iPrint sEnd Sub八、程序填空（本大题共7个空，每空5分，共35分，按程序要求在答题纸上填入相应的内容，使程序完整正确）1(Visual Basic试题)下面程序的功能是输入一个大于等于10小于500的数字，然后把10到该数字之间的所有素数找出并存入到数组a中，并输出此数组。请在划线位置填写正确的内容。Option Base 1Private Sub Command1_Click()Dim num As IntegerDim a(100) As IntegerDim n As IntegerDim k As IntegerD

49、im i As IntegerDim j As Integern = 1num = InputBox("请输入一个数字：")For i = 10 To num k = Sqr(i) For j = 2 To k If i Mod j = 0 Then _ Next j If j > k Then _: n = n + 1 End IfNext iIf n = 1 Then Print "一个也没有"Else For i = 1 To n - 1 Print a(i); Next iEnd IfEnd Sub2(Visual Basic试题)窗体上有五个标签(用来提示