计算机二级vf第六章 程序设计基础.docVIP

第六章 程序设计基础 程序和程序文件 一、程序的概念 VFP的程序指将若干条VFP的命令语句，保存在一个扩展名为PRG的文本文件中，当用户在命令窗口或其它方式下执行这一文件时，就相当于一次执行的多条VFP命令语句。这些命令语句在程序中称为程序代码，一行程序代码又称为语句行。 (1)命令注释 在程序中以“*”或“NOTE”开头的语句行,将不会被系统执行,被当作文字说明来对待。 (2)SET TALK ON|OFF命令 打开/关闭命令执行时的“回显”状态，默认为ON (3)SET SAFE ON|OFF命令 打开/关闭系统的安全提示,默认为ON (4)RETURN 结束当前程序的执行,返回程序调用处。当程序文件中再无语句行时,系统会默认有一个RETURN 二、程序文件的建立和执行 1.建立和修改 (1)菜单法/工具栏法 建立:新建?程序?新建文件 修改:打开?程序?选取要修改的程序文件?确定 (2)命令 格式1:MODIFY COMMAND 程序文件名 格式2:MODIFY FILE 程序文件名.PRG 2.执行程序文件 格式:DO 程序文件名 例:编写程序SX1.PRG,完成如下操作 在屏幕中显示[今天是:XXXX年XX月XX日,星期X] 1.在命令窗口输入创建程序文件SX1.PRG的命令 MODI COMM SX1 2.在程序编辑界面输入如下代码: SET TALK OFF CLEAR *以上为程序运行的环境设置 RQ=DTOC(DATE(),1) YY=LEFT(RQ,4) MM=SUBSTR(RQ,5,2) DD=RIGHT(RQ,2) XQ=日一二三四五六 XQ=SUBS(XQ,DOW(DATE())*2-1,2) *以上是得到年月日星期的字符数据 ?今天是:+YY+年+MM+月+DD+日,星期+XQ *以上为程序主体部分 SET TALK ON RETURN 3.保存文件并关闭程序编辑界面(Ctrl+W) 4.在命令窗口输入运行程序的命令: DO SX1 例:编写程序SX2.PRG完成如下操作: 打开表DJKS,显示所有性别为男且成绩合格的记录,将结果保存在表文件NAN.DBF中,关闭所有表文件 *SX2.PRG SET TALK OFF CLOSE DATA ALL 程序中有表文件打开 SET SAFE OFF CLEAR *以上是环境设置 USE DJKS DISP FOR 性别=男 AND MIN(笔试,上机)=60 COPY TO NAN FOR 性别=男 AND MIN(笔试,上机)=60 *以上是程序主体 SET TALK ON CLOS DATA ALL SET SAFE ON RETURN 例:上机模拟题第五十套第三题 *PROGZH.PRG SET TALK OFF CLOSE DATA ALL SELE COUNT(DIST DHDW) FROM GNHT INTO ARRAY DH SELE COUNT(DIST GHDW) FROM GNHT INTO ARRAY GH SELE SUM(JHSL) FROM GNHT INTO ARRAY JH UPDA JIEGUO SET NUM=DH WHERE NAME=订货单位数 UPDA JIEGUO SET NUM=GH WHERE NAME=供货单位数 UPDA JIEGUO SET NUM=JH WHERE NAME=订货总数 CLOS DATA ALL SET TALK ON RETURN 例:上机模拟题第九套第三题 要点: SET TALK OFF SET SAFE OFF CLOSE DATA ALL UPDATE SCORE1 SET 总成绩=考试成绩+IIF(三好生,20,IIF(优秀干部,10,IIF(少数民族,5,0))) SELE 学号,总成绩 FROM SCORE1 ORDER BY 2,1 INTO TABLE ZCJ CLOSE DATA ALL SET TALK ON SET SAFE ON RETURN 例:上机模拟题第一套第三题 要点: SET TALK OFF SET SAFE OFF UPDA SCORE SET 学分=IIF(物理=60,2,0)+IIF(高数=60,3,0)+IIF(英语=60,4,0) SELE 学号,学分 FROM SCORE ORDER BY 2,1 DESC INTO TABLE XF CLOSE DATA ALL SET SAFE ON SET TALK ON RETURN 三、简单的输入命令 1.INPUT命令 格式:INPUT [字符表达式] TO 内存变量 功能:当系统执行到本命令时,会等待用户从键盘输入数据,用户可以输入任意合法的表达式。当用户以回