当前位置:首页 >> 其它课程 >>

2013年河北省对口升学计算机专业试题


2013 年河北省普通高等学校对口招生考试

计算机专业理论试题(A)
注意事项: 1.本试卷共八道大题。总分 240 分。 2.第 I 卷“一、选择题” 、第 II 卷“二、判断题”的答案填涂在机读卡上,其余各题答案写在答题纸上,答在试卷上不得分。用蓝黑钢笔、碳素笔或圆珠笔答题。 3.答题前将密封线内项目填写清楚。

第Ⅰ卷(选

择题

共 100 分)

装 订 线 内 不 要 答 题

一、选择题(本大题共 50 小题,每小题 2 分,共 100 分。在每小题所给出的四个选项中,只有一个符合题目要求,将正确选项填涂在机读卡上 1.计算机处理数据过程中,是将存储介质上的数据调入到下列哪种硬件中进行数 8.同一台计算机能够安装不同位数的操作系统,通常情况下,数据处理速度最慢的操 据处理......................................................( A ) 作系统是........................................................ ( D ) A.内存 B.硬盘 C.光盘 D.软盘 A.64 位 B.16 位 C.8 位 D.32 位 2. 按照电子器件更新划分, 大规模集成电路计算机是第几代. ......... ( D ) 9.在 Windows XP 中,当用鼠标左键在不同驱动器之间拖动文件时,系统默认的操作 A.一 B.二 C.三 D.四 是.............................................................. ( C ) A .移动 B. 创建快捷方式 C. 复制 D. 无任何操作 3. 关于计算机软件描述错误的是................................... ( D ) 10.在 Windows XP 中,利用“搜索”窗口查找文件时,不能用于文件查找的选项 A.Windows 98 是操作系统,属于系统软件 是............................................................ ( D ) B. Office2003 是办公软件,属于应用软件 A.文件名 B.文件修改日期 C.文件大小 D.文件读写的权限属性 C.图像处理软件是处理图像工具,属于应用软件 11.在 Windows XP 的“控制面板”中不能设置的项目是................. ( D ) D. DOS 是操作系统,属于应用软件 A.日期和时间 B.添加或删除程序 4.二进制数小数 0.1B 转换成十六进制数的结果是....................( D ) C.输入法 D.Outlook 电子邮件账户 A.0.1 B.0.4 C.0.6 D.0.8 ) 12.在 Word2003 编辑状态下,编辑化学反应方程式 Fe+2HCl=FeCl2+H2↑,必须使用的 命令是......................................................... ( B A.编辑-查找 B.字体-下标 C.插入-图示 D.格式-段落 13. 在 Word2003 中, 哪个命令不会出现在 “表格” 菜单里............... .. ( C ) ) 5.下列关于计算机病毒防治叙述错误的是...........................( D A.计算机要经常更新杀毒软件病毒库并定期查杀 B.计算机要安装软件防火墙,防止病毒侵入 C.来历不明的邮件文件不要打开,防止邮件中携带病毒 D.计算机鼠标、键盘要定期清洗,防止计算机病毒侵入 6.计算机最早应用于弹道运算属于.................................( A A.科学计算 A.8 B.辅助技术 B.2 C.数据处理 C.3 D.人工智能 ) D.4 7. A 文件长度为 512KB, B 文件长度是 2MB, B 文件长度是 A 文件多少倍..... ( D )

A.公式 B.排序 C.插入 D.自动套用格式 14.在 Word2003 文档中,选中“使用通配符” ,在“多”与“体”之间只有一个字符, 将所有“多”与“体”之间字符都替换为“媒” ,最优的方法是.........( A ) A.查找“多?体” ,替换成“多媒体” B.查找“多×体” ,替换成“多媒体” C.分别查找中间字符,替换成“媒”

计算机专业理论试题 A

第 1 页 共 13 页

D.查找“多*体” ,替换成“多媒体” 15.在 Excel2003 文档中,对分数进行高级筛选,如果条件是“语文、数学、外语 仅一门不及格” ,则下述条件区域表示正确的是....................( A. 语文 >60 C. 语文 <60 >=60 >=60 数学 >=60 <60 >=60 外语 >=60 >=60 <60 数学 >60 外语 <60 D. 语文 <60 <60 <60 数学 外语 B. 语文 <60 数学 >60 外语 >60 D )

22.关于 Visual Basic 中控件属性的说法不正确是....................( D A.控件都有 Name 属性 B.有些控件有相同的属性



C.每个控件规定了一个默认属性,在对控件的这个属性进行操作时可不写属性名 D.同一窗体中的同类控件,它们的属性值都一样 23.在 Visual Basic 中,关于对象的说法正确的是....................( D A.程序运行时所有对象的位置不能改变 B.所有对象的大小都是可以改变的 C.对象在程序运行时都是可见的 D.有些对象中还可以包含其它对象 24.在 Visual Basic 中,语句 Print Mid("ABCDEFG", 2, 3) = "123"的输出结果 是...........................................................(A A. False A. "12"+12 A. Msgbox B. True B. "ab"+"12" B. Inputbox C.A123EFG C."ab"+12 C. Rnd D. 123 ) ) D.Now+1 D. 文本框 D 25.下面 Visual Basic 表达式不合法的是.............................( C ) )

16.打开 Excel2003 工作簿,在单元格中输入内容 2013-4-1,要在其下面单元格内连 续出现 “日” 的递增,不正确的操作是. . . ............................. ( B -日-确定 B.选中内容单元格,按住 Ctrl 键,然后拖动向下填充句柄进行填充 C.选中内容单元格,直接拖动向下填充句柄进行填充 D.选中内容单元格,在下面填写“2013-4-2” ,选中“2013-4-1”、 “2013-4-2” 两个单元格,拖动填充句柄进行填充 17.在 Excel2003 中,下列哪种操作不能输入条件表达式................. ( C ) A.高级筛选 B.自动筛选 C.分类汇总 D.条件格式 18.在 Visual Basic 中,Print Len("ABab 河北")的值是.................( B ) A.4 B. 6 C. 8 D.12 19.在 Visual Basic 中,当窗体被装载时触发的事件是..................( C ) A.Unload B.Click C.Load D.DblClick 20.Visual Basic 中决定对象是否可见的属性是..................... ...( D ) A.Enabled B.See C. Name D.Visible 21. Visual Basic 中声明数组 Dim A(1 to 100,-3 to 4),则 Ubound(A,2)的值是( D ) A. 1 B. 100 C. -3 D.4 ) A.选中内容单元格及要填充的区域,点击编辑菜单,选择填充-序列,选中按日期

26.在 Visual Basic 程序运行过程中可以用来输入文本的函数是.. .....( B 27.执行下面 Visual Basic 程序,最后输出 s 的值是 Dim a As Integer, i As Integer Dim b As Integer, j As Integer Dim s As Integer a = 5 b = 10 s = 0 For i = 1 To a b = 5 For j = 1 To b s = s + b b = b - 1 Next j Next i Print s A. 15 B. 30 C. 45 A.构成关系模型的二维表中不允许有重复的字段名

D. 75 )

28.在 Visual FoxPro 中,以下关于关系模型的叙述错误的是...........( B

计算机专业理论试题 A

第 2 页 共 13 页

B.构成关系模型的二维表中同一列数据可以有不同的数据类型 C.构成关系模型的二维表中不允许有完全相同的记录 D.在关系模型中数据被组织成二维表 29.在 Visual FoxPro 中,定义菜单标题,设置菜单访问键时,需要在访问键代表字母 前加字符....................................................( A. \B. >\ C. \< D. -\ D ) 30.下列关于 Visual FoxPro 中报表的叙述,正确的是................( A.在报表设计器中每个带区的大小是不可以改变的 B.报表数据源只能是数据库表 C.如果报表需要按照某一字段值的大小顺序输出,则相应的表或视图必须按该关 键字段索引 D. 报表的“页标头”带区的内容每条记录打印一次 31.在 Visual FoxPro 中,以下关于视图的描述中正确的是...........( A. 视图和查询的最大区别在于视图可以对源表中的数据进行更新 B. 视图文件的扩展名为 .pqr C. 视图只能从一个表派生出来 D. 视图不能检查更新的合法性 32.在 Visual FoxPro 中,项目文件的默认扩展名为.................( B A. .SCR B. .PJX C. .MPR D. .MNX B ) 33.在 Visual FoxPro 中,关于查询的叙述错误的是.................( 的记录个数或百分比 B. 查询结果保存在数据库中 C. 在查询去向中,临时表是将查询结果保存在一个临时表中,关闭表时自动清除 D. 查询设计器中,“筛选”选项卡的作用是指定查询记录的条件 34.在 Visual FoxPro 中,建立索引的 INDEX 命令的参数中,表示建立唯一索 引的是.....................................................( A.CANDIDATE B. ASCENDING C. DISTINCT D ) D. UNIQUE D ) ) A ) A )

C. RIGHT(LEFT("mygoodfriend",6),4) D. LEFT(RIGHT("mygoodfriend",AT("good","mygoodfriend")),4) 36.以下各项中哪个是数据通讯系统的主要技术指标....................( C A. 压缩率 A. 总线型结构 B. 分辨率 B. 星型结构 C. 传输速率 C. 环型结构 D. 时钟主频 D. 分布式结构 ) )

37. 下列计算机网络拓扑结构中, 一般不在局域网中使用的是.............. ( D ) 38.在通信系统中,把来自许多信号源的信号组合起来,再通过一条传输线路同时发送 的技术称为... ................................................ (B A. 多路分解 B. 多路复用 C. 并行通信 D. 同步传输 ) D ) )

39.在 TCP/IP 传输层的协议数据首部,依据下列哪个字段来确定通信双方主机内发送 或接收数据的应用进程... ... .................................... ( D A. 序号 A. 数据段 A. 起源于 ARPANET B. 是目前 Internet 事实上的国际标准和工业标准 C. TCP/IP 协议的发展是先定义完整理论框架,再实现相应协议 D. 网际层只提供无连接的数据报服务 42.下面关于 TCP 协议的特性描述错误的是............................. ( D A. 面向连接 B. 提供数据传输的可靠性保证 C. 具有差错检验和流量控制功能 D. 提供数据格式转换功能 43.在电子邮件服务中,邮件服务器之间转发邮件使用的协议是..........( B A.HTTP B.SMTP C.POP3 D.IMAP ) 44. 网络操作系统的基本任务是....................................... ( D A. 屏蔽本地资源与网络资源之间的差异 B. 管理网络系统的共享资源 C. 为用户提供基本的网络服务功能 D. 以上全是 ) ) B. 确认号 B. 比特 C. IP 地址 C. 报文 D. 端口号 D. 数据帧 40. OSI 参考模型中, 数据链路层处理的协议数据单元为.... ............. ( 41.下列关于 TCP/IP 协议描述错误的是................................( D

A. 在查询设计器中的“杂项”选项卡中可以指定是否包含重复记录以及列在前面

35.在 Visual FoxPro 中,下列表达式中运算结果为“good”的是.....( A.SUBSTR("mygoodfriend",AT("good","mygoodfriend")) B. SUBSTR("mygoodfriend",2,4)

计算机专业理论试题 A

第 3 页 共 13 页

45. 在以太网中,设备之间使用非屏蔽双绞线进行连接,则设备的硬件接口是 .............................................................. ( B A. RJ-11 接口 A. 交换机 B. RJ-45 接口 B. 路由器 C. BNC 接口 C. 集线器 D. AUI 接口 ) D. 中继器 46. 以下网络设备中,在 OSI 参考模型工作层次和网桥相同的是......... ( A 47. WWW 服务器的域名为 ftp.hevttc.edu.cn,文件 file1.rar 放置在服务器的根目 录下,服务器的主目录为 D:\dir,则使用 Internet Explorer 浏览器访问该文件 使用的 URL 为....................................................( B A.http://ftp.hevttc.edu.cn/dir/file1.rar B.http://ftp.hevttc.edu.cn/file1.rar C.ftp://ftp.hevttc.edu.cn/file1.rar D.ftp://ftp.hevttc.edu.cn/dir/file1.rar 48. “非对称数字用户线路”的简称是.................................( B A.ISBN B.ADSL C.DDN D.ATM C ) ) ) )

49.校园网内的一台计算机访问外部网络的服务器时,使用域名访问失败,而使用 IP 地址访问成功,造成这种故障的原因可能是........................( A.该计算机的网络断开 B.被访问的外部服务器网络断开 C.该计算机的 DNS 服务器设置有误 D.该计算机与 DNS 服务器不在同一子网 50.当前 Internet 流行的 P2P(peer-to-peer,对等网络)模式的网络应用淡化了计 算机网络服务提供者与服务使用者的界限。和传统的 C/S 模式的网络应用不同,P2P 模式以“非中心化”的方式使得更多的用户计算机同时身兼客户机与服务器的双重 身份,将互联网推向了一个新的阶段。使用 P2P 模式进行通信的网络主机节点之间 使用对等的方式,通过直接交换信息来共享计算机资源。以下网络应用使用 P2P 模 式的是.........................................................( C A.DNS B.Web C.BitTorrent D.FTP )

计算机专业理论试题 A

第 4 页 共 13 页

第Ⅱ卷(非选择题 共 140 分)
二、判断题(本大题 14 小题,每小题 1 分,共 14 分。将答案填涂在机读卡上,正 确的填涂“√”格,错误的填涂“×”格) 1.一般情况下,光盘比硬盘读取速度慢。 2.计算机处理数据快慢和 CPU 主频无关。 ( T ( F ( T ( F 5.在 Word2003 编辑状态下,可以对文字进行动态效果设置。 25” 。 ( T ( F ( F 8.在 Excel2003 工作表中,不可以对没有合并过的单元格进行拆分。 ( F 9.在 Visual Basic 中,不同模块中的变量可以重名。 ( T 10.在 Visual FoxPro 中,使用 PACK 命令将删除当前表中全部记录。 ( F 11.全双工通信方式中,信息可以向两个相反方向传送,但是不能同时进行。 ( F 12.计算机网络中,通信双方的对等层必须使用相同的协议。 ( F ( T 14.在数据通信中,将数字信号变换为模拟信号的过程称为解调。 ( F 三、填空题(本大题共 13 小题,每小题 2 分,共 26 分。请将答案填写在 答题纸上) 1. 按照计算机所处理的信号进行分类, 可以分为模拟式计算机和 数字 式计算机。 2.中央处理器(CPU)包括运算器和 控制 器。 H。 3.把二进制数 10100100101B 转换成十六进制为 525 13.决定局域网性能的三要素是:网络拓扑、传输介质和介质访问控制方法。 ) ) 写在答题纸上) 。 现有数据库 BOOKGL.DBC,其中包含表“books.dbf” , “books.dbf”结构为: 图书编号(C,4)、书名(C,30)、出版社(C,20)、出版日期(D)、价格(N,8,2)、作者 (C,10),页数(N,4) 。在相应数据库和表已打开的前提下,写出完成下述功能的命 令。 1. 逻辑删除所有出版社为 “清华大学出版社” 、 价格大于 35 的记录。 (用 Visual FoxPro 命令) ) ) ) ) ) ) ) ) ) ) ) ) 是 单击桌面空白处,在快捷菜单中选择“属性”选项打开“显示 属性”对话框后, 点击 的 外观 排序 。 。 123 。 标签进行设置。 5.在 Word2003 中,如果对表格中的数值进行计算,则需要点击“表格”下 6.在 Excel2003 表格中,A1=2,B1=3,C1=4,D1=5,E1=6,A2=7,B2=8,C2=9,D2=10, E2=11,A3=2,B3=3,C3=4,D3=5,E3=6, 则 sum (A1: D2,B2: E3) 结果为 文本框中输入"123", 则用 Print 输出文本框的内容时显示的是 (填写结果时不要加双引号) 8.Visual Basic 表达式(10 < 8) And (10 > 8) Or (5 > 4) And (-3 < 3)的值 是 True 。 rowsouce 。 9. 在 Visual FoxPro 中, 用于指定组合框中数据来源的属性是 -1 语义 。 。 16 位二进制值。 7.在 Visual Basic 中,当设置文本框的 PasswordChar 属性为"*",程序运行后在

3. 在 Windows XP 中, 如果希望某个文件不能被删除, 可将它的属性设置为 “只读” 。 4.在 Windows XP 中,鼠标右键单击不同的对象,弹出的快捷菜单都是相同的。

6. 在 Word2003 打印对话框中, 打印 “8 页至 18 页与 25 页” , 在页码范围输入 “8-18; 7.在 Excel2003 文档中,工作表删除后能够通过“撤销”操作恢复工作表。

10.在 Visual FoxPro 中,? IIF(len(rtrim("my " -"book"))>6,1,-1) 的输出是 11.计算机网络协议的三要素中,用于定义每部分控制信息和数据所代表含义的 12.标准的 B 类 IP 地址的网络地址部分为 址、 子网掩码

13.用户使用 Windows XP 接入 Internet,需要配置的 TCP/IP 主要参数是 IP 地 、默认网关和 DNS。 四、根据已知的环境与题意,写出相应的 Visual FoxPro 操作命令或 SQL 语句,要 求每小题用一条命令或语句完成(本大题共 5 小题,每小题 4 分,共 20 分,请填

4.如果需要设置 Windows XP 中窗口的色彩方案、字体大小等属性,可用鼠标右键

计算机专业理论试题 A

第 5 页 共 13 页

2. 以“图书编号”为关键字建立降序的候选索引,索引名为 BH。(用 Visual FoxPro 命令) 3.将“books.dbf”中所有“页数”大于 300 的图书“价格”增加 10。 (用 SQL 语句) 4.在数据库 BOOKGL.DBC 中建立表 AUTHORS.DBF(作者编号(C,4),作者姓名 (C,10),所在城市(C,20) ,联系电话(C,15) ,作者性别(C,2)) ,设置“作者编号” 字段为主索引,并对“作者性别”字段的输入值限制为只能是“男”或“女” ,否 则提示“性别输入错误! ” (用 SQL 语句)

Next i For i = 0 To 10 Print a(i); Next i End Sub 2.有 Visual ForPro 程序如下:程序的功能是计算用数学表达式描述

?1?

1 1 3! 1 5! 1 7! 8! 9! ? ? ? ? ? ? ? ? 2! 3! 4! 5! 6! 7! 8! 9! 10!

CLEAR SS=0 AA=0

5.查询 books.dbf 表中 “价格”大于 28 的记录,包括“书名” 、 “出版社” , “价格” 字段内容,按“价格”字段降序排列,结果保存到文本文件 GAO.txt 中 (用 SQL 语句)

BB=0 FOR I=1 TO 10 FL=0 J=2

五、程序分析(本大题共 2 小题,每小题 5 分,共 10 分,读程序并分析结果,请填写 在答题纸上) 1.运行下面的 Visual Basic 程序,输出结果中有几个偶数______6___ Private Sub Command1_Click() Dim a(10) As Integer Dim i As Integer Dim j As Integer Dim num As Integer For i = 0 To 10 num = 10 + Int(11 * Rnd) For j = 0 To i If num = a(j) Then Exit For Next j If j > i Then a(i) = num Else i = i - 1

DO WHILE J<=SQRT(I) AND FL=0 IF I % J=0 FL=1 ELSE J=J+1 ENDIF ENDDO IF FL=0 DO MM WITH AA,I SS=SS-1/AA ELSE DO MM WITH AA,I

计算机专业理论试题 A

第 6 页 共 13 页

DO MM WITH BB,I-1 SS=SS+BB/AA ENDIF ENDFOR ?SS PROCEDURE MM PARAMETERS S,N X=1 P=1 DO WHILE X<=N P=P*X X=X+1 ENDDO S=P RETURN ENDPROC 六、写出下列程序的运行结果(本大题共 5 小题,每小题 5 分,共 25 分,请填写在答 题纸上) 1.分析下面 Visual Basic 程序段。窗体中有一命令按钮(名称为 C6_1) 。(5 分) Private Sub C6_1_Click() Dim i As Integer Dim j As Integer Dim w As Integer a = Array(1, 2, 3, 4) b = Array(5, 6, 7, 8) For i = 0 To 3 w = w + fu(a(i), b(i)) w = w + a(i) Next i

Print w End Sub Private Function fu(ByVal x As Integer, ByVal y As Integer) Static k As Integer k = k + 1 x = x + y y = x - y x = x - y fu = k End Function 窗体启动后单击命令按钮,输出 w 的值为 Open "c6_2.txt" For Output As #1 Print #1, "k1"; "k2"; "k3" Print #1, "12"; "34"; "56" Print #1, "p1"; "p2"; "p3" Print #1, "88"; "99"; "77" Close #1 Open "c6_2.txt" For Input As #1 Seek #1, 10 Line Input #1, score Print score Close #1 程序运行后,Print score 输出结果是 23456 。 3.在 Visual FoxPro 的表单上添加两个文本框,一个 Name 属性为:Text1,另一 个 Name 属性为:Text2,添加一个命令按钮,其 Name 属性为:Command1,Caption 属 性为:确定。Command1 的 Click 事件代码如下: xa=VAL(TRIM(ThisForm.Text1.value)) n=LEN(TRIM(ThisForm.Text1.value)) DIMENSION aa(n) 20 。 2.下面 Visual Basic 程序段,是对顺序文件进行操作。(5 分)

计算机专业理论试题 A

第 7 页 共 13 页

DIMENSION bb(n) FOR i=n TO 1 step -1 aa(i)=xa % 10 xa=INT(xa/10) ENDFOR nm=0 FOR i=1 TO n IF aa(i) % 2<>0 nm=nm+1 bb(nm)=aa(i) ENDIF ENDFOR FOR i=1 TO nm bb(i)=bb(i)+5 bb(i)=bb(i) % 10 ENDFOR FOR i=1 TO INT(nm/2) t=bb(i) bb(i)=bb(nm-i+1) bb(nm-i+1)=t ENDFOR t=0 FOR i=1 TO nm t=t*10+bb(i) ENDFOR ThisForm.Text2.value=STR(t) 运行上面的表单,在 Text1 文本框中输入:23456789,单击“确定“按钮,在 Text2 文本框中显示的是 4208 。 第 4、5 题使用下面的数据库 设有数据库文件 BGGL.DBC, 包含 3 个表, 分别是 KEFANG、 RUZHU、 KEHU。 其中 KEFANG 的结构为:客房号(C,4)、类型(C,10)、价格(N,4,0),RUZHU 的结构为:客房号(C,

4)、客户号(C,4)、入住日期(D),退房日期(D),KEHU 的结构为:客户号(C,4)、姓 名(C,8)、性别(C,2)、工作单位(C,20);各表中数据如下: KEFANG.DBF 记录号 客房号 1 2 3 4 5 6 1101 1102 1201 1202 1301 1302 类型 普通客房 贵宾客房 总统套房 总统套房 普通客房 贵宾客房 客户号 1001 1002 1003 2001 2002 姓名 王林 刘月明 姚晓敏 肖敏 黄小兵 价格 280 500 2000 1500 280 600 入住日期 03/25/05 03/27/05 03/28/05 03/27/05 03/23/05 性别 男 女 女 女 男 退房日期 03/28/05 03/29/05 04/05/05 03/31/05 04/01/05 工作单位 AA 商贸公司 BB 电子公司 CC 农产品公司 DD 商贸公司 EE 电子公司

RUZHU.DBF 记录号 客房号 1 2 3 4 5 1101 1102 1201 1202 1301

KEHU.DBF 记录号 客户号 1 2 3 4 5 1001 1002 1003 2001 2002

4. 有如下 Visual FoxPro 程序: OPEN DATABASE BGGL USE KEHU ACCEPT "请输入客户姓名:" TO XM INDEX ON 姓名 TAG XMH OF XM SEEK XM KEHUH=客户号

计算机专业理论试题 A

第 8 页 共 13 页

SELECT 1 USE RUZHU GO TOP DO WHILE NOT EOF() IF 客户号=KEHUH KEFANGH=客房号 NM=退房日期-入住日期+1 SELECT 2 USE KEFANG DO WHILE NOT EOF() IF 客房号=KEFANGH S=价格*NM EXIT ENDIF SKIP ENDDO EXIT ENDIF SKIP ENDDO ?S 运行上面的程序,输入“姚晓敏” ,显示的结果是: OPEN DATABASE BGGL ACCEPT "请输入客房类型名:" TO KFLX SELECT 客房号 FROM KEFANG WHERE 类型=KFLX INTO DBF KF ALTER TABLE KF ADD XX C(8) ALTER TABLE KF ADD TH N(3,0) SELECT RUZHU.客房号 AS 客房号,KEHU.姓名 AS 姓名,(RUZHU.退房日期; -RUZHU.入住日期+1) AS 天数 FROM RUZHU,KEHU WHERE RUZHU.客户号=; KEHU.客户号 INTO DBF KH 18000 。 5. 有如下 Visual FoxPro 程序: (代码中行末的分号为逻辑行连接符)

USE KH DO WHILE NOT EOF() KFH=客房号 XM=姓名 TSH=天数 UPDATE KF SET XX=XM,TH=TSH WHERE 客房号=KFH SKIP ENDDO SELECT KEFANG.类型,KEFANG.客房号,KF.XX,TH*KEFANG.价格 AS TJ; FROM KEFANG,KF WHERE KEFANG.客房号=KF.客房号 INTO DBF JG USE JG DO WHILE NOT EOF() ?客房号,XX,TJ SKIP ENDDO 1101 王林 黄小兵 840 2520 。 运行上面的程序,输入“普通客房” ,显示的结果是: 1301

七、Visual Basic 程序改错(本大题共有两个小题,每题 5 分,共 10 分,每个程序有两 个错误行, 请在答题纸上写出错误行和对应的正确行, 改对一处得一处分, 改错不扣分) 1.下面的程序是利用随机函数产生 10 个 10 到 100 之间的随机整数,并按由小到 大的顺序放入数组 a 中。(提示:题目中的语句 Goto x 是转移到标号 x 位置执行) 程序中有两处错误,请将错误行和相应的正确行写在答题纸横线上。 Dim a(10) As Integer Dim num As Integer Dim i As Integer Dim j As Integer Dim k As Integer For i = 1 To 10 k = i num = 10 + Int(Rnd * 91) For j = 1 To i-1 If num < a(j) Then GoTo 20

计算机专业理论试题 A

第 9 页 共 13 页

Next j a(i) = num 10: Next i GoTo 30 20: For m = k To j a(m + 1) = a(m) Next m a(j) = num GoTo 10 30: For i = 1 To 10 Print a(i); Next i Print 2.窗体中(如图所示)有一个定时器控件(名称 Timer1) ,有三个标签(Caption 属性 分别是滚动条、组合框、列表框) ,一个滚动条(名称 HS1,Min 和 Max 的属性初值分别 为 0 和 5,Value 初值为 0) ,一个组合框(名称 Combo1) ,一个列表框(名称 List1) , 组合框和列表框初始为空,一个框架,框架中有两个复选框(名称分别为 Check1 和 Check2,Caption 属性如图所示) 。 程序的功能是:窗体启动后,定时器开始工作,工作时每隔 3 秒钟触发一次事件, Timer 事件中完成 4 项工作: (1)滚动条的值加 1; (2)往组合框中添加滚动条的 Value 值; (3)调用 Combo1_Change 过程; (4)当滚动条的值为 5 时定时器停止工作。在 Private Sub Timer1_Timer() HS1.Value = HS1.Value + 1 Combo1.AddItem HS1.Value Combo1_Change If HS1.Value = 5 Then Timer1.Visible = False End Sub 八、程序填空(本大题共 7 个空,每空 5 分,共 35 分,按程序要求在答题纸上填入相 应的内容,使程序完整正确) 1.下面程序运行时输入长度少于 20 个字符的字符串,以“#”结束,然后对字符串从 左端进行处理。处理方式:把数字和非数字内容分别放入两个数组,数组 a 存放数字, 数组 b 存放非数字,存放时把相邻的数字或非数字内容作为一个整体进行存放,如输入 的字符串为“12abc3d456ef#”,则 12、3、456 分别存放到数组 a 的前三个元素中,”abc” 中,”abc”、”d”、”ef”分别存放到数组 b 的前三个元素中。请填空。(Visual Basic 题) Dim a(20) As Integer Dim b(20) As String Dim c As String Dim i As Integer Dim j As Integer ENABLE M=K TO J-1 STEP -1 A(M)=A(M-1) Combo1_Change 过程中,要将滚动条当前值加上复选框中当时所有选中项的标题添加到 列表框中,Combo1_Change 过程中只给出了部分程序,省略的程序都是正确的。 程序中有两处错误, 请将错误行和相应的正确行写在答题纸横线上。 Private Sub Combo1_Change() List1.AddItem HS1.Value If Check1.Value = True Then End If ???? End Sub 1 List1.List(HS1.Value - 1) = List1.List(HS1.Value - 1) + Check1.Caption

计算机专业理论试题 A

第 10 页 共 13 页

Dim w1 As String Dim w2 As String Dim m As Integer Dim n As Integer c = InputBox("请输入 c$=", "输入数据") c = Trim(c) w1 = Left(c, 1) c = Mid(c, 2) Do While w1 <> "#" If w1 >= "0" And w1 <= "9" Then w2 = Left(c, 1) c = Mid(c, 2) Do While w2 >= "0" And w2 <= "9" And w2 <> "#" w1 = w1 * 10 + w2 w2 = Mid(c, 1, 1) c = Mid(c, 2) Loop a(i) = w1 i = i + 1 (1)_W1=W2__________________________________________________ w2 = Left(c, 1) c = Mid(c, 2) Do While Not (w2 >= "0" And w2 <= "9") And w2 <> "#" w1 = w1 + w2 w2 = Left(c, 1) c = Mid(c, 2) Loop b(j) = w1 j = j + 1 End If w1 = w2

Loop If w1 >= "0" And w1 <= "9" Then a(i) = w1 i = i + 1 Else If_(2) Not (w2 >= "0" And w2 <= "9")_________ Then b(j) = w1 j = j + 1 End If End If For m = 0 To i - 1 Print a(m); Next m For n = 0 To j - 1 Print b(n); " Next n 2、窗体中(如图所示)有五个标签,分别显示了姓名,照片,滚动条,个人信息四 项提示信息,还有一个标签(Label5)在图中显示的是“年龄是:12”;一个文本框(名 称为 Text1),用来输入多个姓名;一个图片框在窗体中显示的是一动物图片;一个框 架,框架中有两个单选按钮(名称分别为 Option1,Option2)用来选择性别;一个列 表框(名称为 List1)用来显示个人信息;一个滚动条(名称为 HS1);一个命令按钮。 当移动滚动条后在 Label5 上显示滚动条的值作为年龄的信息。当单击命令按钮后将把 选中的姓名、性别、滚动条移动产生的值作为年龄在列表框中显示出来,并根据选择的 姓名把此人的照片(以姓名作为照片的名字,扩展名为 bmp)在图片框中显示出来。不 完整的空白位置请写出正确的内容(Visual Basic 题)。 ";

计算机专业理论试题 A

第 11 页 共 13 页

有三个标签,其 Name 属性分别为 Label1、Label2 和 Label3,Caption 属性分别为 “用户名: ” 、 “学号: ” 、 “结果: ” 。有三个文本框,其 Name 属性分别为 Text1、Text2、 Private Sub Command1_Click() Dim xm As String xm = Text1._(3)_SELTEXT____ Picture1.Picture = LoadPicture("d:\" & xm & ".bmp") List1.AddItem "姓名:" + xm If Option1.Value = True Then List1.AddItem "性别:" + Option1.Caption If Option2.Value = True Then List1.AddItem "性别:" + Option2.Caption List1.AddItem "年龄:" + Str(HS1.Value) End Sub Private Sub HS1_Change() _(4)_LABEL5.CAPTION____ = "年龄是:" & HS1.Value End Sub 3.已知有“STUDENT.DBC”数据库,其中包含三个表:USER、XUESHENG 和 CHENGJI, 其中 USER 表的结构为:用户名(C,10)、权限(C,4),XUESHENG 表的结构为:学号(C, 10)、姓名(C,8),CHENGJI 表的结构为:学号(C,10)、数学(N,5,1)、英语(N,5, 1)、信息技术(N,5,1),设计应用程序界面如下: Text3,一个命令按钮,Name 属性为 Command1,Caption 属性为“确定” 。 编写 Visual FoxPro 程序实现下述功能: ①在 Text1 文本框中输入用户名,单击“确定”按钮,如果用户不存在,在 Text1 文本框中显示“用户不存在,请重新输入!” ;如果用户存在,则根据权限的不同进行不 同的操作: 如果“权限”是“查询” ,则标签 Label2 的 Caption 变成“学号” , “确定”按钮变 成“查询”按钮(命令按钮的 Caption 变成“查询” ) ; 如果“权限”是“统计” ,则标签 Label2 的 Caption 变成“班级” , “确定”按钮变 成“统计”按钮(命令按钮的 Caption 变成“统计” ) 。 ②在 Text2 文本框中输入学号,单击“查询”按钮,如果该学号存在,则在 Text3 文本框中显示学生的姓名,数学,英语,信息技术字段的值;如果不存在,则在 Text3 文本框中显示“没找到! ” ; ③在 Text2 文本框中输入班级(班级是学号的前 8 位),单击“统计”按钮,如果班 级存在,则在 Text3 文本框中显示班级、该班级数学的平均分、该班级英语的平均分以 及该班级信息技术的平均分; 如果不存在, 则在 Text3 文本框中显示 “该班级不存在!” 。 Command1 的 Click 事件代码如下,请在空白位置填写正确的命令。 (代码中行末的分号 为逻辑行连接符) (5) mm=trim(thisform.command1.caption) SHURU=TRIM(ThisForm.Text2.Value) OPEN DATABASE STUDENT DO CASE CASE MM="确定" SELECT * FROM USER WHERE 用户名=TRIM(ThisForm.Text1.Value) INTO DBF YH USE YH GO TOP IF EOF() THEN ThisForm.Text1.Value="用户不存在,请重新输入!" ELSE 设置控件属性如下: (6) if 权限=”查询”

计算机专业理论试题 A

第 12 页 共 13 页

ThisForm.Command1.Caption="查询" ThisForm.Label2.Caption="学号" ELSE ThisForm.Command1.Caption="统计" ThisForm.Label2.Caption="班级" ENDIF ENDIF (7) case mm=”查询” SELECT XUESHENG.姓名,CHENGJI.数学,CHENGJI.英语,CHENGJI.信息技术; FROM XUESHENG,CHENGJI WHERE XUESHENG.学号=SHURU AND XUESHENG.学号=; CHENGJI.学号 INTO DBF LSH USE LSH GO TOP IF NOT EOF() ThisForm.Text3.Value=姓名+" "+STR(数学)+" "+STR(英语)+; " ELSE ThisForm.Text3.Value="没找到!" ENDIF OTHERWISE SELECT LEFT(学号,8) AS 班级,AVG(数学) AS 数学,AVG(英语) AS; 英语,AVG(信息技术) AS 信息技术 FROM CHENGJI GROUP BY 班级; WHERE LEFT(学号,8)=SHURU INTO DBF CHJ USE CHJ GO TOP IF NOT EOF() ThisForm.Text3.Value=班级+" "+STR(数学)+" "+STR(英语)+; " ELSE ThisForm.Text3.Value="该班级不存在!" ENDIF "+STR(信息技术) "+STR(信息技术)

ENDCASE

计算机专业理论试题 A

第 13 页 共 13 页


相关文章:
2013年河北省对口升学计算机专业试题
2013年河北省对口升学计算机专业试题_高考_高中教育_教育专区。2013年河北省对口升学计算机专业试题2013 年河北省普通高等学校对口招生考试 计算机专业理论试题(A)注意事...
2013年河北省对口升学计算机专业试题
2013年河北省对口升学计算机专业试题_职高对口_职业教育_教育专区。2013 年河北省普通高等学校对口招生考试 计算机专业理论试题(A)注意事项: 1.本试卷共八道大题。...
2014年河北省对口升学计算机专业试题
2014年河北省对口升学计算机专业试题_IT认证_资格考试/认证_教育专区。2014 年河北省普通高等学校对口招生考试 计算机专业理论试题(A)注意事项: 1.本试卷共八道大...
2013河北省对口高考计算机专业理论试卷
2013河北省对口高考计算机专业理论试卷_高考_高中教育_教育专区。2013年河北省普通高等学校对口招生考试计算机专业理论试题 2013 年河北省普通高等学校对口招生考试 ...
2013年河北省对口升学计算机专业试题
2013年河北省对口升学计算机专业试题_其它课程_高中教育_教育专区。2013 年河北省普通高等学校对口招生考试 计算机专业理论试题(A)注意事项: 1.本试卷共八道大题。...
2012河北省对口高考计算机专业理论试卷
2012河北省对口高考计算机专业理论试卷_高考_高中教育_教育专区。2012年河北省普通高等学校对口招生考试计算机专业理论试题 2012 年河北省普通高等学校对口招生考试 ...
2013年河北省对口升学计算机专业试题(带答案,已修正排版)
2013年河北省对口升学计算机专业试题(带答案,已修正排版)_其它课程_高中教育_教育专区。适用于河北省对口升学计算机专业 2013 年河北省普通高等学校对口招生考试 ...
河北省对口升学计算机专业各年高考表单试题
河北省对口升学计算机专业各年高考表单试题_计算机软件及应用_IT/计算机_专业资料。2011 年河北高考试题 1. 在 Visual FoxPro 的表单上添加一个标签,其 Name 属性...
2015年河北省普通高等学校对口招生考试计算机专业理论试题
2015 年河北省普通高等学校对口招生考试 计算机专业理论试题(A)注意事项: 1.本...( A.按住 Ctrl 键,将所有的“对口升学”选定,然后更改字体为红色 B.先选定...
更多相关标签:
对口升学计算机专业 | 2016年河北省对口升学 | 河北省对口升学 | 河北省计算机对口升学 | 河北省对口升学分数线 | 河北省对口升学教材 | 2017年河北省对口升学 | 2016河北省对口升学 |