第2章結構化程序設計

1、第第 2 章章 結構化程序設計 第一講 重點：重點： 命令文件的建立與執(zhí)行命令；常用的輸入、輸出命令 難點：難點： 帶參數的命令文件的執(zhí)行 教學目的：教學目的： 掌握命令文件的建立與執(zhí)行命令；常用的輸入、輸出命令 教學方法和手段：教學方法和手段： 理論講授、多媒體演示和實際操作相結合。 理論講解主要以講授為主，輔以設問、引導、啟發(fā)、提問等教學方法。 演示主要以案例驅動教學方法為主，輔以設問、引導、啟發(fā)、提問等教學方法。 學生上機操作以任務驅動教學方法為主。 教學過程：教學過程： 一、首先復習上次課的主要內容。 復習主要以提問、設問等方式進行。提問時使用具體的例子。 二、通過引論，導入新課。 2

2、.1.1 命令文件的建立與執(zhí)行 1. 命令文件概念 程序是為了完成一定任務，由若干條可執(zhí)行的命令或語句組成的序列。而用于存儲這些由命令組成 的文件，即為命令文件，又稱為程序文件。命令文件的擴展名為 prg。 2. 命令文件的建立 建立程序文件可以用任何一種字處理的文本編輯器進行（如 Windows 自帶的記事本） 。 下面我們將介紹如何調用 VFP 內嵌的編輯器建立程序文件。 格式：Modify command |? Modify file |? 功能：進入程序編輯器，創(chuàng)建程序文件。 說明： 可選項|？用于設置要編輯的文件名。 在文件名前可指明路徑，若未指明則默認路徑為當前驅動器的當前目錄。如

3、執(zhí)行命令 Modify command c:shuexam1，程序文件 exam1.prg 儲存在 c 盤的子目錄 shu 下，而執(zhí)行 Modify file exam2.prg 后，程序文件 exam2.prg 將儲存在當前驅動器的當前目錄中。 例 1 編寫程序 exam1.prg，計算表達式 a*b,ab 的值，并在屏幕上顯示出結果，其中 a 的值為 3，b 的值為 5。 程序內容如下： set talk off a=3 b=5 ? a*b ? ab set talk on 在命令窗口中輸入 modify command exam1 或輸入 modify file exam1.prg 即可

4、進入到程序編輯窗口， 輸入程序內容后，按下 Ctrl+w 組合鍵保存，就將 exam1.prg 程序存入到磁盤。我們就在計算機上建立了 一個 exam1.prg 程序文件。 3. 程序文件的執(zhí)行 當一個程序文件建立后就可以運行了。運行 VFP 程序的命令格式如下： 格式：Do with 功能：執(zhí)行指定的程序。 說明： 若是省略程序文件的擴展名，則系統默認其擴展名為 prg。 命令中的可選項with用于執(zhí)行帶參數的程序。 在某一個程序文件中調用其他命令文件作為子程序也使用 Do 語句。 創(chuàng)建程序命令：modify command exam2 程序內容如下： clear set talk off

5、use student list for 總分320 fields 學號,姓名,總分 off use set talk on 建立該程序后，執(zhí)行命令為：do exam2 則屏幕上將會顯示出： 學號 姓名 總分 韓偉娟 339.0 例 3 編寫程序 exam3 求三角形的面積。 創(chuàng)建程序命令：modify command exam3 程序內容如下： parameters a,b &定義了形式參數 a,b area=(a*b)/2 ? 三角形面積為：,area 建好 exam3.prg 文件后，執(zhí)行下述命令便可求出一個三角形面積。 r=3 do exam3 with r,2*r 程序運行結果如下：

6、 三角形面積為：9 在 exam3 程序中，parameters 語句后跟參數表，這些參數稱為形式參數。 執(zhí)行命令中列在 with 后的參數稱為實在參數。實在參數和形式參數的個數、類型與排列次序必須完 全相匹配。 2.1.2 常用命令 關于表操作的基本命令，在前面我們已經做過一些詳細的介紹，本小節(jié)將從程序設計的角度出發(fā)， 對一些在程序中常用的基本命令作具體的說明。 1. 非格式化輸入語句 （1）字符串輸入命令 Accept 格式：Accept to 功能：在屏幕上顯示提示信息，等待用戶鍵入一串字符，并把輸入的字符串賦值給指定的內存變量。 說明： 是一個字符型的表達式，若省略則不顯示任何提示信息

7、。 內存變量是一個已定義或未定義的字符型內存變量。 用戶從鍵盤上輸入字符串時，不必輸入字符定界符，只要直接輸入字符串中的字符即可。字符輸 入完后，按回車鍵表示結束，回車鍵不作為字符串中的字符。若直接按回車鍵，則獲得空字符串。 例 4 執(zhí)行下述語句： accept 請輸入性別： to sex 此語句的功能是在屏幕上顯示“請輸入性別：” ，并將用戶輸入的內容存放到內存變量 sex 中。若用 戶性別是“男” ， 則用戶需鍵入男，再按一次回車鍵即可。 （2）數據輸入命令 Input 格式：Input to 功能：在屏幕上顯示提示信息，等待用戶鍵入數據，將鍵入的值賦給指定的內存變量。 說明： 提示信息是

8、一個字符型的表達式，若省略 則不顯示任何提示信息。 內存變量是一個已定義或未定義的變量。 用戶輸入數據時，應注意其類型。輸入的數據可以是常數，也可以是表達式。輸入不同類型的常 數有不同的要求。 字符型常數：必須用字符定界符（引號，方括號）括住，輸入完后，按回車鍵表示結束。其中字符 定界符和回車鍵不作為字符串中的內容。 數值型常數：可直接輸入整數或實數，輸完后，按回車鍵表示結束。 貨幣型常數：應在數值前加$符號，例$123.12。 日期型常數：必須用日期定界符（大括號）括住，并且年月日的格式必須與當前系統要求的格式相 同，同時輸入的日期必須為有效日期。輸完后，按回車鍵表示結束。 邏輯型常數：必須

9、用小數點括住，數據輸完后，按回車鍵表示結束。 例 5 執(zhí)行下述語句： input 請輸入性別： to sex 此語句的功能是在屏幕上顯示“請輸入性別：”并將用戶輸入的內容存放到內存變量 sex 中，若用 戶性別是“男” ， 則需鍵入男，再按回車鍵即可。 Input 請輸入你的考試成績： to cj 此語句的功能是在屏幕上顯示“請輸入你的考試成績：”并將用戶輸入的數值存放到內存變量 cj 中。 若用戶考試成績?yōu)?83，則用戶只需鍵入83，再按回車鍵即可。 input 請輸入你的出生日期： to birthday 此語句的功能是在屏幕上顯示“請輸入你的出生日期：”并將用戶輸入的內容存放到 birt

10、hday 中。 若用戶出生日期為 1978 年 7 月 3 日，則在嚴格日期格式下用戶需鍵入1978/07/03，在通常日期格 式下用戶需鍵入07/03/78，再按回車鍵即可。 （3）等待命令 Wait 格式：Wait to window nowait timeout 功能：暫停程序的執(zhí)行，顯示提示信息，并等待用戶鍵入一個字符或單擊鼠標。 說明： 用戶可通過來指定顯示的提示內容，否則將顯示系統設定的提示信息： “按任意鍵繼續(xù)” 可選項to，用于將輸入的一個字符賦值給指定的內存變量。 可選項window nowait用于將提示信息以系統信息窗口的形式出現在屏幕畫面的右上角。而帶 有 nowait

11、 選項的 wait 語句，并不會暫停程序的執(zhí)行，僅僅在屏幕右上角顯示提示信息。此時只須移動一 下鼠標或按下任意鍵，這個系統信息窗口便會消除。需要注意的是 nowait 必須和 window 可選項合用才 會產生效果。 可選項timeout，是指定 Wait 語句最多暫停程序執(zhí)行多少秒，若在指定的秒數時 間內，用戶沒有按任意鍵或單擊鼠標，則到指定秒數后，wait 語句便會自動終止并返回空串，重新繼續(xù) 執(zhí)行程序。 例 6 執(zhí)行下述語句： wait 看清后，按任意鍵，程序將繼續(xù)運行 timeout 5 此語句的功能是在屏幕上顯示“看清后，按任意鍵，程序將繼續(xù)運行”的提示信息，在 5 秒內等待 用戶按

12、鍵或單擊鼠標終止 wait 語句的執(zhí)行，繼續(xù)執(zhí)行程序；5 秒后 wait 語句自動終止，程序重新繼續(xù)運 行。 wait 你要找的記錄沒有找到！ window nowait 此語句的功能是在屏幕右上角顯示系統信息窗口，窗口內容為“你要找的記錄沒有找到！”程序并 不終止運行。等用戶按鍵或移動鼠標時，信息窗口自動消失。 wait 繼續(xù)查找請按 Y 鍵，否則請按 N 鍵！ to choose window 此語句的功能是在屏幕右上角顯示系統提示信息窗口，窗口內容為“繼續(xù)查找請按 Y 鍵，否則請按 N 鍵！” ，程序終止執(zhí)行，等待用戶按鍵，并將鍵入的一個字符賦值給內存變量 choose。 總結：Inpu

13、t 語句可以輸入字符型、數值型、貨幣型、邏輯型和日期(時間)型的數據， Accept 和 Wait 語句則是專門輸入字符型數據的。其中 Wait 語句，常用于要求用戶快速響應的場合， 用戶只需要按某個鍵就可繼續(xù)程序的運行。 2. 非格式化輸出語句 前面已經介紹過兩種非格式化輸出語句，即?和?，在這里就不再重復了。下面將介紹兩個文本輸出 命令。 格式 1： | 功能：將一行文本信息的內容按書寫形式的原樣顯示出來。 說明： 與的差別在于前者輸出的文本行前帶有回車換行符，就是在下一行的第一列開始輸出；而后者不 帶，文本行在當前光標位置開始輸出。 格式 2：Text Endtext 功能：可以進行多行

14、文本的輸出。 說明： 它只能在程序中使用，并且必須成對使用。 例 7 下面有 3 個文本輸出程序，它們運行的結果是相同的。 modify command exam7a 您好, 歡迎你光臨! 今天天氣真好! modify command exam7b 您好,歡迎你光臨! 今天天氣真好! modify command exam7c text 您好,歡迎你光臨! 今天天氣真好! endtext 分別運行這 3 個程序，都會在屏幕上顯示出下列內容： 您好,歡迎你光臨! 今天天氣真好! 3. 格式化輸出語句 格式： say picturefunction size, 功能：在屏幕指定位置按照指定格式輸出

15、表達式。 說明： 例 8 執(zhí)行下述語句： 11,12 say welcome home ! function! 11,12 say welcome home ! picture! 11,12 say welcome home ! picture! 11,12 say welcomehome! size 2,10 4. 格式化輸入語句 格式： get picturefunction size, default range, valid when Read save cycle timeout 功能：在屏幕指定位置按照指定格式輸入數據，它必須與 Read 語句配合使用，用 Read 命令激活當 前

16、所有的 Get 變量。 例 9 執(zhí)行下述語句： 12,13 get age default 0 read 可在屏幕第 12 行第 13 列輸入一個數值，并把這個數值賦給變量 age，因為 age 沒有定義，所以在 get 語句中有一個 default 子句對 age 變量進行定義賦值。又因為賦給 age 的初值為數值 0，所以用戶在輸 入數據時，只能輸入數值型的數據，而不能是其他的類型。 上面介紹的格式化輸入輸出語句，也可聯合使用。 格式： say picturefunction get picturefunction default range, size, validwhen 功能：從屏幕

17、的指定位置開始顯示表達式的值，空一格后反相顯示變量的值。當執(zhí)行 Read 語句時， 光標出現在變量對應的反相區(qū)并暫停程序的執(zhí)行，等待用戶輸入一個值并把該值賦予 get 后的變量。 例 10 執(zhí)行下述語句： xm= 11,12 say 請輸入您的姓名： get xm read 則在屏幕第 11 行，第 12 列顯示“請輸入您的姓名：”并在其后等待用戶輸入字符串，并將輸入內 容賦值給 xm。 5. 其他語句 （1）注釋語句 為了方便用戶對程序的閱讀，VFP 提供了一種特殊的語句注釋語句，對程序語句做出解釋說明。 注釋語句不參與程序的執(zhí)行，只有說明解釋功能。注釋語句有兩種，分別是： 格式 1：* 功

18、能：該行為注釋行。 格式 2：& 功能：該注釋符后的內容為注釋內容。 說明： 這兩個注釋符均可對程序語句做出解釋，但*注釋符為行注釋符，用在一行的行首，表示這一行為注 釋行；而&用在命令行后，僅僅對該行語句做出解釋。 6. 狀態(tài)設置命令 （1）會話開關 格式：Set talk on|off 功能：設置命令執(zhí)行的結果是否及時反饋顯示出來。 （4）屏幕顯示設置 格式：Set console on|off 功能：鍵盤輸入的內容是否在屏幕上顯示。 （5）系統保護狀態(tài)設置 格式：Set safety on|off 功能：用于控制在文件或數據重寫時或刪除前是否發(fā)出警告。 （6）Escape 鍵終止程序運行

19、設置 格式：Set escape on|off 功能：用于設置 Esc 鍵能否中斷程序運行。 （7）設置默認路徑 格式：Set default to 功能：設置缺省路徑時的默認值。 例 12 若當前盤當前路徑為 c:VFP，則： modify command p1 &在 c:VFP 目錄下創(chuàng)建 p1.prg 文件 set default to d:sj &設置缺省路徑為 d:sj modify command p2 &在 d:sj 目錄下創(chuàng)建 p2.prg 文件 三、作業(yè)要求 1. 仔細閱讀本節(jié)內容。 2. 上機練習命令文件的建立和執(zhí)行 3. 上機練習常用的輸入、輸出命令。 第二講第二講 順序

20、結構和選擇結構 重重 點：點：選擇結構的三種語句格式理解和使用 難難 點：點：選擇結構的使用 教學目的：教學目的：學會掌握和使用選擇結構的三種語句格式 教學方法和手段：教學方法和手段： 理論講授、多媒體演示和實際操作相結合。 理論講解主要以講授為主，輔以設問、引導、啟發(fā)、提問等教學方法。 演示主要以案例驅動教學方法為主，輔以設問、引導、啟發(fā)、提問等教學方法。 學生上機操作以任務驅動教學方法為主。 教學過程：教學過程： 一、首先復習上次課的主要內容。 復習主要以提問、設問等方式進行。提問時使用具體的例子。 二、通過引論，導入新課。 首先復習一下上次課的主要內容，復習主要以提問方式進行，然后導入新

21、課。 提問時使用具體的例子。 2.2.1 順序結構 按順序結構組織程序，只需先把處理過程的各個步驟詳細列出，然后把有關命令按照處理的邏輯順 序自上而下排列起來便可。上一節(jié)給出的例題就是按順序結構組織程序的。 例 13 編程顯示表 student.dbf 中姓王的學生記錄。 modify command exam13 程序內容如下： clear use student list for 姓名=王 use 例 13 即為一個順序結構的程序。 2.2.2 選擇結構 選擇結構能根據指定條件和當前值在兩條或多條程序路徑中選擇一條執(zhí)行，因此在一個程序中便能 處理多種情況的復雜問題。VFP 提供 3 種格式

22、的選擇結構。1. 單一選擇 格式：If Endif 功能：條件取值為“真” ，執(zhí)行命令序列；條件取值為“假” ，命令序列就不執(zhí)行。 說明：If 和 Endif 必須成對出現，相互匹配。 例 14 單一選擇結構示例。 Modify command exam14 程序內容如下： clear wait 是否退出？（Y/N）： to a &變量 a 識別用戶是否退出 if upper(a)= Y &upper 函數把小寫字母轉換為大寫字母 wait 您選擇了退出，現在就要退出 Visual FoxPro！ timeout 5 quit endif 2. 雙重選擇 格式：If Else Endif 功能

23、：根據條件的取值在與這兩條路徑中選擇一條執(zhí)行。 例 15 求圓的面積和周長。通過鍵盤輸入半徑的值，當半徑大于等于 0，則輸出圓的面積和周長，當 半徑小于 0，則輸出提示信息“輸入值無效” 。 程序內容如下： set talk off input 請輸入圓的半徑值： to r if r=0 mj=3.14*r*r zc =2*3.14*r ?圓的面積為： ,mj ?圓的周長為： ,zc else ?輸入值無效 endif set talk on 例 16 編寫程序完成以下功能：根據從鍵盤輸入的學號在 student 表中進行查找，找到則顯示該學生 的學號，姓名，總分；找不到，則顯示“無此學號”

24、。 程序內容如下： use student accept 請輸入學號： to xh locate for 學號=xh if found( ) ?學號:+學號 ?姓名:+姓名 ?總分:,總分 else ?無此學號！ endif use 3. 多重選擇 格式：Do case case case . case otherwise Endcase 功能：自上而下依次判斷命令中列出的條件，只要找到某一條件為“真” ，就執(zhí)行與之相關的命令序 列，余下的條件便不再判斷，有關的命令也不執(zhí)行。在沒有一個條件取值為“真”時，若有 otherwise 可 選項，就執(zhí)行命令序列+1，否則什么也不做?？梢娫诒姸嗟拿钚?/p>

25、列中，多重選擇最多只選擇執(zhí)行其 中的一個命令序列，也可能一個也不執(zhí)行。 說明： If 與 Endif、Do case 與 Endcase 標志選擇結構的開始與結束，它們必須成對出現。 3 種選擇結構不僅自身可以嵌套，而且還能相互嵌套。 例 編寫程序求下列分段函數的值，x 的值通過鍵盤輸入。 程序內容如下： set talk off y=0 input 請輸入 x 的值： to x do case case x=0 .and. x=5 y=x+1 endcase ?y=, y set talk on 三、作業(yè)要求 1. 閱讀本節(jié)內容，理解書上的例子。 2. 上機驗證書上的例子。 第三講第三講 循

26、環(huán)結構 重重 點：點：循環(huán)結構的三種語句格式理解和使用 難難 點：點：循環(huán)結構的三種語句格式使用 教學目的：教學目的：掌握循環(huán)結構的三種語句格式使用 教學方法和手段：教學方法和手段： 理論講授、多媒體演示和實際操作相結合。 理論講解主要以講授為主，輔以設問、引導、啟發(fā)、提問等教學方法。 演示主要以案例驅動教學方法為主，輔以設問、引導、啟發(fā)、提問等教學方法。 學生上機操作以任務驅動教學方法為主。 教學過程：教學過程： 一、首先復習上次課的主要內容。 復習主要以提問、設問等方式進行。提問時使用具體的例子。 二、通過引論，導入新課。 2.2.3 循環(huán)結構 按循環(huán)結構來組織程序，能夠做到由指定條件的當

27、前值來控制程序中某一部分命令序列的重復執(zhí)行。 VFP 提供了多種循環(huán)結構，它們是當循環(huán)、For-Next 循環(huán)、表文件掃描循環(huán)等等。 1. 當循環(huán) 格式：Do while Loop Exit Enddo 功能：判斷條件的取值，若為“真”就執(zhí)行 Do 與 Enddo 之間的命令序列（稱為循環(huán)體） ，再判斷條 件的取值，重復剛才的過程。一旦條件取值為“假” ，就跳出循環(huán)體轉而執(zhí)行 Enddo 下一條命令。只要條 件取值保持為“真” ，循環(huán)體就會不斷地重復執(zhí)行，流程圖如圖 15.4 所示。 例 20 編寫程序逐條顯示 student 表中的記錄。 程序內容如下： use student do whi

28、le .not. eof( ) display wait windows timeout 2 skip enddo use 例 22 編程計算 1+2+100 的值。 分析：求和是采用累加的方式，從一個初始值出發(fā)，通過循環(huán)累加求出最后的結果。s 用來存放累 加的結果，初值為 0，n 既作為被累加的數據，也作為控制循環(huán)的條件是否成立的變量，初值為 1。 程序內容如下： set talk off s=0 n=1 do while n=100 s=s+n n=n+1 enddo ? 1+2+100=,s set talk on 2. ForNext 循環(huán) 格式：For = to step Exit

29、Loop Endfor | Next 功能：本命令中的內存變量（又稱循環(huán)變量）類似于計數器，它的取值范圍由（初值） 與（終值）確定，通過判斷內存變量的取值是否在指定范圍之中來確定循環(huán)體是否重復執(zhí)行。 例 24 編程用 ForNext 循環(huán)計算 1+2+100 的值。 程序內容如下： set talk off s=0 for i=1 to 100 step 1 s=s+i endfor ? 1+2+100=,s set talk on 例 25 編程統計 100 以內能夠被 3 或 5 整除的數的個數。 程序內容如下： set talk off num=0 for i=1 to 100 if m

30、od(i,3)=0 .or. mod(i,5)=0 num=mun+1 endif endfor ? 100 以內能夠被 3 或 5 整除的數的個數為：,num set talk on 3. 表掃描循環(huán) 格式：Scan forwhile Exit Loop Endscan 功能：對當前表中滿足條件的記錄，依次重復執(zhí)行循環(huán)體。 在數據庫應用程序中，經常要對表中指定的記錄逐個進行某種處理，此時可以使用 VFP 提供的表掃 描循環(huán)命令。 例 26 用 Scan 循環(huán)逐條顯示 student.dbf 中男同學的記錄。 程序內容如下： set talk off use student scan for

31、性別=男 display wait windows timeout 2 endscan use set talk on 以上我們介紹了三種結構，這三種結構在編程中通常是配合使用的。下面以它們混合使用為例進行 說明。 三、作業(yè)要求 1. 課后習題 2，3 2. 上機練習書上的例子和驗證自己編寫的題目。 第四講第四講 綜合程序設計、過程和函數程序設計 重重 點：點：程序設計中三種結構的嵌套使用和過程和函數的定義和調用 難難 點：點：過程和函數程序設計 教學目的：教學目的：掌握程序設計中三種結構的嵌套使用，掌握過程和函數的定義和調用，會設計簡單的綜合 程序。 教學方法和手段：教學方法和手段： 理論講

32、授、多媒體演示和實際操作相結合。 理論講解主要以講授為主，輔以設問、引導、啟發(fā)、提問等教學方法。 演示主要以案例驅動教學方法為主，輔以設問、引導、啟發(fā)、提問等教學方法。 學生上機操作以任務驅動教學方法為主。 教學過程：教學過程： 一、首先復習上次課的主要內容。 復習主要以提問、設問等方式進行。提問時使用具體的例子。 二、通過引論，導入新課。 程序應用舉例 自定義函數 系統將一些經典的通用算法編成一個個程序提供給用戶使用，這就是所謂系統函數。用戶也可以根 據自己的需要編寫相應的函數即自定義函數。下面我們將介紹如何自定義函數。 1. 自定義函數的定義 格式：Function parameters

33、return 功能：定義一個函數。 說明： Function 此項是定義函數名稱，可選項parameters是函數中參數傳遞的語句， 每個參數之間用逗號隔開，它們又可稱為形式參數。return是將處理后的值返回給調用程序使 用，一個函數必須在程序運行結束時返回一個函數值，這是函數的基本特點。若函數不提供返回值，則 VFP 使用.T.作為默認返回值。 例 31 建立自定義函數 sm(n)，其功能是計算 1+2+3+n 累加和。 數值求和是計算機程序設計中的主要運算，求和是采用累加的方式，從一個初始值出發(fā)，通過循環(huán) 累加求出最后的結果。 function sm parameters n s=0 k

34、=1 do while k=n s=s+k k=k+1 enddo return s 2. 自定義函數的調用 上面兩個例子就是兩個自定義函數，對于自定義函數我們應該如何調用呢？自定義函數的調用和系 統函數的調用基本相同，下面舉例說明。 例 32 利用自定義函數求矩形面積。 set talk off. ? c=3, k=4, area=, area(3,4) ? c=4, k=6, area=, area(4,6) set talk on function area parameters h,w s=h*w return s 在該程序中定義了一個函數 area( )。其中有兩處調用到此函數 ar

35、ea(3,4)和 area(4,6)。在執(zhí)行對函數的 調用時，實在參數將代替函數中的形式參數。需要注意的是形式參數必須是合法的內存變量名，實在參 數必須與形式參數的個數、類型、順序完全一致。實在參數可以是常量，也可以是已賦值的合法內存變 量。這些變量名即使與形式參數的名字相同，也不影響程序的運行。 2.3.2 過程 1. 過程的定義 在一個復雜的管理系統中，有些工作往往要反復執(zhí)行多次，如某種格式的報表多次打印、某個計算 過程多次使用等等。解決這個問題的方法可以采用循環(huán)語句來實現，但當這個需要重復計算加工的過程 每次重復加工的對象不同時，或在程序的不同地方重復時，有時用循環(huán)的方法就很難實現，因此

36、 VFP 提 供了一種比較有效的方法過程。過程和自定義函數類似，它和函數不同之處是：在過程結束后，不 必返回值。 格式：Procedure parameters return 功能：定義一個過程。 例 34 編一個過程 rq，該過程的功能為將一個XX/XX/XX形式的日期格式轉換為 XXXX 年 XX 月 XX 日形式并顯示出來。 procedure rq parameters r y=year(r) m=month(r) d=day(r) a=str(y,4)+ 年 + str(m,2) + 月+ str(d,2) + 日 ?a return 2. 過程的調用 過程調用可用下面的格式： 格式：Do with 功能：中斷當前程序的執(zhí)行，執(zhí)行指定過程中的語句。 說明： 當程序執(zhí)行到此語句時，便會停下來，轉去執(zhí)行中的語句，直至執(zhí)行完畢，再重新返回到 主程序，去執(zhí)行 Do 語句下面的語句。 若指定的過程中帶有形式參數，則在調用該過程時，應加上with選項，其中 with 后跟的 參數為實在參數，它應與過