辽宁石油化工大学经济管理学院信管系数据库管理系统课件：第7章 程序设计基础.ppt

辽宁石油化工大学 7．2．2循环结构 例7.10 clear input 请输入一个数：to a store a to ma,mi for i=2 to 10 input 请输入一个数：to a 7．2．2循环结构 if maa ma=a endif if mia mi=a endif endfor ?最大值：,ma ?最小值：,mi 7．2．2循环结构 例7.11*clear open database xsxk use 学生1 in 0 sele 学生1 store 0 to m,w scan for subs(学号,3,2)=03 if 性别=.t. m=m+1 7．2．2循环结构 else w=w+1 endif endscan *clear ?男生人数,m ?女生人数,w close database retu 7．2．2循环结构 例7.12*endfor *?t=,t ****p170-12方法--2p170-12方法--1 t=0 for n=1 to 10 p=1 7．2．2循环结构 例7.14*p171-14 clear for m=3 to 100 step 2 n=int(sqrt(m)) for i=3 to n if mod(m,i)=0 exit endif endfor 7．2．2循环结构 if in ??m endif endfor 7．2．2循环结构 for i=1 to n P=p*i endfor t=t+p endfor ?t=,t 7．3 多模块程序 应用程序一般都是多模块程序，包含多个程序模块。模块是一个相对独立的程序段，它可以被其他模块调用，也可以去调用其他模块。通常，把被其他模块调用的模块称为子程序，把调用其他模块而没有被其他模块调用的模块称为主程序。 将一个应用程序划分成一个个功能相对简单、单一的模块程序，不仅便于程序开发，也利于程序的阅读和维护。 7．3．1模块的定义和调用 过程定义的语法： procedure/function过程名 命令序列 [return[表达式]] [endproc|endfunc] 7．3．1模块的定义和调用 [endproc|endfunc] 命令表示一个过程的结束。若没有此行，找下一个[endproc|endfunc]语句，或者直到到文件尾结束。 当过程执行到return 命令时，控制将转回到调用程序（或命令窗口），并返回表达式的值。如果缺省return命令，则在过程结束处自动执行一条隐含的return 命令。若return 命令不带表达式，则返回逻辑 .t.。 过程文件的建立用modify command命令。扩展名为.prg。 7．3．1模块的定义和调用 过程文件里只包含过程，这些过程能被任何其他程序调用。但在调用过程文件中的过程之前首先要打开过程文件。命令格式为： set proc to [过程文件1][，过程文件2,…]][additive] 可以打开一个或多个过程文件。一旦一个过程文件被打开，那么该过程文件中的所有过程都可以被调用。如果选用additive ，那么在打开过程文件时，并不关闭原先已经打开的过程文件。 7．3．1模块的定义和调用 当使用不带任何文件名的set proc to 命令，将关闭所有打开的过程文件。如果不想一并关闭所有过程文件，而要关闭个别文件，可以用下面命令： release procedure 过程文件1[，过程文件2,…] 存放在命令文件里的过程主要主要被命令文件中的代码所调用，但是也可以被其他程序所调用。当命令文件处于执行（打开）状态时，包含在其中的过程就可以被直接调用，如果命令文件不处于打开状态，那么要调用其中的过程，就需要用set proc 命令先打开此命令文件。 7．3．1模块的定义和调用 模块调用的格式： 格式1：使用do 命令 do 文件名|过程名 格式2：在名字后加一对小括号 文件名|过程名（） 7．3．2 参数传递 模块程序可以接收调用程序传过来的参数，并能够根据接收到的参数控制程序流程或对接收的参数进行处理，从而大大提供模块程序功能设计的灵活性。 接收参数命令有：parameters 和lparameters，格式： parameters 形参变量1[，形参变量2,…] lparameters 形参变量1[，形参变量2,…] 7．3．2 参数传递 parameters 命令声明的形参变量被看作是模块程序中建立的私有变量, lparameters命令声明的形参变量被看作是模块程序中建立的局部变量。 调用模块程序的格式为: 格式1: do 文件名|过程名 with 参数1[,参数2,…]