vf子程序、函数与过程.ppt

  1. 1、本文档共36页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
例 写出下列程序的输出 set talk off x=1 y=3 do sub with x,(y),5 ? x,y return procedure sub parameter a,b,c a=a+b+c b=a+b-c return clear store 3 to x store 5 to y do plus with x ,y ?x,y procedure plus parameters a1,a2 a1=a1+a2 a2=a1+a2 endproc 例 写出下列程序的输出 do plus with (x) ,(y) plus (x , y) do plus with (x ,y) 错 plus x , y 错 *主程序:MAIN.PRG SET?TALK?OFF CLEAR? S=0 DO?SUB?WITH?10,S ?S RETU *子程序SUB.PRG PARAMETERS?D1,D2 D1=D1+D1 D2=D1*2 RETURN 作业与实验 1、利用子程序实现 S=A!+B!+C! 2、运行以下程序,写出结果: public x,y procedure p1 procedure p2 x=10 private x x=aaa y=100 x=50 y=bbb do p1 local y return ?x,y do p2 ?x,y 3、写出程序结果, 并上机验证 SET TALK OFF x=30 y=20 z=10 DO P WITH x, (y), z+30 ?x,y,z RETURN PROCEDURE P PARAMETERS a,b,c a=a+b b=b+c c=c+a RETURN SET TALK OFF INPUT xx= to xx yy= ( ) ?xx,yy SET TALK ON RETURN FUNCTION fun PARAMETER x ( ) CASE x1 y=x*x CASE y=2*x-1 CASE x10 y=3*x-11 ENDCASE RETURN ( ) 4、利用子程序计算: 完成程序,并上机验证。 7.5 程序的模块化 模块化程序设计思想 子程序、函数、过程 内存变量的作用域 调用子程序时的数据传递 7.5.1 子程序、过程和函数 应用程序一般都是多模块程序,包含多个程序模块。模块是相对独立的一个程序段,他可以被其它模块调用,也可以去调用其他的模块。被其它程序调用的模块称为子程序。调用其它模块而没被其它模块调用的模块称为主程序。 子程序、过程、函数。 一、子程序定义形式: [PROCEDURE|FUNCTION子程序名] [PARAMETERS 形参] 命令序列 ? ?[RETURN[表达式]] [ENDPROC|ENDFUNC] 说明: 1、 PROCEDURE或FUNCTION 命令表示一个子程序的开始,并命名子程序名。通常称PROCEDURE为过程,FUNCTION为自定义函数。 如果缺省该命令表明子程序是一个独立的程序文件;若写上该命令,表明子程序通常要放在某程序文件代码后面。独立的子程序文件同样用MODIFY COMMAND命令来建立、修改和保存,扩展名默认为 .PRG。 一、子程序定义形式: [PROCEDURE|FUNCTION子程序名] [PARAMETERS 形参] 命令序列 ? ?[RETURN[表达式]] [ENDPROC|ENDFUNC] 说明: 2、ENDPROC或ENDFUNC 表示一个子程序的结束。如果缺省,子程序自动结束于文件结尾或下一条PROCEDURE 或 FUNCTION命令。 3、如果调用子程序时需引用参数,则在子程序的第一行使用PARAMETERS 形参命令,否则可省略。 一、子程序定义形式: [PROCEDURE|FUNCTION子程序名]

文档评论(0)

wuyoujun92 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档