【文章內(nèi)容簡(jiǎn)介】
ndproc PROCEDURE jian para x,y,s s=xy Endproc PROCEDURE cheng para x,y,s s=x*y Return 過(guò)程文件 使用方法 : Set proc to general X=100 Y=200 S=0 Do jia with x,y,s ?s Do jian with x,y,s ?s …… Set proc to 16 SET TALK OFF SET PROC TO general N=10 S=0 FOR M=1 TO N X=M DO jc amp。amp。求階乘 DO sum amp。amp。求和 ENDFOR SET PROC TO RETU PROC jc T=1 FOR F=1 TO X T=T*F ENDFOR X=T RETU PROC sum ?M,S S=S+X RETU 例 :打印出 1!+2!+……+ n!,當(dāng) N=1,2 ……10 時(shí)的值 . *主程序 過(guò)程文件: 17 盡管 FOXPRO向我們提供了 近百個(gè)內(nèi)部函數(shù),但為了完成特定的要求,這些函數(shù)并不夠用,所以 FOXPRO允許用戶(hù)定義屬于自己的有特殊功能的專(zhuān)用函數(shù),這種函數(shù)稱(chēng)為 自定義函數(shù) 。 四、自定義函數(shù) 18 ( 1)一個(gè)自定義函數(shù)是一個(gè) 獨(dú)立的命令文件 ,其擴(kuò)展名為 .PRG, 函數(shù)文件與一般命令文件的區(qū)別是函數(shù)命令文件通過(guò)RETURN命令返回一個(gè)函數(shù)值。 四、自定義函數(shù) 一個(gè)自定義函數(shù)有兩種形式: ( 2)一個(gè)自定義函數(shù)是一個(gè) 獨(dú)立的命令模塊 ,放在 過(guò)程文件 中。函數(shù)通過(guò) RETURN命令返回一個(gè)函數(shù)值。 19 子程序文件 …… 過(guò)程 過(guò)程 過(guò)程文件 子程序 函數(shù)文件 函數(shù) 函數(shù) 20 FUNCTION 函數(shù)名 PARAMETERS 參數(shù)表 命令序列 RETURN 表達(dá)式 [ ENDFUNC] 調(diào)用方式 : ? 函數(shù)名 (參數(shù)表 ) 或: 變量名 =函數(shù)名 (參數(shù)表 ) 或: DO 函數(shù)名 WITH 參數(shù)表 自定義函數(shù)的命令格式: 21 PARAMETERS N S=0 I=1 DO WHILE I=N S=S+I I=I+1 ENDDO RETU S