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 OFF
STORE "Y" TO yn
SELECT 0
USE 职员
INDEX ON 职员号码 TO IZG
SELECT 0
USE 客户
INDEX ON 客户号 TO IKH
SELECT 0
USE 订单
SET RELATION TO 职员号 INTO 职员
SET RELATION TO 客户号 INTO 客户【19】
DO WHILE UPPER(yn)="Y" |