【正文】 E TO 過程文件名 命令功能：打開指定的過程文件名。 主程序： * SET PROCEDURE TO l813 CLEAR DO MIANJI DO TIJI SET PROCEDURE TO 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 過程文件： * PROCEDURE MIANJI INPUT 圓的半徑： TO R S=*R*R ?圓的半徑： ,R, 圓的面積： ,S RETURN PROCEDURE TIJI INPUT 球的半徑： TO k V=*k*k*k ?球的半徑： ,k, 球的體積： ,V RETURN 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 Visual FoxPro ，這些函數(shù)能完成若干復(fù)雜的功能。 接受參數(shù)語句格式： PARAMETERS 參數(shù)表 接受參數(shù)語句功能：接收調(diào)用命令中相應(yīng)的參數(shù)值。 接受參數(shù)語句格式： PARAMETERS 參數(shù)表 接受參數(shù)語句功能：接收調(diào)用命令中相應(yīng)的參數(shù)值。在 Visual FoxPro ，若以變量的作用域來分，內(nèi)存變量可分為公共變量、私有變量和局部變量三類。一旦建立它模塊程序運行結(jié)束，這些私有變量將自動清除。 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 例 18：公共變量、私有變量、局部變量及其作用域 * SET PROCEDURE TO l818 PUBLIC X1 LOCAL X2 STORE 4 TO X3 ?主程序中 … ?X1=,X1 ?X2=,X2 ?X3=,X3 DO l817 RETURN 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 過程文件： * PROCEDURE l818 ?子程序中 … ?X1=,X1 ?X3=,X3 RETURN 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 隱藏變量 PRIVATE 開發(fā)程序時，主程序與子程序不一定是同一人來設(shè)計，編寫子程序的人不可能對主程序中用到的變量了解得非常清楚。 命令格式： PRIVATE 內(nèi)存變量表 命令功能：該命令不是建立內(nèi)存變量，而是隱藏指定的在上層模塊中可能已經(jīng)存在的內(nèi)存變量，使得這些變量在當(dāng)前模塊程序中暫無效。 模塊化：按適當(dāng)?shù)脑瓌t把一個情況復(fù)雜、規(guī)模較大的程序系統(tǒng)劃分為一個個較小的、功能相關(guān)而又相對獨立的模塊的過程。 子程序與主程序的關(guān)系：是一種調(diào)用和被調(diào)用的關(guān)系。 Visual FoxPro ，這些函數(shù)能完成若干復(fù)雜的功能。而發(fā)生什么事件則要看用戶的操作。 設(shè)計程序時可以編制一組命令序列完成一個模塊功能，在一個模塊中又可以編制一個程序段作為反復(fù)子程序調(diào)用，還可以把一組具有特殊功能的程序段定義為函數(shù)，系統(tǒng)提供了許多函數(shù)，用戶也可以自定義函數(shù)。 :31:1101:31Mar237Mar23 1故人江海別，幾度隔山川。 2023年 3月 上午 1時 31分 :31March 7, 2023 1行動出成果，工作出財富。 01:31:1101:31:1101:313/7/2023 1:31:11 AM 1成功就是日復(fù)一日那一點點小小努力的積累。 2023年 3月 7日星期二 上午 1時 31分 11秒 01:31: 1楚塞三湘接，荊門九派通。 , March 7, 2023 閱讀一切好書如同和過去最杰出的人談話。勝人者有力，自勝者強。 2023年 3月 7日星期二 1時 31分 11秒 01:31:117 March 2023 1一個人即使已登上頂峰，也仍要自強不息。 2023年 3月 7日星期二 上午 1時 31分 11秒 01:31: 1最具挑戰(zhàn)性的挑戰(zhàn)莫過于提升自我。 :31:1101:31Mar237Mar23 1越是無能的人，越喜歡挑剔別人的錯兒。 2023年 3月 7日星期二 1時 31分 11秒 01:31:117 March 2023 1空山新雨后，天氣晚來秋。 01:31:1101:31:1101:31Tuesday, March 7, 2023 1不知香積寺，數(shù)里入云峰。 上午 1時 31分 11秒 上午 1時 31分 01:31: 沒有失敗，只有暫時停止成功！。 :31:1101:31:11March 7, 2023 1他鄉(xiāng)生白發(fā)，舊國見青山。 , March 7, 2023 雨中黃葉樹，燈下白頭人。 用戶通過編制程序命令完成一定任務(wù)，這組命令被存放在程序文件中，運行程序時，系統(tǒng)會按照一定的次序自動執(zhí)行包含在程序文件中的命令。 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 【項目總結(jié)】 面向?qū)ο蟮某绦蛟O(shè)計其思想是面向?qū)ο螅丛O(shè)計的主要任務(wù)在于描述對象。程序中至少應(yīng)有一個主程序，可以有一個或若干個子程序?？梢允亲映绦?、過程或自定義函數(shù)。一旦當(dāng)前模塊程序運行結(jié)束返回上層模塊時，那些被隱藏的內(nèi)存變量就自動恢復(fù)有效性，并保持原有的取值。為了避免這個問題，可以在子程序中使用 PRIVATE命令來隱藏主程序中可能用到的變量。當(dāng)建立它的模塊程序運行結(jié)束時，局部變量自動釋放。 例如： PUBLIC X， Y， C（ 10） 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 在程序中直接使用（沒有用 PUBLIC 和 LOCAL事先聲明）而由系統(tǒng)自動隱含建立的變量都是私有變量。一個變量除了類型和取值之外，還有一個重要的屬性就是它的作用域。 主程序： * CLEAR INPUT 請輸入圓的半徑： TO r s=0 DO z816 WITH r,s ?圓的面積是： ,s RETURN CLOSE PROCEDURE 子程序： * parameters x,y y=*x*x ?y RETURN 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 調(diào)用子程序和函數(shù)時，常常需要進行數(shù)據(jù)傳遞。 自定義函數(shù)命令格式： FUNCTION 函數(shù)名（變量名） 語句序列 ENDFUNC 自定義函數(shù)命令功能：用戶自己定義一個函數(shù) 例 14：利用自定義函數(shù)計算 X=A*A+B*B SET TALK OFF ？ MYF（ 4,6） FUNCTION MYF(M,N) K=M*M+N*N RETURN K ENDFUNC 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 例 15：利用自定義函數(shù)計算 1+2+3…+100 的和 ?add(100) function add(x) s=0 for i=1 to x s=s+i endfor return s endfunc 項目 8 程序設(shè)計初步 任務(wù) 子程序、過程與自定義函數(shù)設(shè)計 調(diào)用子程序和函數(shù)時，常常需要進行數(shù)據(jù)傳遞。 關(guān)閉過程文件 命令格式： CLOSE PROCEDURE 命令功能：關(guān)閉已打開的過程文件。當(dāng)程序發(fā)展較大時，不便于管理和使用，為了克服這個缺點，可以把多個子程序合并成一個文件，而各個子程