- 1、本文档共132页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第7章 结构化程序设计; VFP两种工作方式
交互工作方式、程序工作方式
程序 是为了完成某项指定的任务而需执行的命令序列。
程序文件 命令序列以一定的结构有序地编排在一起,并以文件的形式存储在磁盘上。
VFP的程序设计方法 面向过程的程序设计、面向对象的程序设计 ; 7.1.1 程序文件的建立;程序文件的建立;程序的注释是非执行部分,格式有三种:
NOTE 注释内容
* 注释内容
[语句] 注释内容;*************************************
* 程序:职工档案管理系统 *
* 作者 :高 路 *
* 日期:2000年 5月 *
* All right reserved *
*************************************
Note 设置系统运行环境
Set talk off 关闭人机对话
Set default to d:\kk 默认工作路径
Set date to ansi 指定日期格式;格式一:RETURN [MASTER] 程序结尾返回
格式二:CANCEL 强制停止程序运行
格式三:QUIT 退出VFP; 往事随风如尘埃洒落在空间的日志里,你的影子无处不在,凄迷的文字诉说着你曾经的故事,不管以后和现在是怎样的难受,爱你的心事永远这样轻盈无体态。 你在寂静夜里印记了某个清晨某个人的过往,桔黄色的云里藏了你所有的清冷,天上的星星在布满薄薄尘土的宇空里叹息,你爱上的只是他笑起来的迷幻。 你在他走之后还一直迷失在他给你的梦幻,你爱上的只是他瞳孔里的太阳,其实并不实在。我看着你在因他心伤而心伤,而你却不知道我在因你的心疼而心疼。眼泪只准在眼眶里打转,拥抱着你,却听到自己的心在因为你而碎了。我爱上的人心里还有另一个人!!! 眼泪落在过去,感情无法飘向未来,春去夏又来,你的心里还是有一个他,虽然他伤害了你,还背叛了你,而你却甘愿为他落泪甚至想放弃生命。你的眼眸一抬全是伤,有对我的愧疚还有对他的忏悔。你愿意彻底与他断绝关系,可是他的一个电话或是一条信息,你还是失魂落魄。 有时我在想做为男人是不是太无能让爱有空隙:身边的女人爱上了另一个男人。不忍责备的永远是她的善良,不能忍受的总是她在心里的背叛。感情总有两种遗憾,一种是相爱了无法相守,一种是相守了却无法再爱得单纯。 她忧郁的眉毛总是在打结; 例2 编写一个程序,用于在tsgl数据库中显示某个学生的借书情况
* (1)从屏幕上输入姓名给xm
* (2)把查找结果放到一个视图中
* (3)再显示该视图的内容
SET SAFETY OFF 视图覆盖时不予提示
CLEAR 清屏
CLOSE ALL 关闭所的文件
OPEN DATABASE tsgl;ACCEPT 请输入您要查找的学生姓名: TO xm
CREATE VIEW e7_2 AS;
SELECT 姓名,书名,借书日期;
FROM student,borrow;
WHERE student.姓名=xm;
AND student.学号=borrow.学号
USE e7_2
LIST; 格式:INPUT [提示信息] TO 内存变量
与ACCEPT相似,区别为能接受任意类型。输入字符串需要定界符,按回车结束。; 例题 编写一程序,用于计算长方形的面积
CLEAR 清屏
CLEAR ALL 清除内存
INPUT 请输入长方形的长: TO a
INPUT 请输入长方形的宽: TO b
?“此长方形的面积为:+LTRIM(STR(a*b))
RETURN; 例题 编写程序,用WAIT接受用户的回答
USE zgda
LOCATE FOR 职称=工程师
DISPLAY 姓名,职称
WAIT 要继续查找吗?(Y/N) TO jx
IF UPPER(jx)=Y
CONTINUE
DISPLAY 姓名,职称
ENDIF
RETURN;示例:输入三个表达式
INPUT “请输入一个日期:” TO S1
INPUT “请输入一个数值:” TO S2
INPUT “请输入一个逻辑值:” TO S3
?S1,S2,S3
示例:输入字符到YY中,限时2秒钟
您可能关注的文档
- 关于如何练字,分享给想练好书法的人.doc
- 护理不良事 件警示教育.ppt
- 计算力学OpenFOAM讲座-基础篇(陈丽萍).ppt
- 讲学:关于社会转型问题[课件].ppt
- 定语从句-中考英语专题复习.ppt
- [宏观经济学]第9讲_经济理论.ppt
- 第一讲俗语谚语歇后语对联.ppt
- 2016年新人教版七年级语文-名著阅读《朝花夕拾》《西游记》.ppt
- 矢量微积分(修改版).ppt
- D11_3幂级数-阿贝尔定理.ppt
- 新的一年工作展望.docx
- 医生年终个人工作的述职报告(3篇).docx
- 2023年消防设施操作员之消防设备中级技能考前冲刺练习题附答案详解.docx
- 2022-2023年环境影响评价工程师之环评技术导则与标准通关练习题包括详细解答.docx
- 2023年中级注册安全工程师之安全生产管理考前冲刺检测卷和答案.docx
- 2023年中级银行从业资格之中级银行管理考前冲刺测试卷提供答案解析.docx
- 2023年公共营养师之二级营养师通关模拟考试试卷附带答案.docx
- 证券分析师之发布证券研究报告业务考前冲刺模拟题库.docx
- 2022-2023年二级建造师之二建建设工程法规及相关知识综合提升测试卷附答案.docx
- 2023年二级建造师之二建机电工程实务通关模拟考试试卷提供答案解析.docx
文档评论(0)