2003年4月全国计算机等级考试一级笔试试卷Windows_2003年4月全国计算机等级考试二级FOXBASE语言程序设计

【shitiku.jxxyjl.com--试题集锦】

一、选择题（(1)～(40)每小题1分，(41)～(50)每小题2分，共60分）
下列各题 a) 、b)、c)、d)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。
(1) 用8位无符号二进制数能表示的最大十进制数为 c
a) 127 b) 128 c) 255 d) 256

(2) 在64位高档微机中，一个字长所占的二进制位数为d
a) 8 b) 16 c) 32 d) 64

(3) 在windows环境下，为了复制一个对象，在用鼠标拖动该对象时应同时按住 d
a) alt键 b）esc键 c）shift键 d)ctrl键

(4) 在windows菜单中，暗淡（灰色）的命令项表示该命令a
a) 暂时不能用 b) 正在执行 c) 包含下一层菜单 d) 包含对话框

(5) 在dos环境下，为了得到type命令的帮助信息，正确的dos命令为 d
a) type b) type/h c) type/* d) type/?

(6) 下列选项中，能作为合法dos文件名的是 b
a) anp/a.dat b) abccom c) ecd.basic d) xy+z.txt

(7) 下列叙述中正确的是 a
a) 在windows环境下，最大化的窗口是不能移动的
b) 在windows环境下，应用程序窗口最小化后，该应用程序暂停执行
c) 在windows环境下，只有最小化的窗口才能关闭
d) 在windows环境下，不能关闭最大化的窗口

(8) 在windows环境下，工具栏中的复制按钮是c
a) 打印机图标 b) 剪刀标志 c) 复制标志 d) 粘贴标志

9) 在windows98环境下，若要将整个屏幕上显示的内容存入剪贴板，可以按d
a) ctrl+printscreen键 b) alt+printscree键
c) shift+printscreen键 d) printscreen键

(10) 目前，计算机病毒扩散最快的途径是b
a) 通过软件复制 b) 通过网络传播
c) 通过磁盘考贝 d) 运行游戏软件

(11) foxbase是一种 b
a）数据库 b）数据库管理系统
c）数据库系统 d）数据库应用程序

(12) 数据库文件book.dbf中包含memo型字段，下列描述中错误的是
a) 若删除了备注文件book.dbt，则该数据库文件将无法打开 b
b) 若删除了该数据库文件，则备注文件book.dbt自动被删除
c) 若打开该数据库文件，则备注文件book.dbt自动打开
d) 该数据库文件的所有备注型字段的内容都存放在同一个备注文件中

(13) 在foxbase中，下列数据中属于常量的是b
a) top b) .y. c) t d) 12/11/2003

(14) 在foxbase中，可以用type命令显示其内容的文件类型为c
a).mem b) .dbt c) .prg d) .fox

(15) 不能关闭当前工作区中索引文件的命令为 d
a）set index to b）close index
c）close all d）set order to

(16) 在相关数据库文件存在或已打开的情况下，下列命令中能正确执行的是
a) seek for 基本工>1000 b) @10,12 say"a的值为："，20
c) delete zgjk.dbf d) count rest

(17) 当范围和条件短语同时省略时，仅作用于当前记录的命令是
a）count b）delete c）list d）change

(18) 在操作过程中，可以进入人机交互工作方式的命令为
a) append blank b) browse c) replace d)delete all

(19) 不能向数据库文件增加记录的命令是
a) browse b) append c) insert d) replace

(20) 表达式int（-25.8）的值为
a) -25 b) -26 c) 25 d)26

(21) 下列对browse命令描述正确的是
a) 只能浏览数据库文件，不能修改记录内容
b) 能浏览数据库文件，但不能增加或删除记录
c) 能浏览数据库文件，同时也能增加或删除记录
d) 不仅能浏览数据库文件，还能修改数据库的结构

(22) 在foxbase中，seek命令和locate命令都可以用于查找记录，但在使用上有所不同。以下表述正确的是
a) seek命令可以一次查找到全部记录，locate命令一次只能找到一条记录
b) seek命令需要打开相应索引文件才能使用，locate命令不需要索引文件
c) seek命令只能查找字符串，locate命令可以查找任何类型字段
d) seek命令可以和continue命令联合使用，而locate命令不可以

(23) 以下关于total命令的表述中，正确的是
a) 命令的执行结果不生成另一个数据库文件
b) 所操作的数据库文件不必按关键字段索引或排序
c) 命令中的关键字段必须是数值型字段
d) 只能对数据型字段进行汇总

(24) 有如下序列（"□"表示空格）
store "abc□□" to x
　　store "xyz"+x to y
　　store trim(y)-"lmn" to z
　　？len(z)
　　执行上述命令之后，屏幕显示的值是
a) xyzabclmn b) xyzabclmn□□ c) 11 d) 9

(25) 使用display命令时，若范围短语为all或rest，执行该命令后，记录指针指向
a) 首记录 b) 末记录 c) 首记录的前面 d) 末记录的后面

(26) 在foxbase中，已经在多个工作区中打开了若干个数据库。要显示当前工作区的区号，应使用命令
a) select b) ？select c) select（） d) ?select()

(27) 数据库文件已经打开，当前记录中姓名字段的值是"张敏"。执行以下命令序列：
姓名="李卫星"
　　?姓名
　　屏幕显示的结果是
　　a) 张敏 b) 李卫星 c) 张敏李卫星 d) 李卫星张敏

(28) 在foxbase数据库中，记录是由字段值构成的数据序列，记录长度要比各字段长度之和多一个字节，这个字节用来存放
a) 记录的分隔标记 b) 记录的序号
c) 记录的指针定位标记 d) 记录的删除标记

(29) 在foxbase圆点指示符下，要将a盘根目录下的sst.prg文件复制到c盘根目录下的my子目录下，应使用命令
a) copy a:sst.prg c:my
b) copy file a:sst.prg to c:my
c) copy file a:sst.prg to c:mysst
d) copy file a:sst.prg to c:mysst.prg

(30) 有如下命令序列：
x="a"
　　y=x
　　a="黄河长江"
　　？x+&x-y-&y
　　执行以上命令序列后，屏幕显示表达式x+&x-y-&y的结果是
a) 黄河长江 b) a黄河长江a黄河长江
c) a黄河长江a d) a黄河长江黄河长江

(31) 在默认的日期格式下，表列表达式中，结果一定为真（.t.）的是
a) "200">3 b) .not..t.
c) "男" d) ctod("03/21/03")>ctod("03/12/03")

(32) 在没有打开索引文件的情况下，如果使用append命令追加一条记录，其功能等同于命令序列
a) goto eof
insert
b) coto bottom
insert before
c) goto bottom
insert after
d) goto bottom
　　insert

(33) 要清空当前数据库文件hgz.dbf中"奖金"字段的全部值，应当使用命令
a) modify structure b) delete
c) replace d) zap

(34) 在foxabse中，用于建立或修改过程文件的命令是
a) modify <文件名> b) modify command <文件名>
c) modify procedure <文件名> d) create command <文件名>

(35) 在foxbase中，能够进行条件定位的命令是
a）skip b）seek c）locate d）go

(36) 设x=100,y=800,执行以下命令：
？iif（x>100，y-50，y+50）
　　屏幕显示结果是
a) 50 b) 750 c) 800 d) 850

(37) 如果测试函数type("w")的值是"u"，说明
a) w是数组 b) w未定义
c) w的值为u d) w的值无符号

(38) 在下列记录定位命令中，不能用found()函数检其操作是否成功的命令是
a）seek b）find c）locate/continue d）skip

(39) 有如下命令
　　set deleted on
　　use abc
　　go 3
　　delete next 2
　　go 4
　　recall
　　use
　　执行最后一条recall命令时，去掉删除标记的记录个数是
a) 0 b) 1 c) 2 d) 3

(40) 要清除所有变量名第二个字母为x的内存变量应使用命令
a) release all *x b) release all like x
c) release all like ?x* d) release all like "?x"

(41) 为了确保向日期型字段"起始日期"中输入1997年以前的日期，应在read之前使用语句
a) @5,15 say "起始日期:" get 起始日期 range, ctod("12/31/96")
b) @5,15 say "起始日期:" get 起始日期 range ctod("12/31/96")，
c) @5,15 say "起始日期:" get 起始日期 for 起始日期<= ctod("12/31/96")
d) @5,15 say "起始日期:" get 起始日期 range date(),ctod("12/31/96")

(42) 若在update命令中使用了random短语，则
a) 源数据库和目标数据库都必须按关键字段排序或索引
b) 只需将源数据库按关键字段排序或索引
c) 只需将目标数据库按关键字段排序或索引
d) 源数据库和目标数据库均可以不按关键字段排序或索引

(43) 设当前数据库中有20条记录，当前记录号为10。有以下各组命令，在没有打开索引的情况下，两条命令执行结果相同的是
a) go 5与skip 5 b）go recno()+5与skip 5
c）skip recn0()+5与go recn0()+5 d）go recn0()+5与 list next 5

(44) 已知x=99，y="a"，a="telephone",则len(str(x,2)+&y)的值为
a) 19 b) 11 c) 5 d) 5

(45) 已知proc.prg程序清单如下：
　　set talk off
　　n=20
　　t=1
　　do proc_1 with n,t
　　?t
　　set talk on
　　return
　　proc_1.prg程序清单如下：
　　parameters a,b
　　b=a*b
　　if a<=2
　　return
　　endif
　　do proc_1 with a-2,b
　　return
　　程序proc.prg的功能是
a) 输出20以内偶数的乘积 b) 输出20以内奇数的乘积
c) 输出结果为1 d) 输出结果为0

以下（46）-（50）题的操作均基于下面条件：
已建立并打开职工工资数据库zggz.dbf。该数据库的结构为：职工编号（c，6），姓名（c，8），性别（c，2），基本工资（n，7，2），奖金（n，7，2，），实发工资（n，8，2）
职工编号 姓名 性别 基本工资 奖金 实发工资
a10001 林大伟 男 1500.50 500.00 2000.50
a15002 高原 男 2000.00 300.00 2300.00
b10008 张高山 男 1200.80 200.00 1400.80
b15009 刘群 女 1050.60 350.00 1400.60
... ... ... ... ... ... >
(46) 要显示库中性别字段值为“女”的所有记录，错误的命令是
a) list for 性别="女" b) display for 性别="女"
c) browse for 性别="女" d) display all for 性别="女"

(47) 为了重新计算每个职工记录中实发工资字段的值，可使用命令
a) sum 实发工资
b) sum all 实发工资
c) replace 实发工资 with 基本工资+奖金
d) replace all 实发工资 with 基本工资+奖金

(48) 命令index on基本工资+奖金 to zggz的作用是
a）按基本工资升序排列，当基本工资相同时，按奖金升序排列
b）按基本工资降序排列，当基本工资相同时，按奖金降序排列
c）按基本工资与奖金之和的升序排列
d）按基本工资与奖金之和的降序排列

(49) 输出结果中，包含"张高山"记录的命令是
a) list for姓名="高" b) display all for "高"
c) list for left(姓名,2)="高" d) display for at("高",姓名)=1

(50) 能逻辑删除职工编号中第3位是"5"的职工记录的命令为
a) delete for substr（职工编号,3）=="5"
b) delete for substr（职工编号,3,1）==5
c) delete for substr（职工编号,3,1）=="5"
d) delete for at（5,职工编号）=3

二、填空
请将每一个空的正确答案写在答题卡上【1】～【20】序号的横线上,答在试卷上不得分。
(1) 用十六进制给存储器中的字节地址进行编号，若地址编号从000到ffff，则该存诸器的容量为【1】kb。

(2) 假设在当前盘的当前目录下有两个文件a.txt和b.txt，现要将文件b.txt合并连接到文件a.txt的后面。若使用copy命令，则完整的命令为【2】 。

(3) e-mail地址由用户名和域名两部分组成，这两部分的分隔符为【3】。

(4) 假设在当前盘当前目录下有一个可执行程序user.exe。现要执行该程序，并要求在
执行过程中将显示输出的结果信息存入当前盘当前目录的文件out.dat中，则完整的dos命令
为【4】。

(5) 在dos环境下,表示打印机的设备文件名为【5】。

(6) 在当前打开的数据库文件中有一个长度为6的字符型字?quot;姓名"，有如下命令序列
replace 姓名 with "肖光"
? len(姓名)
执行最后一条命令的显示结果是【6】。

(7) 已知一张职工登记表包括姓名、性别、出生日期、婚否、政治面目、住址、电话等，若要建立保存此表的库文件，可以定义为逻辑字段的项目有【7】。（注意：字段与字段之间用顿号分隔，否则不得分）

(8) 有如下命令序列：
use xyz
?reccount()
skip +2
delete
?reccount()
执行第一条输出命令后，屏幕显示10。接着执行后面的命令序列，第二条输出命令显示的结果是【8】。

(9) 以下命令序列的功能是根据输入的考试成绩，显示相应的成绩等级。等级划分标准为：低于60分为"不合格"，60分以上(含60)为"通过"，其中90分以上(含90)的为"优秀"。请对该程序填空：
clear
【9】"请输入考试成绩："to chj
do case
case chj<60
dj="不合格"
case【10】
dj="通过"
otherwise
dj="优秀"
endcase
?"成绩等级："【11】
return

(10) 有如下命令序列：
set date american
?dtoc(ctod("9/21/2002"),1)
顺序执行以上两条命令之后，在屏幕上将显示【12】。

(11) 有以下三个数据库：
职员(职员号c(3)，姓名c(6)，性别c(2)，职务c(10))
订单(订单号n(3)，客户号c(3)，职员号c(3)，签订日期d(8)，金额n(6，2))
客户(客户号c(3)，客户号c(20)，地址c(20)，电话c(13))
要为订单库建立一个二重索引，要求按签订日期升序，相同签订日期的记录按职员号升序，索引表达式应为【13】。

(12) 有以下三个数据库：
职员(职员号c(3)，姓名c(6)，性别c(2)，职务c(10))
订单(订单号n(3)，客户号c(3)，职员号c(3)，签订日期d(8)，金额n(6，2))
客户(客户号c(3)，客户号c(20)，地址c(20)，电话c(13))
下面程序的功能是利用索引逐条显示8月份签订的订单记录。请填空：
select 0
use 订单
index on month(签订日期) to im
clear
seek 8
if【14】
do while【15】
display
skip
enddo
else
?"8月份没有订单!"
endif
close database
return

(13) 有以下三个数据库：
职员(职员号c(3)，姓名c(6)，性别c(2)，职务c(10))
订单(订单号n(3)，客户号c(3)，职员号c(3)，签订日期d(8)，金额n(6，2))
客户(客户号c(3)，客户号c(20)，地址c(20)，电话c(13))
下面的程序的功能是分别统计职员号以a或b开头的职员所签订的订单数目和总金额。请填空：
clear
store 0 to nl,sl,n2,s2
select 0
use 订单
do while .not. eof()
do case
case【16】
n1=n1+1
s1=s1+金额
case【17】
n2=n2+1
s2=s2+金额
endcase
【18】
enddo
?"a职员订单数;"+str(n1,3)+space(10)+"总金额;"+str(s1,7,2)
?"b职员订单数;"+str(n2,3)+space(10)+"总金额;"+str(s2,7,2)
close database
return

(14) 有以下三个数据库：
职员(职员号c(3)，姓名c(6)，性别c(2)，职务c(10))
订单(订单号n(3)，客户号c(3)，职员号c(3)，签订日期d(8)，金额n(6，2))
客户(客户号c(3)，客户号c(20)，地址c(20)，电话c(13))
下面程序的功能是根据订单号查询该订单及相关职员和客户的信息，要求在屏幕的第6行第20列开始显示输出信息。请填空：
set safety
clear
input "请输入订单号："to mddh
locate for 订单号=mddh
if eof()
?"无此订单号!"
else
【20】"职员："+职员-〉姓名+"客户;"+客户-〉客户名+"金额："-str(金额，6，2)
endif
wait "继续查询吗(y/n)?" to yn
enddo
close database
set safety on
return

本文来源：https://shitiku.jxxyjl.com/shitijijin2/27229.html