vfp數(shù)據(jù)庫(kù)及程序設(shè)計(jì)第6章程序設(shè)計(jì)及過(guò)程基礎(chǔ)-資料下載頁(yè)
2025-02-16 01:31本頁(yè)面
【正文】 RifR0thenArea=pi()*R*R?圓的面積為 Area=+Str(Area,10,2)elsemessagebox(圓的半徑必須大于 0)endifEndproc內(nèi)部過(guò)程 (2)ClearSetProcedureToMyProcDoGetAreaSetProcedureToProcedure GetAreainput Input R= to Rif R0 thenArea=pi()*R*R?圓的面積為 Area=+Str(Area,10,2)elsemessagebox(圓的半徑必須大于 0)endifEndproc參數(shù)傳遞? 在過(guò)程中接收參數(shù)的命令：– 命令格式 1： PARAMETERS形參變量 1[,形參變量 2,…]– 命令格式 2： LPARAMETERS形參變量 1[,形參變量 2,…]? 說(shuō)明 :– PARAMETERS語(yǔ)句只能在過(guò)程中使用，且必須作為過(guò)程中 PROCEDURE語(yǔ)句后的第一條可執(zhí)行語(yǔ)句。– 形參的數(shù)目不能少于實(shí)參的數(shù)目，多余的形參變量初值為邏輯假 .F.，形式參數(shù)與實(shí)在參數(shù)要類型對(duì)應(yīng)一致– PARAMETERS中形式參數(shù)只能是變量，且為私有變量， LPARAMETERS中形式參數(shù)為局部變量，過(guò)程結(jié)束后，即被清除。調(diào)用參數(shù)傳遞? （ 1）調(diào)用程序向被調(diào)用過(guò)程傳遞參數(shù)的命令：– 命令格式 1： DO過(guò)程名 WITH實(shí)參 1[,實(shí)參 2,…]– 命令格式 2： 過(guò)程名 WITH實(shí)參 1[,實(shí)參 2,…]? 說(shuō)明 :– ① DOWITH語(yǔ)句中的參數(shù)也叫實(shí)參– ② 實(shí)參可以是任何類型的常量、變量和表達(dá)式，有多個(gè)參數(shù)時(shí)，各參數(shù)之間用逗號(hào)分隔。– ③ 若參數(shù)表中的內(nèi)存變量與庫(kù)文件的字段名相同時(shí)，則內(nèi)存變量前應(yīng)冠以 m，以區(qū)別同名字段變量，否則字段變量?jī)?yōu)先于內(nèi)存變量。 – ④ 參數(shù)表中的內(nèi)存變量必須先定義或賦值才能使用。– ⑤ 采用命令格式 1，實(shí)參是常量，按值傳遞，即把實(shí)參的值傳給形參；實(shí)參是變量，按引用傳遞，即把實(shí)參的地址傳給形參；– ⑥ 采用命令格式 2，默認(rèn)情況下都以按值方式傳遞參數(shù)，如果實(shí)參是變量，可以通過(guò)命令 SETUDFPARMS重新設(shè)置參數(shù)傳遞的方式。求 N!的過(guò)程ClearInput請(qǐng)輸入 N=ToNF=1DoGetJCWithN,F?Str(N)+!=,FProcedureGetJCParametersN,FF=1fori=1tonF=F*INextEndProc參數(shù)過(guò)程示例*子程序 ProcedureCalcAreaPARAMETERSR,SS=*R*RRETURN*主程序 ,S=0SetProcedureToINPUT半徑 =TOXDOCalcAreaWITHＸ ,S?“圓面積 =,SSetProcedureTo自定義函數(shù)? 語(yǔ)法FUNCTION函數(shù)名 命令序列 [RETURN[表達(dá)式 ]][ENDFUNC]? 調(diào)用– 函數(shù)與程序在一個(gè)文件中函數(shù)名 (參數(shù) )– 函數(shù)與程序在不同的文件中SetProcedureTo過(guò)程文件名函數(shù)名 (參數(shù) )SetProcedureto求 N!的函數(shù)ClearInput請(qǐng)輸入 N=ToN?Str(N)+!=,NJC(N)FunctionNJCParametersNF=1Fori=1toNF=F*inextreturnFEndFun自定義函數(shù)示例函數(shù) FunctionCircleSParametersXreturn*X*XEndFun*函數(shù)調(diào)用 ,主程序SetproceduretoCircleSinput半徑 r=tor?半徑 =,r?面積 =,circleS(r)setproceduretoreturn過(guò)程嵌套調(diào)用? VFP允許執(zhí)行一個(gè)過(guò)程時(shí) ,調(diào)用第二個(gè)過(guò)程 。執(zhí)行第二個(gè)過(guò)程時(shí) ,調(diào)用第三個(gè)過(guò)程。這樣一個(gè)接一個(gè)地調(diào)用下去 ,稱為過(guò)程嵌套調(diào)用。? 系統(tǒng)允許這種嵌套最多 126層?！ ?主程序 過(guò)程 1 過(guò)程 2... ... ...DO過(guò)程 1 DO過(guò)程 2DO過(guò)程 3... ... ...... ... ...... ... ...RETURNRETURNRETURN 變量的作用域? 變量的作用域指的是變量在什么范圍內(nèi)是有效或能夠被訪問(wèn)的? VFP中 ,以變量的作用域來(lái)分 ,內(nèi)存變量分三類 :公用變量、私有變量及局部變量。 公用變量? 公用變量也稱為全局變量，是在主程序和子程序中都有效的變量。? 命令格式– PUBLIC內(nèi)存變量名 1[， 內(nèi)存變量名 2，內(nèi)存變量名 3...]? 命令功能– 定義公用變量? 注：在執(zhí)行 CLEARMEMORY、 RELEASE、QUIT等命令后，公共變量才被釋放；私有變量? 私有變量是在程序中直接使用而由系統(tǒng)自動(dòng)隱含建立的變量。? 私有變量可以在使用中建立? 示例： STORE23TOXY1? 說(shuō)明– 私有變量只能在建立它的模塊或下層模塊中使用；– 私有變量在建立它的模塊程序運(yùn)行結(jié)束時(shí)被釋放。 局部變量? 局部變量是只能在建立它的模塊中使用的變量? 命令格式– LOCAL內(nèi)存變量名 1[， 內(nèi)存變量名 2， 內(nèi)存變量名 3...]? 說(shuō)明– 局部變量要先建立后使用，初值是邏輯假 .F.。– 局部變量不能在上層或下層模塊中使用，只能在建立它的模塊中使用；– 局部變量在建立它的模塊程序運(yùn)行結(jié)束時(shí)被釋放。變量作用域示例clearPublicx1Localx2X1=1Store100TOx2,x3dop6?39。主程序中 ...39。?39。x1=39。,x1?39。x2=39。,x2?39。x3=39。,x3returnprocedurep6?39。子程序中 ...39。x1=3x2=10x3=20?39。x1=39。,x1?39。x2=39。,x2?39。x3=39。,x3endproc演講完畢，謝謝觀看！
法律信息相關(guān)推薦
鄂ICP備17016276號(hào)-1