2013年辽宁专升本考试真题-VFP部分

第1页共9页2013年辽宁省高职高专毕业生升入本科学校继续学习招生考试计算机（VisualFoxPro语言）试卷说明：试卷中使用到“仓库表”，、“职工表”、“订购单表”、“供应商表”结构和内容如下：（每道使用此四表的题目均使用原始数据，即不考虑各程序运行的影响。）仓库表.DBF：仓库表（仓库号（C,6），城市（C,20），面积（N,10））仓库号城市面积WH1北京70WH2上海500WH3广州200WH4武汉400职工表.DBF：职工表（仓库号（C,6），职工号（C,6），工资（N,10））仓库号职工号工资WH2E11220WH1E31210WH2E41250WH3E61230WH1E71250订购单表.DBF：订购单表（职工号（C,6），供应商号（C,8），订购单号（C,8），订购日期（D,10））职工号供应商号订购单号订购日期E5S7OR672003/06/23E1S4OR732003/07/28E7S4OR762003/05/25E6S5OR77NULLE3S4OR792003/06/13E1S7OR80NULLE3S9OR90NULLE3S3OR912003/07/13供应商表.DBF：供应商表（供应商号（C,8），供应商名（C,30），地址（C,40））供应商号供应商名地址S3振华电子厂西安S4华通电子公司北京第2页共9页S6607厂郑州S7爱华电子厂北京S9奇胜电子厂西安四、填空题（将正确答案填写到答题卡相应的位置上，每小题2分，共10分）41.数据库系统的核心是________________________。42.设当前表有10条记录，当EOF()为真时，命令?RECNO()的显示结果是_______。43.两个不同的实体集的实体间联系有一对一、一对多和_____________三种联系。44.VFP6.0不允许在主关键字字段中有空值与__________________。45.执行以下命令?LEN(ALLTRIM(“等级考试”))的结果是_________________。五、阅读程序题（阅读下列程序，将正确的运行结果填写到答题卡相应的位置上，每小题3分，共24分）46.下列程序段的运行结果是_________________。SETTALKOFFSTORE10TOASTORE20TOBDOSWAPWITHA,B?A,BPROCEDURESWAPPARAMERSX1,X2TEMP=X1X1=X2X2=TEMPENDPROC47.下列程序段的运行结果是_________________。SETTALKOFFCLEARX=220DOCASECASEX100??“A”CASEX200??”B”OTHERWISE??”C”ENDCASESETTALKON48.以下程序的运行结果是________________。SETHEADINGOFF第3页共9页USE职工表SORTTODJON工资/Dfor工资1220USEDJDISPLAYOFFFIELDS职工号，工资USE49.以下程序的运行结果是________________。SETTALKOFFCLEARS=0FORN=10TO50STEP10S=S+NIFN40EXITENDIFENDFOR?SSETTALKON50.以下程序的运行结果是________________。SETTALKOFFCLEARSETLECT职工表.职工号,职工表.仓库号FROM职工表,订购单表;WHERE订购单表.供应商号=’S3’AND订购单表.职工号=职工表.职工号CLOSEALL51.以下程序的运行结果是________________。SETTALKOFFCLOSEALLCLEARALLSELECTA.供应商号FROM订购单表A,职工表B,仓库表C;WHEREA.职工号=B.职工号ANDB.仓库号=C.仓库号;ANDC.面积=(SELECTMIN(面积)FORM仓库表)CLOSEALL52.以下程序的运行结果是________________。SETTALKOFFCLEARN=0USE供应商表LOCATEFOR“电子”S供应商品DOWHILE.NOT.EOF()第4页共9页N=N+1CONTINUEENDDO?NUSESETTALKON52.以下程序的运行结果是________________。SETTALKOFFCLEARI=5N=0DOWHILEI10IFI/2=INT(I/2)I=I+1ENDIFN=N+1I=I+1ENDDO?N,ISETTALKON六、完善程序题（请在答题卡相应的位置上填写正确的内容，使程序完整正确。每小题3分，共24分）54.列出职工号为”E3”负责的2003年六月订购的订购单信息。SETTALKOFFCLEARUSE订购单表DISPLAYFOR________________USESETTALKON55.根据所给数据表输出职工的最高工资。SETTALKOFFCLEARUSE职工表MAXGZ=工资DOWHILE.NOT.EOF()IFMAXGZ工资________________ENDIFSKIPENDDO第5页共9页?”最高工资是：”+ALLTRIM(STR(MAXGZ))CLOSEALL56.列出在”上海”工作的职工信息。SETTALKOFFSELECTB.职工号,B.仓库号,B.工资FROM仓库表A.职工表B;WHERE________________CLOSEALL57.列出有最大面积的仓库信息SETTALKOFFCLEARSELECT*FROM仓库表WHERE________________CLOSEALL58.给北京仓库的面积增加50m²。SETTALKOFFCLEARUSE仓库表________________FOR城市=”北京”LISTUSE59.列出职工E6发给供应商S6的订购单信息SETTALKOFFCLEAR________________WHERE职工号=’E6’AND供应商号=’S6’CLOSEALL60.插入一个新的供应商记录(S9,智通公司,沈阳)SETTALKOFF________________VALUES(“S9”,”智通公司”,”沈阳”)CLOSEALL61.该表单实现的功能是从“仓库表”中查询指定仓库号的仓库所在的城市。下面作图是设计界面，有图是运行界面。运行表单后，在文本框（Text1）中输入“仓库号”的值，单机“查询”按钮，若找到则在标签（Label4）上显示该仓库号的仓库所在的城市，否则弹出一个消息框显示“对不起，未找到！！！”。第6页共9页“查询”命令按钮的单机事件代码：SETTALKOFFCLEARUSE仓库表LOCATEFOR仓库号=ALLTRIM(THISFORM.TEXT1.VALUE)IFFOUND()________________ELSEMESSAGEBOX(“对不起，未找到！！！”)ENDIFUSE七、程序改错题（以下每个小题都有一个错误，请在答题卡相应的位置上写出有错误语句的行号级改正后的完整语句。每小题3分，共12分）62.由数据表“仓库表”建立索引，查找位于上海的仓库，如果找到则显示仓库号和仓库面积(1)SETTALKOFF(2)SETHEADINGOFF(3)CLEAR(4)USE仓库表(5)INDEX仓库号TOCS(6)FIND“伤害”(7)IFFOUND()(8)DISPLAYOFF仓库号,面积(9)ENDIF第7页共9页(10)USE错误的行是：___________________________改为：________________________________63.将职工表原样复制为ZHB.DBF，并屋里删除ZHB.DBF中记录号为偶数的记录。(1)SETTALKOFF(2)CLEAR(3)USE职工表(4)COPYTOZHB.DBF(5)USEZHB(6)DELETEALLFORINT(RECN()/2)=RECN()/2(7)ZAP(8)USE错误的行是：___________________________改为：________________________________64.根据所给数据表查询工资在1000到1400之间的职工信息。(1)SETTALKOFF(2)CLEAR(3)SELECT职工表.*;(4)FROM职工表;(5)WHERE工资BETWEEN1000;(6)TO1400(7)CLOSEALL错误的行是：___________________________改为：________________________________65.假定有包含若干个记录的表文件c1.dbf，其结构是：f1(N,3,0)，f2(N,3,0)。编写程序，其功能是把个记录中所有大于40的字段值累加起来，最后把累加的结果存入第一个记录的f2字段中。(1)SETTALKOFF(2)USEC1(3)A=0(4)DOWHILE.NOT.EOF()(5)IFF140(6)A=A+F1(7)ENDIF(8)IFF240(9)A=A+F2(10)ENDIF(11)SKIP(12)ENDDO(13)GOTOP(14)F=A第8页共9页(15)USE(16)RETURN错误的行是：___________________________改为：________________________________第9页共9页扫描二维码立即获取答案