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

河北省一般高等学校对口招生考试 计算机专业 综合模拟卷（八） 考前须知： 1. 本试卷共八道 2. 大题。总分 240分。 2.第I卷“一、选择题”、第Ⅱ卷“二、推断题”的答案填涂在机读卡上，其余各题答案写在答题纸上，答在试卷上不得分。用蓝黑钢笔、碳素笔或圆珠笔答题。 3，答愿前将密封线内工程填写清晰。 第I卷(选择题 共100分) 一、选择题（本大题共50小题，每题2分，共100分。在题所给出的四个选项中，只有一个符合题目要求，将正确选项填涂在机读卡上） 1、下列有关计算机的新技术说法，不正确的是（ ） A.网格计算利用互联网把分散在不同地理位置的电脑组织成一个“虚拟的超级计算机” B.嵌入式技术是将计算机作为一个信息处理部件，嵌入到应用系统中的一种技术，也就是说，它将软件固化集成到硬件系统中，将硬件系统与软件系统一体化 C.中间件是介于应用软件和操作系统之间的系统软件 D.网格计算技术能够提供资源共享，实现应用程序的互连互通，网格计算与计算机网络是一回事 2、 把内存中数据传送到计算机的硬盘上去的操作称为（ ） A.显示 B.写盘 C.输入 D.读盘 3、 以下关于编译程序的说法，正确的是（ ） A. 编译程序属于计算机应用软件，所有用户都需要编译程序 B. 编译程序不会生成目标程序，而是直接执行源程序 C. 编译程序完成高级语言到低级语言程序的等价翻译 D. 编译程序构造比较复杂，一般不进行出错处理 4、 操作系统的主要功能是（ ） A． 对用户的数据文件进行管理，为用户管理文件提供方便 B． 对计算机的所有资源进行统一控制和管理，为用户使用计算机提供方便 C． 对源程序进行编译和运行 D． 对汇编语言程序进行翻译 5、以下不属于机械硬盘主要性能指标的是（ ） A.转速 B．容量 C.缓存大小 D.闪存类型 6、 下列说法正确的是（ ） A． 只要将高级程序语言编写的源程序文件（如try.c）的扩展名更改为.exe，则它就成为可执行文件了 B． 高档计算机可以直接执行用高级程序语言编写的程序 C． 高级语言源程序只有经过编译和链接后才能成为可执行程序 D． 用高级程序语言编写的程序可移植性和可读性都很差 7、汉字国标码规定，每个汉字用（ ）字节表示。 A.1 B.2 C.3 D.4 8、下列4种不同数制表示的数中，数值最大的一个是( )。 A.八进制数367 B.十进制数258 C.十六进制数F6 D.二进制数10000001 9、 在Windows 7操作系统中，下列说法正确的是（ ） A. 在LAN中， Windows 7不支持多台打印机共享 B. 在Windows 7中打开的多个窗口中，既可以平铺，又可以层叠 C. 在Windows 7中的所有窗口都不可改变大小 D. 在Windows 7中只能用鼠标来操作 10、Windows 7中 ,系统默认安装时创建的用户账户是( ) A.Adninistrator B.Guess C.Anonynous D.root 11、如果在Windows 7的对话框中要进行各个选项卡之间的切换，可以使用的快捷键是（ ） A.Ctrl + Tab组合键 B.Ctrl + Shift组合键 C.Alt + Shift组合键 D.Ctrl +Alt组合键 12、在 Word 2010中 ,若要给文档添加项目符号,应使用（ ） A.开始选项卡中的段落组 B.插入选项卡中的插图组 C.审阅选项卡中的修订组 D.页面布局选项卡中的页面设置组 13、在 Word 2010中 ,不是选择性粘贴的形式的为( ) A.无格式的文本 B.带视频剪辑的图片格式 C.HTML格式 D.MicrOsoft Word文档对象 14、 在 Word 2010中,不可以进行（ ）的插入。 A.图片 B.剪贴画 C.视频 D.艺术字 15、 在Exce1 2010选定单元格操作中先选定B2，按住Shift键，然后单击D6，这时选定的单元格区域是（ ） A.B2:D6 B.B6:D6 C.B2:D2 D.A1:D6 16、关于Exce1 2010中的“批注”功能 ,下列描述错误的是（ ） A.批注是在单元格上附加的注解性文字 B.打开“审阅”选项卡，单击“删除”按钮,可以删除批注 C.添加批注后的单元格在左上角上显示一个红色的三角形 D.批注中的文本格式可以修改 17、Excel 2010工作表A1单元格的内容为公式=SUM(B2:D7)，用删除行的命令将第二行删除后，A1单元格的公式将调整为( )。 A.=SUM(ERR) B.=SUM(B3:D7) C.=SUM(B2:D6) D.#VALUE! 18、在 PowerPoint 2010中 ,要更改幻灯片母版中的图片 ,应选择的选项卡是( ) A.开始 B.设计 C.视图 D.审阅 19、在PowerPoint 2010中，若要求幻灯片在无人操作的情况下能够自动播放，则应该事先对演示文稿进行的操作是（ ） A.自动播放 B.打包 C.存盘 D.排练计时 20、 在Visual Basic中，使用Public Const语句声明一个全局的符号常量，该语句应该放在（ ） A. 过程中 B.窗体模块的通用声明段 C.标准模块的通用声明段 D.窗体模块或标准模块的通用声明段 21、 在Visual Basic中，对于语句Dim a,b as String *10，下列说法正确的是（ ） A. a和b都被定义为定长字符串变量 B. a被定义为变长字符串变量，b被定义为定长字符串变量 C. a被定义为定长字符串变量，b被定义为变长字符串变量 D. a被定义为变体变量 22、 在Visual Basic中，赋值语句：a=123+mid(“123456”,3,2)执行后，变量a的值为（ ） A．“1234” B．124 C．12334 D．157 23、 在Visual Basic中，设文本框的PasswordChar属性被设置为”%”,程序运行时，在文本框中输入“OK”,则产生的结果是（ ） A． 在文本框中显示2个“%”字符，但Text属性的值是“OK” B． 在文本框中显示2个“*”字符，但Text属性的值是“OK” C． 在文本框中显示2个“%”字符，但Text属性的值是“%%” D． 在文本框中显示“OK”，而Text属性的值是“%%” 24、 在Visual Basic中，关于计时器控件的叙述正确的是（ ） A． 一个窗体中只能使用一个定时器控件 B． Interval属性的值表示的是每次Timer事件所使用的秒数 C． 计时器在程序运行时是不显示的，但也有Left属性 D． 如果Enabled属性被设置为True，则计时器一定被启动，并定时产生Timer事件 25、 在Visual Basic中，设有数组声明语句： Option Base 0 Dim b(-1 To 10, 2 To 9,20)，则数组b中共有（ ）个元素。 A．1800 B．1920 C．2016 D．2310 26、 在Visual Basic中，Open语句中以Input方式打开一个顺序文件，以便从该文件读取数据，下列说法正确的是（ ） A．可以不必考虑文件是否存在 B．要打开的必须是一个要建立的文件 C．可以在打开时指定文件是否存在 D．要打开的必须是一个已存在的文件 27、 在Visual Basic中，关于控件数组的叙述，正确的是（ ） A． 控件数组中所有控件的名称相同，但其Index属性值各不相同 B． 控件数组中所有控件的名称相同，但其Value属性值各不相同 C． 控件数组中每个元素都是独立的控件，因此都有各自的事件过程 D． 以上说法都正确 28、 在Visual Basic中，有如下代码： Private Sub Command1_Click() Dim A As String, B As String A = "abcd" Call p(A, B) Print B End Sub Private Sub p(ByVal s1 As String, s2 As String) Dim m As String i = Len(s1) Do While i >= 1 m = m + Mid(s1, i, 1) i = i - 1 Loop s2 = m End Sub 程序运行时，单击命令按钮，输出结果为（ ） A．abcd B．dabc C．dcba D．abdc 29、在Visual Foxpro中，关于查询的叙述，下列说法正确的是（ ） A． 查询是使用查询设计器生成的各种复杂的SQL SELECT语句 B． 查询是使用查询设计器对数据库进行操作 C． 查询是使用查询设计器帮助用户编写SQL SELECT语句 D． 使用查询设计器生成查询程序，与SQL语句无关 30、 在Visual Foxpro中，已知“学籍”表中有一字段为“xm”，当执行了以下命令后，打开该表后，要访问该表当前记录的xm字段的值，下面的命令错误的是（ ） SELE 2 USE 学籍 ALIAS xj A．学籍->xm B．B->xm C．xj->xm D．xj.xm 31、 在Visual Foxpro中，执行命令DIME MM(4,5)之后，数组MM的元素个数是（ ） A．12 B．15 C．20 D．30 32、在Visual Foxpro中，下列命令执行的结果不受索引影响的是（ ） A．GO TOP B．GO BOTTOM C．GO 2 D．SKIP 33、在Visual Foxpro中，创建表结构时，包含了备注字段，且在“索引”选项卡建立了索引，则系统自动生成的三个文件的扩展名分别为（ ） A．.PJX .PJT .PRG B．.DBC .DCT .DCX C．.FPT .FRX .FXP D．.DBF .CDX .FPT 34、在Visual Foxpro中，要使“文件”菜单使用“F”作为访问键，可以用（ ）定义 该菜单标题。 A．文件（<\F） B．文件（\<F） C．文件（<F） D．文件（F） 35、在Visual Foxpro中，不可以作为文本框数据来源的是（ ） A．数值型字段 B．字符型字段 C．内存变量 D．备注型字段 36、 关于网络拓扑结构特点的描述，下列说法错误的是（ ） A．环型拓扑通过点对点线路构成环路 B．星型拓扑的可行性瓶颈在中心结点 C．树型拓扑按层次组织结点的连接关系 D．网状拓扑的主要优点是传输延时固定 37、 在以下几种标准中，定义CSMA/CD机制的是（ ） A．IEEE 802.1 B．IEEE 802.3 C．IEEE 802.15 D．IEEE 802.16 38、 关于TCP协议的描述，错误的是（ ） A． 可以提供面向连接的服务 B．连接建立采用3次握手法 C．利用重传机制进行流量控制 D．端口采用16位二进制数表示 39、 以太网帧中的目的地址字段保存的是（ ） A． 源结点的IP地址 B．目的结点的IP地址 C．源结点的MAC地址 D．目的结点的MAC地址 40、 在10BASE-5以太网中，用来扩展线缆长度的中继器，最多可以有（ ）个。 A.3 B.4 C.5 D.任意多个 41、 TCP/IP协议体系中，ARP协议的作用是（ ） A.解析IP地址和MAC地址的对应关系 B.解析MAC地址和IP地址的对应关系 C.解析IP地址和域名的对应关系 D.解析服务类型和端口的对应关系 42、 将一条传输信道按传输频带分为多个逻辑信道，每个子信道传输一路信号，这种多路复用方式是（ ） A．时分多路复用 B．频分多路复用 C．波分多路复用 D．码分多路复用 43、 某企业分配给产品部、市场部和财务部的IP地址块分别为10.16.31.192/26、10.16.31.160/27和10.16.31.128/27，这三个地址块聚合后的地址块为（ ） A.10.16.31.0/25 B.10.16.31.0/26 C.10.16.31.128/25 D.10.16.31.128/26 44、 DHCP协议的功能是（ ） A.域名解析 B.文件传输 C.邮件传输 D.自动配置IP地址 45、对于非对称密钥加密的说法，正确的是（ ） A.加密方和解密方使用的是不同的算法 B.加密密钥和解密密钥是不同的 C.加密密钥和解密密钥是相同的 D.加密密钥和解密密钥没有任何关系 46、 网络中的计算机可以分为服务器和客户机，服务器主要用来向全网络提供某种协议的网络服务，客户机则主要用来访问、使用服务器上的服务。下列关于客户机的描述，错误的是（ ） A.平板电脑可以作为客户机使用 B.高端台式机能用作客户机 C.智能手机不能用作客户机 D.笔记本电脑可以用作客户机 47、 常用数据备份方式包括完全备份、增量备份和差异备份，三种方式在数据恢复速度方法由快到慢的顺序为（ ） A． 完全备份、增量备份、差异备份 B、完全备份、差异备份、增量备份 C．增量备份、差异备份、完全备份 D．差异备份、增量备份、完全备份 48、 将内部专用IP地址转换为外部公用IP地址的技术的是（ ） A．RARP B．NAT C．DHCP D．ARP 49、 攻击者利用攻破的多个系统发送大量请求去集中攻击其他目标，受害设备因为无法处理而拒绝服务。这种攻击被称为（ ） A．Smurf攻击 B．DDoS攻击 C．SYN Flooding攻击 D．Land攻击 50、关于无线接入方式的描述，正确的是（ ） A.无线接入就是接入移动互联网 B. 无线接入就是用智能手机接入 C.无线接入就是接入WLAN D.无线接入分为WiFi接入和移动接入 第II卷(非选择题 共140分) 二、判断题（本大题共14小题，每题1分，共14分。将答案填涂在机读卡上，正确的填涂“A”，错误的填涂“B”） 51、计算机辅助设计的简称是CAD。（ ） 52、 计算机的外部设备就是指计算机的输入设备和输出设备。（ ） 53、 Windows 7中，要修改屏幕分辨率，则在桌面空白处右击鼠标，选择“个性化”命令。（ ） 54、 Windows 7的有点是更易用、更快速、更简单和更安全。（ ） 55、 在Word 2010编辑状态下，使选定的文本倾斜的快捷键是Ctrl+I。（ ） 56、 阅读版式视图是Word 2010的一种视图模式。（ ） 57、在Excel 2010中，若在A2单元格输入“我的中国梦”，则A2单元格的对齐方式是左对齐。（ ） 58、 在Excel 2010中，公式和函数不能作为参数。（ ） 59、 在PowerPoint 2010的普通视图中，隐藏了某个幻灯片后，在幻灯片放映时被隐藏的幻灯片将会在幻灯片放映时不放映，但仍然保存在文件中。（ ） 60、在Visual Basic中，类模块文件的扩展名为.cls。（ ） 61、在Visual Foxpro中，在SQL语句中，排序项和分组项可以是字段名，标题名，表达式或输出项的序号。（） 62、IP分组交换中，一次交付过程包括一个直接交付和零个（多个）间接交付，最后的交付是间接交付。( ) 63、 在TCP/IP的诊断和管理工具中，常用ping命令测试主机的连通性。（ ） 64、 由于防火墙可以进行内网与外网的访问控制，所以防火墙完全可以代替杀毒软件。（ ） 三、填空题（本大题共13小题，每题2分，共26分，请将答案填写在答题纸上） 65、按计算机所处理的信号进行分类，可以分为模拟式计算机和_______式计算机。 66、设GB 2312-80字符集中某汉字的机内码是BEDF（十六进制），它的区位码是______。 67、 如果一个存储单元能存放一个字节，那么一个32KB的存储器共有存储单元_______个。 68、 Windows 7自带的输入法是_______。 69、 Word 2010在进行拼写和语法检查时，红色波浪线表示拼写错误，绿色波浪线表示______。 70、 Excel 2010中，要在单元格内输入当前的日期，应按组合键________。 71、PowerPoint 2010演示文稿的基本组成单位_________。 71、 在Visual Basic中，要将一个窗体隐藏，应使用的方法是_______。 73、在Visual Basic中，表达式 Sgn(-2 ^ 2) * Abs(Int(-5.3)) + Int(Rnd())的值为_____。 74、在Visual Foxpro中，为了选用一个未被使用的编号最小的工作区，可使用的命令是______。 75、 在以太网的MAC帧结构中，目的地址占__________字节。 76、 IPV4组播地址以4位二进制开始，它们是________。 77、 ___________的作用是判断目标主机和源主机的IP地址是否属于同一子网。 四、依据环境与题意，写出相应的Visual FoxPro语句或SQL语句，要求每题用一条语句完成（本大题共5小题，每题4分，共20分，请填写在答题纸上） 设有数据库“ZG.DBC”,其中包含“部门”表和“职工”表。 “部门”表的结构：部门号（C，2），部门名称（C,10） “职工”表的结构：职工号（C，2），部门号（C，2），姓名（C，6），性别（C，2），出生日期D，基本工资（N，7，2），奖金（N，7，2）该数据库及相关表已打开，请完成如下操作的命令序列： 78、将职工表中年龄大于55（包括55）的职工的基本工次增加300元。（用 Visual FoxPro命令） 79、显示职工表中第3条~第9条记录中男职工记录。（用 Visual FoxPro命令） 80、在职工表中增加”入职时间”字段，字段类型为日期型 （用 SQL 语句） 81、查询各部门男职工和女职工的人数，并按出生日期降序排序。（用 SQL 语句） 82、查询”财务部门”的员工信息。（用 SQL 语句） 五、程序分析（本大题共2小题，每题5分，共10分，读程序并分析结果，请填写在答题纸上） 83、分析Visual Basic程序，该程序实现的功能是________ Private Function Fun(ch As Integer) As Integer Dim n%, st$, c$ For i = 1 To Len(ch) c = Mid(ch, i, 1) If c <> "A" Then st = st & c Else n = n + 1 End If Next i ch = st Fun = n End Function 84、下列Visual FoxPro程序的功能是_________ CLEAR INPUT"请输入一个正整数："TO N SUM=0 FOR I= 1 TO N SUM=SUM+1/JC(I) ENDFOR ?"结果为：",SUM RETURN FUNCTION JC PARA X Y=1 FOR M=1 TO X Y=Y*M ENDFOR RETURN Y 六、写出以下程序的运行结果（本大题共5小题，每题5分，共25分，请填写在答题纸上） 85、分析Visual Basic程序: Option Base 1 Dim arr() As Integer Private Sub Command1_Click() Dim i As Integer, j As Integer ReDim arr(3, 2) For i = 1 To 3 For j = 1 To 2 arr(i, j) = i + j Next j Next i ReDim arr(3, 4) For j = 3 To 4 arr(3, j) = j + 6 Next j Print arr(3, 2) + arr(3, 4) End Sub 运行该程序，程序的运行结果为_______ 86、分析Visual Basic程序 Private Sub Command1_Click() Dim m As Integer, n As Integer Dim s_base As String, s As String Dim i As Integer, j As Integer Dim r(20) As Integer s_base = "0123456789ABCDEF" m = InputBox("请输入第一个数据：") n = InputBox("请输入第二个数据：") i = 0 Do While m <> 0 r(i) = m Mod n m = m \ n i = i + 1 Loop s = "" For j = i - 1 To 0 Step -1 s = s + Mid(s_base, r(j) + 1, 1) Next j Print s End Sub 运行该程序，程序的运行结果为_______ 87、分析Visual FoxPro程序,运行下列程序，程序的运行结果为______________ 依次输入下列数据：3 4 1 4 5 6 7 8 9 CLEAR DIME A(3,3) FLAG=.T. FOR I=1 TO 3 FOR J=1 TO 3 INPUT "A("+STR(I,2)+","+STR(J,2)+")="TO A(I,J) ENDFOR ENDFOR FOR I=1 TO 3 MAX=A(I,1) COL=1 FOR J=2 TO 3 IF MAX<A(I,J) MAX=A(I,J) COL=J ENDIF ENDFOR MIN=A(1,COL) ROW=1 FOR K=2 TO 3 IF MIN >A(K,COL) MIN =A(K,COL) ROW=K ENDIF ENDFOR IF MAX=MIN ?A(ROW,COL),"是鞍点，在",ROW,"行",COL,"列" FLAG=.F. ENDIF ENDFOR IF FLAG=.T. ?"无鞍点" ENDIF 88、分析Visual FoxPro程序: CLEAR ACCEPT "请输入字符串:"TO A S="" M=LEN(A) FOR I=1 to M K=SUBSTR(A,I,1) if k>="0" AND K<="9" S=S+CHR(105-ASC(K)) ELSE S=S+K ENDIF ENDFOR ?"S=",S CANCEL 运行上面的程序，显示的结果为：S=5e7A317ls1478,则应从键盘输入的内容为：_________ 89、 分析Visual FoxPro程序: CLEAR A=1 B=2 C=3 DO JS2 ?B ?C DO JS1 WITH A, "B" ?B,A RETURN PROC JS1 PARA B,A B=B+C &A=&A+1 A=B+1 RETURN PROC JS2 PRIVATE C C=6 DO WHILE B<=6 C=C+B B=B+2 ENDDO DO JS3 RETURN PROC JS3 PRIVATE B C=C*3+2 B=C-1 A=9 RETURN 运行上面的程序，显示的结果为：___________ 7、 Visual Basic程序改错（本大题共有两个小题，每题5分，共10分，每个程序有两个错误行，请在答题纸上写出错误行和对应的正确行，改对一处得一处分，改错不扣分） 90、下列程序的功能：将一个正整数分解为质因数乘积。例如，78=2×3×13。 Option Explicit Private Sub Command1_Click() Dim n As Integer, k As Integer n = InputBox("输入正整数n= ") k = 1 Print n; "= "; Do While n >= k If n Mod k = 0 Then If n = k Then Print k Else Print k; "*"; End If n = n / k Else k = k + 1 End If Loop End Sub 91、从键盘上输入10个无序数，去掉一个最大数和最小数，然后求其平均值。程序运行如下所示。 Option Explicit Private Sub Form_Click() Dim ave As Single, max As Integer, i As Integer, j As Integer Dim min As Integer, Sum As Integer, S As String S = InputBox("求平均值", "输入10个数第1个数") i = Val(S) max = i: min = i: Sum = 0 For j = 2 To 10 S = InputBox("求平均值", "输入10个数第" & Str(j) & "个数") i = S Sum = Sum + i If i < min Then min = i Else If max < i Then max = i End If End If Next j Sum = Sum - max - min ave = Sum / 8 MsgBox "平均值= " + Str(ave), , "去掉最大数和最小数后" End Sub 八、程序填空（本大题共7个空，每空5分，共35分，按程序要求在答题纸上填入相应的内容，使程序完整正确） 92、(Visual Basic试题）程序实现的功能：输入一串字符，判别其是否是回文。所谓回文，是指正读反读都一样的字符串，如ABA、ABBA均是回文，ABCA不是回文。窗口如图所示，完善下列程序。 Private Sub Command1_Click() Dim S As String, n As Integer, m As Integer S = Text1.Text n = 1 Do While n<=m If Mid(S, n, 1)=Mid(S, m, 1) Then n=n+1 Else Exit Do End If Loop If n>=m Then Text2.Text="是回文" Else Text2.Text="不是回文" End If End Sub 93、(Visual Basic试题）程序实现的功能：找出100（含100）以内的所有“自然数对”。所谓“自然数对”即两个自然数的和与差都是平方数，如26和10，其和为36与差为16均为平方数，则26和10被称为自然数对。请完善程序。 Private Sub Command1_Click() Dim i As Integer, j As Integer Dim Sum As Single, c As Single For i=1 To 100 For j= Sum= i + j C= i – j If Then Print "自然数对为："; i , j End If Next j Next i End Sub 94、Visual FoxPro表单设计题： 1） 创建表单。表单内容如图所示：一个标签、一个组合框、一个文本框和一个选项按钮组。 2） 设置数据环境：添加XS表，XS表中的字段有：学号，姓名、专业，总分。 3） 程序实现的功能如下： ①按专业统计某一专业的总人数，总成绩和最高成绩。 ②在组合框Combo1中选择要查询的专业，在选项按钮组Optiongroup1中选择要统计的类型（总人数、总成绩），根据所选择的统计类型将统计的数据显示在文本框Text1中。 ③选项按钮组Optiongroup1中的“最高成绩”是指表XS按专业分组后，总成绩最高的值。 如：选择“计算机”专业，可以统计计算机专业的总人数，总成绩。 选择最高成绩，可得到按专业分组后总成绩最高的值。 具体实现代码如下： 选项按钮组Optiongroup1的INTERACTIVECHANGE事件如下： __________________(1)_____________________________________________ SELECT SUM(总分）AS 总成绩 FROM XS GROUP BY 专业 INTO TABLE AA __________________(2)_____________________ INTO ARRAY TEMP2 IF THIS.VALUE=1 THISFORM.TEXT1.VALUE=TEMP1(1) ELSE IF THIS.VALUE=2 THISFORM.TEXT1.VALUE=TEMP1(2) ELSE __________________(2)_____________________ ENDIF ENDIF THISFORM.REFRESH 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $$ 河北省一般高等学校对口招生考试 计算机专业 综合模拟卷（八）答案 考前须知： 1. 本试卷共八道 2. 大题。总分 240分。 2.第I卷“一、选择题”、第Ⅱ卷“二、推断题”的答案填涂在机读卡上，其余各题答案写在答题纸上，答在试卷上不得分。用蓝黑钢笔、碳素笔或圆珠笔答题。 3，答愿前将密封线内工程填写清晰。 第I卷(选择题 共100分) 一、选择题（本大题共50小题，每题2分，共100分。在题所给出的四个选项中，只有一个符合题目要求，将正确选项填涂在机读卡上） 1、下列有关计算机的新技术说法，不正确的是（ ） A.网格计算利用互联网把分散在不同地理位置的电脑组织成一个“虚拟的超级计算机” B.嵌入式技术是将计算机作为一个信息处理部件，嵌入到应用系统中的一种技术，也就是说，它将软件固化集成到硬件系统中，将硬件系统与软件系统一体化 C.中间件是介于应用软件和操作系统之间的系统软件 D.网格计算技术能够提供资源共享，实现应用程序的互连互通，网格计算与计算机网络是一回事 【答案】 D 2、 把内存中数据传送到计算机的硬盘上去的操作称为（ ） A.显示 B.写盘 C.输入 D.读盘 【答案】 B 3、 以下关于编译程序的说法，正确的是（ ） A. 编译程序属于计算机应用软件，所有用户都需要编译程序 B. 编译程序不会生成目标程序，而是直接执行源程序 C. 编译程序完成高级语言到低级语言程序的等价翻译 D. 编译程序构造比较复杂，一般不进行出错处理 【答案】 C 4、 操作系统的主要功能是（ ） A． 对用户的数据文件进行管理，为用户管理文件提供方便 B． 对计算机的所有资源进行统一控制和管理，为用户使用计算机提供方便 C． 对源程序进行编译和运行 D． 对汇编语言程序进行翻译 【答案】 B 5、以下不属于机械硬盘主要性能指标的是（ ） A.转速 B．容量 C.缓存大小 D.闪存类型 【答案】 D 6、 下列说法正确的是（ ） A． 只要将高级程序语言编写的源程序文件（如try.c）的扩展名更改为.exe，则它就成为可执行文件了 B． 高档计算机可以直接执行用高级程序语言编写的程序 C． 高级语言源程序只有经过编译和链接后才能成为可执行程序 D． 用高级程序语言编写的程序可移植性和可读性都很差 【答案】 C 7、汉字国标码规定，每个汉字用（ ）字节表示。 A.1 B.2 C.3 D.4 【答案】 B 8、下列4种不同数制表示的数中，数值最大的一个是( )。 A.八进制数367 B.十进制数258 C.十六进制数F6 D.二进制数10000001 【答案】B 9、 在Windows 7操作系统中，下列说法正确的是（ ） A. 在LAN中， Windows 7不支持多台打印机共享 B. 在Windows 7中打开的多个窗口中，既可以平铺，又可以层叠 C. 在Windows 7中的所有窗口都不可改变大小 D. 在Windows 7中只能用鼠标来操作 【答案】B 10、Windows 7中 ,系统默认安装时创建的用户账户是( ) A.Adninistrator B.Guess C.Anonynous D.root 【答案】A 11、如果在Windows 7的对话框中要进行各个选项卡之间的切换，可以使用的快捷键是（ ） A.Ctrl + Tab组合键 B.Ctrl + Shift组合键 C.Alt + Shift组合键 D.Ctrl +Alt组合键 【答案】A 12、在 Word 2010中 ,若要给文档添加项目符号,应使用（ ） A.开始选项卡中的段落组 B.插入选项卡中的插图组 C.审阅选项卡中的修订组 D.页面布局选项卡中的页面设置组 【答案】A 13、在 Word 2010中 ,不是选择性粘贴的形式的为( ) A.无格式的文本 B.带视频剪辑的图片格式 C.HTML格式 D.MicrOsoft Word文档对象 【答案】B 14、 在 Word 2010中,不可以进行（ ）的插入。 A.图片 B.剪贴画 C.视频 D.艺术字 【答案】C 15、 在Exce1 2010选定单元格操作中先选定B2，按住Shift键，然后单击D6，这时选定的单元格区域是（ ） A.B2:D6 B.B6:D6 C.B2:D2 D.A1:D6 【答案】A 16、关于Exce1 2010中的“批注”功能 ,下列描述错误的是（ ） A.批注是在单元格上附加的注解性文字 B.打开“审阅”选项卡，单击“删除”按钮,可以删除批注 C.添加批注后的单元格在左上角上显示一个红色的三角形 D.批注中的文本格式可以修改 【答案】C 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中 ,要更改幻灯片母版中的图片 ,应选择的选项卡是( ) A.开始 B.设计 C.视图 D.审阅 【答案】C 19、在PowerPoint 2010中，若要求幻灯片在无人操作的情况下能够自动播放，则应该事先对演示文稿进行的操作是（ ） A.自动播放 B.打包 C.存盘 D.排练计时 【答案】D 20、 在Visual Basic中，使用Public Const语句声明一个全局的符号常量，该语句应该放在（ ） A. 过程中 B.窗体模块的通用声明段 C.标准模块的通用声明段 D.窗体模块或标准模块的通用声明段 【答案】C 21、 在Visual Basic中，对于语句Dim a,b as String *10，下列说法正确的是（ ） A. a和b都被定义为定长字符串变量 B. a被定义为变长字符串变量，b被定义为定长字符串变量 C. a被定义为定长字符串变量，b被定义为变长字符串变量 D. a被定义为变体变量 【答案】 D 22、 在Visual Basic中，赋值语句：a=123+mid(“123456”,3,2)执行后，变量a的值为（ ） A．“1234” B．124 C．12334 D．157 【答案】 D 23、 在Visual Basic中，设文本框的PasswordChar属性被设置为”%”,程序运行时，在文本框中输入“OK”,则产生的结果是（ ） A． 在文本框中显示2个“%”字符，但Text属性的值是“OK” B． 在文本框中显示2个“*”字符，但Text属性的值是“OK” C． 在文本框中显示2个“%”字符，但Text属性的值是“%%” D． 在文本框中显示“OK”，而Text属性的值是“%%” 【答案】 A 24、 在Visual Basic中，关于计时器控件的叙述正确的是（ ） A． 一个窗体中只能使用一个定时器控件 B． Interval属性的值表示的是每次Timer事件所使用的秒数 C． 计时器在程序运行时是不显示的，但也有Left属性 D． 如果Enabled属性被设置为True，则计时器一定被启动，并定时产生Timer事件 【答案】 C 25、 在Visual Basic中，设有数组声明语句： Option Base 0 Dim b(-1 To 10, 2 To 9,20)，则数组b中共有（ ）个元素。 A．1800 B．1920 C．2016 D．2310 【答案】 C 26、 在Visual Basic中，Open语句中以Input方式打开一个顺序文件，以便从该文件读取数据，下列说法正确的是（ ） A．可以不必考虑文件是否存在 B．要打开的必须是一个要建立的文件 C．可以在打开时指定文件是否存在 D．要打开的必须是一个已存在的文件 【答案】 D 27、 在Visual Basic中，关于控件数组的叙述，正确的是（ ） A． 控件数组中所有控件的名称相同，但其Index属性值各不相同 B． 控件数组中所有控件的名称相同，但其Value属性值各不相同 C． 控件数组中每个元素都是独立的控件，因此都有各自的事件过程 D． 以上说法都正确 【答案】 A 28、 在Visual Basic中，有如下代码： Private Sub Command1_Click() Dim A As String, B As String A = "abcd" Call p(A, B) Print B End Sub Private Sub p(ByVal s1 As String, s2 As String) Dim m As String i = Len(s1) Do While i >= 1 m = m + Mid(s1, i, 1) i = i - 1 Loop s2 = m End Sub 程序运行时，单击命令按钮，输出结果为（ ） A．abcd B．dabc C．dcba D．abdc 【答案】 C 29、在Visual Foxpro中，关于查询的叙述，下列说法正确的是（ ） A． 查询是使用查询设计器生成的各种复杂的SQL SELECT语句 B． 查询是使用查询设计器对数据库进行操作 C． 查询是使用查询设计器帮助用户编写SQL SELECT语句 D． 使用查询设计器生成查询程序，与SQL语句无关 【答案】 C 30、 在Visual Foxpro中，已知“学籍”表中有一字段为“xm”，当执行了以下命令后，打开该表后，要访问该表当前记录的xm字段的值，下面的命令错误的是（ ） SELE 2 USE 学籍 ALIAS xj A．学籍->xm B．B->xm C．xj->xm D．xj.xm 【答案】 A 31、 在Visual Foxpro中，执行命令DIME MM(4,5)之后，数组MM的元素个数是（ ） A．12 B．15 C．20 D．30 【答案】 C 32、在Visual Foxpro中，下列命令执行的结果不受索引影响的是（ ） A．GO TOP B．GO BOTTOM C．GO 2 D．SKIP 【答案】 C 33、在Visual Foxpro中，创建表结构时，包含了备注字段，且在“索引”选项卡建立了索引，则系统自动生成的三个文件的扩展名分别为（ ） A．.PJX .PJT .PRG B．.DBC .DCT .DCX C．.FPT .FRX .FXP D．.DBF .CDX .FPT 【答案】 D 34、在Visual Foxpro中，要使“文件”菜单使用“F”作为访问键，可以用（ ）定义 该菜单标题。 A．文件（<\F） B．文件（\<F） C．文件（<F） D．文件（F） 【答案】 B 35、在Visual Foxpro中，不可以作为文本框数据来源的是（ ） A．数值型字段 B．字符型字段 C．内存变量 D．备注型字段 【答案】 D 36、 关于网络拓扑结构特点的描述，下列说法错误的是（ ） A．环型拓扑通过点对点线路构成环路 B．星型拓扑的可行性瓶颈在中心结点 C．树型拓扑按层次组织结点的连接关系 D．网状拓扑的主要优点是传输延时固定 【答案】 D 37、 在以下几种标准中，定义CSMA/CD机制的是（ ） A．IEEE 802.1 B．IEEE 802.3 C．IEEE 802.15 D．IEEE 802.16 【答案】 B 38、 关于TCP协议的描述，错误的是（ ） A． 可以提供面向连接的服务 B．连接建立采用3次握手法 C．利用重传机制进行流量控制 D．端口采用16位二进制数表示 【答案】 C 39、 以太网帧中的目的地址字段保存的是（ ） A． 源结点的IP地址 B．目的结点的IP地址 C．源结点的MAC地址 D．目的结点的MAC地址 【答案】 D 40、 在10BASE-5以太网中，用来扩展线缆长度的中继器，最多可以有（ ）个。 A.3 B.4 C.5 D.任意多个 【答案】B 41、 TCP/IP协议体系中，ARP协议的作用是（ ） A.解析IP地址和MAC地址的对应关系 B.解析MAC地址和IP地址的对应关系 C.解析IP地址和域名的对应关系 D.解析服务类型和端口的对应关系 【答案】 A 42、 将一条传输信道按传输频带分为多个逻辑信道，每个子信道传输一路信号，这种多路复用方式是（ ） A．时分多路复用 B．频分多路复用 C．波分多路复用 D．码分多路复用 【答案】B 43、 某企业分配给产品部、市场部和财务部的IP地址块分别为10.16.31.192/26、10.16.31.160/27和10.16.31.128/27，这三个地址块聚合后的地址块为（ ） A.10.16.31.0/25 B.10.16.31.0/26 C.10.16.31.128/25 D.10.16.31.128/26 【答案】 C 44、 DHCP协议的功能是（ ） A.域名解析 B.文件传输 C.邮件传输 D.自动配置IP地址 【答案】D 45、对于非对称密钥加密的说法，正确的是（ ） A.加密方和解密方使用的是不同的算法 B.加密密钥和解密密钥是不同的 C.加密密钥和解密密钥是相同的 D.加密密钥和解密密钥没有任何关系 【答案】 B 46、 网络中的计算机可以分为服务器和客户机，服务器主要用来向全网络提供某种协议的网络服务，客户机则主要用来访问、使用服务器上的服务。下列关于客户机的描述，错误的是（ ） A.平板电脑可以作为客户机使用 B.高端台式机能用作客户机 C.智能手机不能用作客户机 D.笔记本电脑可以用作客户机 【答案】 C 47、 常用数据备份方式包括完全备份、增量备份和差异备份，三种方式在数据恢复速度方法由快到慢的顺序为（ ） A． 完全备份、增量备份、差异备份 B、完全备份、差异备份、增量备份 C．增量备份、差异备份、完全备份 D．差异备份、增量备份、完全备份 【答案】B 48、 将内部专用IP地址转换为外部公用IP地址的技术的是（ ） A．RARP B．NAT C．DHCP D．ARP 【答案】B 49、 攻击者利用攻破的多个系统发送大量请求去集中攻击其他目标，受害设备因为无法处理而拒绝服务。这种攻击被称为（ ） A．Smurf攻击 B．DDoS攻击 C．SYN Flooding攻击 D．Land攻击 【答案】 B 50、关于无线接入方式的描述，正确的是（ ） A.无线接入就是接入移动互联网 B. 无线接入就是用智能手机接入 C.无线接入就是接入WLAN D.无线接入分为WiFi接入和移动接入 【答案】D 第II卷(非选择题 共140分) 二、判断题（本大题共14小题，每题1分，共14分。将答案填涂在机读卡上，正确的填涂“A”，错误的填涂“B”） 51、计算机辅助设计的简称是CAD。（ ） 【答案】 A 52、 计算机的外部设备就是指计算机的输入设备和输出设备。（ ） 【答案】 B 53、 Windows 7中，要修改屏幕分辨率，则在桌面空白处右击鼠标，选择“个性化”命令。（ ） 【答案】 B 54、 Windows 7的有点是更易用、更快速、更简单和更安全。（ ） 【答案】 A 55、 在Word 2010编辑状态下，使选定的文本倾斜的快捷键是Ctrl+I。（ ） 【答案】 A 56、 阅读版式视图是Word 2010的一种视图模式。（ ） 【答案】 A 57、在Excel 2010中，若在A2单元格输入“我的中国梦”，则A2单元格的对齐方式是左对齐。（ ） 【答案】 A 58、 在Excel 2010中，公式和函数不能作为参数。（ ） 【答案】 B 59、 在PowerPoint 2010的普通视图中，隐藏了某个幻灯片后，在幻灯片放映时被隐藏的幻灯片将会在幻灯片放映时不放映，但仍然保存在文件中。（ ） 【答案】 A 60、在Visual Basic中，类模块文件的扩展名为.cls。（ ） 【答案】 A 61、在Visual Foxpro中，在SQL语句中，排序项和分组项可以是字段名，标题名，表达式或输出项的序号。（） 【答案】 B 62、IP分组交换中，一次交付过程包括一个直接交付和零个（多个）间接交付，最后的交付是间接交付。( ) 【答案】 B 63、 在TCP/IP的诊断和管理工具中，常用ping命令测试主机的连通性。（ ） 【答案】 A 64、 由于防火墙可以进行内网与外网的访问控制，所以防火墙完全可以代替杀毒软件。（ ） 【答案】 B 三、填空题（本大题共13小题，每题2分，共26分，请将答案填写在答题纸上） 65、按计算机所处理的信号进行分类，可以分为模拟式计算机和_______式计算机。 【答案】 数字 66、设GB 2312-80字符集中某汉字的机内码是BEDF（十六进制），它的区位码是______。 【答案】 3062 67、 如果一个存储单元能存放一个字节，那么一个32KB的存储器共有存储单元_______个。 【答案】 32768 68、 Windows 7自带的输入法是_______。 【答案】 微软拼音输入法 69、 Word 2010在进行拼写和语法检查时，红色波浪线表示拼写错误，绿色波浪线表示______。 【答案】 语法错误 70、 Excel 2010中，要在单元格内输入当前的日期，应按组合键________。 【答案】 Ctrl+; 71、PowerPoint 2010演示文稿的基本组成单位_________。 【答案】 幻灯片 71、 在Visual Basic中，要将一个窗体隐藏，应使用的方法是_______。 【答案】 Hide 73、在Visual Basic中，表达式 Sgn(-2 ^ 2) * Abs(Int(-5.3)) + Int(Rnd())的值为_____。 【答案】 -6 74、在Visual Foxpro中，为了选用一个未被使用的编号最小的工作区，可使用的命令是______。 【答案】 SELECT 0 75、 在以太网的MAC帧结构中，目的地址占__________字节。 【答案】 6 76、 IPV4组播地址以4位二进制开始，它们是________。 【答案】1110 77、 ___________的作用是判断目标主机和源主机的IP地址是否属于同一子网。 【答案】子网掩码 四、依据环境与题意，写出相应的Visual FoxPro语句或SQL语句，要求每题用一条语句完成（本大题共5小题，每题4分，共20分，请填写在答题纸上） 设有数据库“ZG.DBC”,其中包含“部门”表和“职工”表。 “部门”表的结构：部门号（C，2），部门名称（C,10） “职工”表的结构：职工号（C，2），部门号（C，2），姓名（C，6），性别（C，2），出生日期D，基本工资（N，7，2），奖金（N，7，2）该数据库及相关表已打开，请完成如下操作的命令序列： 78、将职工表中年龄大于55（包括55）的职工的基本工次增加300元。（用 Visual FoxPro命令） 【答案】REPLACE 基本工资 WITH 基本工资+300 FOR YEAR(DATE())-YEAR(出生日期)>=55 79、显示职工表中第3条~第9条记录中男职工记录。（用 Visual FoxPro命令） 【答案】LIST FOR 性别=”男” AND RECNO()>=3 AND RECNO()<=9 80、在职工表中增加”入职时间”字段，字段类型为日期型 （用 SQL 语句） 【答案】ALTER TABLE 职工表 ADD 入职时间 D 81、查询各部门男职工和女职工的人数，并按出生日期降序排序。（用 SQL 语句） 【答案】SELECT 部门号， COUNT(*) FROM 职工 GROUP BY 部门，性别 ORDER BY 出生日期 DESC 82、查询”财务部门”的员工信息。（用 SQL 语句） 【答案】SELECT * FROM 部门，职工 WHERE 职工.部门号=部门.部门号 AND 部门名称=”财务部门” 五、程序分析（本大题共2小题，每题5分，共10分，读程序并分析结果，请填写在答题纸上） 83、分析Visual Basic程序，该程序实现的功能是________ Private Function Fun(ch As Integer) As Integer Dim n%, st$, c$ For i = 1 To Len(ch) c = Mid(ch, i, 1) If c <> "A" Then st = st & c Else n = n + 1 End If Next i ch = st Fun = n End Function 【答案】从字符串ch中删除所有字符”A”,返回值为删除的个数 84、下列Visual FoxPro程序的功能是_________ CLEAR INPUT"请输入一个正整数："TO N SUM=0 FOR I= 1 TO N SUM=SUM+1/JC(I) ENDFOR ?"结果为：",SUM RETURN FUNCTION JC PARA X Y=1 FOR M=1 TO X Y=Y*M ENDFOR RETURN Y 【答案】求1+1/2!+1/3!+1/4!.....+1/N! 六、写出以下程序的运行结果（本大题共5小题，每题5分，共25分，请填写在答题纸上） 85、分析Visual Basic程序: Option Base 1 Dim arr() As Integer Private Sub Command1_Click() Dim i As Integer, j As Integer ReDim arr(3, 2) For i = 1 To 3 For j = 1 To 2 arr(i, j) = i + j Next j Next i ReDim arr(3, 4) For j = 3 To 4 arr(3, j) = j + 6 Next j Print arr(3, 2) + arr(3, 4) End Sub 运行该程序，程序的运行结果为_______ 【答案】10 86、分析Visual Basic程序 Private Sub Command1_Click() Dim m As Integer, n As Integer Dim s_base As String, s As String Dim i As Integer, j As Integer Dim r(20) As Integer s_base = "0123456789ABCDEF" m = InputBox("请输入第一个数据：") n = InputBox("请输入第二个数据：") i = 0 Do While m <> 0 r(i) = m Mod n m = m \ n i = i + 1 Loop s = "" For j = i - 1 To 0 Step -1 s = s + Mid(s_base, r(j) + 1, 1) Next j Print s End Sub 运行该程序，程序的运行结果为_______ 【答案】3A 87、分析Visual FoxPro程序,运行下列程序，程序的运行结果为______________ 依次输入下列数据：3 4 1 4 5 6 7 8 9 CLEAR DIME A(3,3) FLAG=.T. FOR I=1 TO 3 FOR J=1 TO 3 INPUT "A("+STR(I,2)+","+STR(J,2)+")="TO A(I,J) ENDFOR ENDFOR FOR I=1 TO 3 MAX=A(I,1) COL=1 FOR J=2 TO 3 IF MAX<A(I,J) MAX=A(I,J) COL=J ENDIF ENDFOR MIN=A(1,COL) ROW=1 FOR K=2 TO 3 IF MIN >A(K,COL) MIN =A(K,COL) ROW=K ENDIF ENDFOR IF MAX=MIN ?A(ROW,COL),"是鞍点，在",ROW,"行",COL,"列" FLAG=.F. ENDIF ENDFOR IF FLAG=.T. ?"无鞍点" ENDIF 【答案】4是鞍点，在1行2列 88、分析Visual FoxPro程序: CLEAR ACCEPT "请输入字符串:"TO A S="" M=LEN(A) FOR I=1 to M K=SUBSTR(A,I,1) if k>="0" AND K<="9" S=S+CHR(105-ASC(K)) ELSE S=S+K ENDIF ENDFOR ?"S=",S CANCEL 运行上面的程序，显示的结果为：S=5e7A317ls1478,则应从键盘输入的内容为：_________ 【答案】4e2A682ls8521 89、 分析Visual FoxPro程序: CLEAR A=1 B=2 C=3 DO JS2 ?B ?C DO JS1 WITH A, "B" ?B,A RETURN PROC JS1 PARA B,A B=B+C &A=&A+1 A=B+1 RETURN PROC JS2 PRIVATE C C=6 DO WHILE B<=6 C=C+B B=B+2 ENDDO DO JS3 RETURN PROC JS3 PRIVATE B C=C*3+2 B=C-1 A=9 RETURN 运行上面的程序，显示的结果为：___________ 【答案】 8 3 8 13 7、 Visual Basic程序改错（本大题共有两个小题，每题5分，共10分，每个程序有两个错误行，请在答题纸上写出错误行和对应的正确行，改对一处得一处分，改错不扣分） 90、下列程序的功能：将一个正整数分解为质因数乘积。例如，78=2×3×13。 Option Explicit Private Sub Command1_Click() Dim n As Integer, k As Integer n = InputBox("输入正整数n= ") k = 1 Print n; "= "; Do While n >= k If n Mod k = 0 Then If n = k Then Print k Else Print k; "*"; End If n = n / k Else k = k + 1 End If Loop End Sub 【答案】 (1) k = 1 改为 k = 2 (2)n = n / k 改为n = n \ k 91、从键盘上输入10个无序数，去掉一个最大数和最小数，然后求其平均值。程序运行如下所示。 Option Explicit Private Sub Form_Click() Dim ave As Single, max As Integer, i As Integer, j As Integer Dim min As Integer, Sum As Integer, S As String S = InputBox("求平均值", "输入10个数第1个数") i = Val(S) max = i: min = i: Sum = 0 For j = 2 To 10 S = InputBox("求平均值", "输入10个数第" & Str(j) & "个数") i = S Sum = Sum + i If i < min Then min = i Else If max < i Then max = i End If End If Next j Sum = Sum - max - min ave = Sum / 8 MsgBox "平均值= " + Str(ave), , "去掉最大数和最小数后" End Sub 【答案】 (1) Sum = 0 改为 Sum = 1 (2) i = S 改为 i = Val(S) 八、程序填空（本大题共7个空，每空5分，共35分，按程序要求在答题纸上填入相应的内容，使程序完整正确） 92、(Visual Basic试题）程序实现的功能：输入一串字符，判别其是否是回文。所谓回文，是指正读反读都一样的字符串，如ABA、ABBA均是回文，ABCA不是回文。窗口如图所示，完善下列程序。 Private Sub Command1_Click() Dim S As String, n As Integer, m As Integer S = Text1.Text n = 1 Do While n<=m If Mid(S, n, 1)=Mid(S, m, 1) Then n=n+1 Else Exit Do End If Loop If n>=m Then Text2.Text="是回文" Else Text2.Text="不是回文" End If End Sub 【答案】 (1)m=Len(s) (2)m=m-1 93、(Visual Basic试题）程序实现的功能：找出100（含100）以内的所有“自然数对”。所谓“自然数对”即两个自然数的和与差都是平方数，如26和10，其和为36与差为16均为平方数，则26和10被称为自然数对。请完善程序。 Private Sub Command1_Click() Dim i As Integer, j As Integer Dim Sum As Single, c As Single For i=1 To 100 For j= Sum= i + j C= i – j If Then Print "自然数对为："; i , j End If Next j Next i End Sub 【答案】 (1)1 To i (2)Sqr(Sum) = Int(Sqr(Sum)) And Sqr(c) = Int(Sqr(c)) 94、Visual FoxPro表单设计题： 1） 创建表单。表单内容如图所示：一个标签、一个组合框、一个文本框和一个选项按钮组。 2） 设置数据环境：添加XS表，XS表中的字段有：学号，姓名、专业，总分。 3） 程序实现的功能如下： ①按专业统计某一专业的总人数，总成绩和最高成绩。 ②在组合框Combo1中选择要查询的专业，在选项按钮组Optiongroup1中选择要统计的类型（总人数、总成绩），根据所选择的统计类型将统计的数据显示在文本框Text1中。 ③选项按钮组Optiongroup1中的“最高成绩”是指表XS按专业分组后，总成绩最高的值。 如：选择“计算机”专业，可以统计计算机专业的总人数，总成绩。 选择最高成绩，可得到按专业分组后总成绩最高的值。 具体实现代码如下： 选项按钮组Optiongroup1的INTERACTIVECHANGE事件如下： __________________(1)_____________________________________________ SELECT SUM(总分）AS 总成绩 FROM XS GROUP BY 专业 INTO TABLE AA __________________(2)_____________________ INTO ARRAY TEMP2 IF THIS.VALUE=1 THISFORM.TEXT1.VALUE=TEMP1(1) ELSE IF THIS.VALUE=2 THISFORM.TEXT1.VALUE=TEMP1(2) ELSE __________________(2)_____________________ ENDIF ENDIF THISFORM.REFRESH 【答案】 (1)SELECT COUNT(*)AS 人数,SUM(总分）AS 总成绩 FROM XS WHERE 专业=THISFORM.COMBO1.VALUE INTO ARRAY TEMP1 (2)SELECT MAX(总成绩)AS 最高成绩 FROM AA (3)THISFORM.TEXT1.VALUE=TEMP2(1) 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $$