2001年9月全国计算机等级考试二级FoxBASE笔试试卷(附答案)
请填空:
SETTALKOFFUSEBOOKGOTOPDOWHILE【9】DOCASECASE数量<=10REPLACE总计WITH单价*数量CASE数量【10】REPLACE总计WITH单价*数量*(1-10/100)
yle="FONT-SIZE:9pt;LINE-HEIGHT:12pt;FONT-FAMILY:宋体,宋体">CASE数量>50REPLACE总计WITH单价*数量*(1-5/100)ENDCASE【11】ENDDOLISTUSESETTALKONRETURN(10)对售书数据库BOOK.DBF(如上题所示),现需要调整一些书的单价,然后用调整后的"单价*数量"的值填入"总计"字段中。下边程序的功能是根据用户输入的书号查找到记录,并由用户决定是否对该记录进行修改。请填空:SETTALKOFFUSEBOOKINDEXON书号TOBOOK1DOWHILE.T.CLEARDISPALLFIELD书号ACCEPT"请输入书号"TOBNO【12】BNOIFFOUND()DISPLAYACCEPT"修改/不修改继续/终止程序(Y/N/E)"TOSRELSEACCEPT"书号不存在!继续/终止程序(N/E)"TOSRENDIFDOCASE
le="FONT-SIZE:9pt;LINE-HEIGHT:12pt;FONT-FAMILY:宋体,宋体">CASEUPPER(SR)="Y"INPUT"请输入新单价"TOXDJREPLACE【13】,总计WITH单价*数量CASEUPPER(SR)="N"【14】CASEUPPER(SR)="E"上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >>