第七章VisualFoxPro程序設(shè)計(jì)基礎(chǔ)

1、第七章第七章 Visual FoxPro 程序設(shè)計(jì)基礎(chǔ)程序設(shè)計(jì)基礎(chǔ)n7.1 程序建立和執(zhí)行n7.2 程序的交互式命令n7.3 結(jié)構(gòu)化程序設(shè)計(jì)n7.4 子程序與過程文件及用戶n7.5 屏幕顯示格式程序設(shè)計(jì)n7.6 程序調(diào)試和調(diào)試器n7.7 共享訪問編程及多用戶操作7.1 程序建立和執(zhí)行n7.1.1 程序設(shè)計(jì)概念和步驟n1、程序：能夠完成特定任務(wù)的命令序列，能夠完成特定任務(wù)的命令序列，存儲(chǔ)在命令文件（存儲(chǔ)在命令文件（.PRG.PRG）中。運(yùn)行該文件可）中。運(yùn)行該文件可自動(dòng)執(zhí)行一系列操作自動(dòng)執(zhí)行一系列操作n2 2、程序設(shè)計(jì)步驟：n1）分析問題 2）確定算法 n3）畫流程圖 4）編寫程序n5）調(diào)試程序

2、 6）建立文檔7.1.2 程序的建立1 1項(xiàng)目管理器項(xiàng)目管理器 選擇選擇 “ “程序程序”項(xiàng)，單擊項(xiàng)，單擊“新建新建”按鈕，打開代碼編輯窗口，輸入程序按鈕，打開代碼編輯窗口，輸入程序內(nèi)容。然后選擇內(nèi)容。然后選擇“文件文件/ /保存保存”命令將編寫的代碼存入磁盤命令將編寫的代碼存入磁盤2. 2. 菜單菜單 選擇選擇“文件文件/ /新建新建”菜單命令，在菜單命令，在“新建新建”對(duì)話框中選擇對(duì)話框中選擇“程序程序”文件文件類型，按類型，按“新建文件新建文件”按鈕，進(jìn)入代碼編輯窗口按鈕，進(jìn)入代碼編輯窗口3. 3. 命令命令：MODIFY COMMAND MODIFY COMMAND 如果輸入命令語句時(shí)

3、，如果輸入命令語句時(shí)，必須一條命令占一行，一行寫必須一條命令占一行，一行寫不下時(shí)，在行尾加續(xù)行符不下時(shí)，在行尾加續(xù)行符“;”;”，換行后接著書寫該命令語句換行后接著書寫該命令語句 7.1.3 程序文件的修改對(duì)已建立的程序文件可以重新進(jìn)入代碼編輯窗口修改內(nèi)容對(duì)已建立的程序文件可以重新進(jìn)入代碼編輯窗口修改內(nèi)容 1. 1. 項(xiàng)目管理器項(xiàng)目管理器 選中要修改的程序文件，按選中要修改的程序文件，按“修改修改”按鈕，在代碼編輯窗口中按鈕，在代碼編輯窗口中進(jìn)行修改。修改后，選擇進(jìn)行修改。修改后，選擇“文件文件/ /保存保存”菜單命令，保存程序菜單命令，保存程序2. 2. 菜單菜單 選擇選擇“文件文件/ /打

4、開打開”菜單命令，在當(dāng)對(duì)話框中選擇要修改的程序菜單命令，在當(dāng)對(duì)話框中選擇要修改的程序文件，將其調(diào)入代碼編輯窗口文件，將其調(diào)入代碼編輯窗口 3. 3. 命令命令 MODIFY COMMAND MODIFY COMMAND 7.1.4 程序文件的執(zhí)行1. 1. 項(xiàng)目管理器項(xiàng)目管理器 選中要執(zhí)行的程序文件，按選中要執(zhí)行的程序文件，按“運(yùn)行運(yùn)行”按鈕按鈕2. 2. 菜單菜單 選擇選擇“程序程序/ /運(yùn)行運(yùn)行”菜單命令菜單命令3. 3. 命令命令 DO DO 7.2 程序的交互式命令n7.2.1 人機(jī)交互式輸入語句n1、鍵盤輸入字符串命令：accept,暫停程序運(yùn)行，接收鍵盤字符并存入內(nèi)在變量n2、鍵盤

5、輸入單個(gè)字符命令：wait n3、鍵盤輸入任意類型數(shù)據(jù)命令:input7.2.2 基本命令1. 1. 環(huán)境設(shè)置命令環(huán)境設(shè)置命令（SETSET）設(shè)設(shè) 置置說說 明明SET TALK ON|OFFSET TALK ON|OFF人機(jī)對(duì)話設(shè)置命令人機(jī)對(duì)話設(shè)置命令SET CONSELE ON|OFFSET CONSELE ON|OFFSET PRINTER ON|OFFSET PRINTER ON|OFFSET SAFETY ON|OFFSET SAFETY ON|OFFSET HEADING ON|OFFSET HEADING ON|OFFSET STATUS ON|OFFSET STATUS ON|

6、OFFSET DEVICE TO SCREEN|PRINTERSET DEVICE TO SCREEN|PRINTERSET DEFAULT TOSET DEFAULT TOSET CONSELESET CONSELE的使用的使用? “? “請(qǐng)輸入密碼請(qǐng)輸入密碼:”:”SET CONSELE OFFSET CONSELE OFFACCEPT “ACCEPT “密碼密碼:” TO MM:” TO MM? “aaaaaaaaaa1111111111”? “aaaaaaaaaa1111111111”SET CONSELE ONSET CONSELE ON? MM? MM7.2.2 基本命令2 2注釋

7、命令注釋命令 非執(zhí)行語句，用于提高程序的可讀性非執(zhí)行語句，用于提高程序的可讀性 NOTENOTE、* *（行首注釋）、（行首注釋）、&（行尾注釋）（行尾注釋）3. 3. 文本顯示命令文本顯示命令 TEXTTEXT ENDTEXT ENDTEXT4. 4. 清除命令清除命令 CLEAR CLEAR （清屏）（清屏） CLEAR ALL CLEAR ALL （關(guān)閉所有文件、清除所有內(nèi)存變量）（關(guān)閉所有文件、清除所有內(nèi)存變量）5. 5. 關(guān)閉文件命令關(guān)閉文件命令 CLOSE ALL CLOSE ALL （關(guān)閉所有文件）（關(guān)閉所有文件） CLOSE CLOSE （關(guān)閉指定類型的文件）（關(guān)閉指定

8、類型的文件）7.2.2 基本命令6. 6. 運(yùn)行中斷和結(jié)束命令運(yùn)行中斷和結(jié)束命令 CANCEL CANCEL 終止程序運(yùn)行，返回命令窗口終止程序運(yùn)行，返回命令窗口 RETURN RETURN 結(jié)束當(dāng)前程序的執(zhí)行，返回到調(diào)用它的上級(jí)程序結(jié)束當(dāng)前程序的執(zhí)行，返回到調(diào)用它的上級(jí)程序 QUIT QUIT 關(guān)閉所有文件，退出關(guān)閉所有文件，退出VFPVFP系統(tǒng)，返回操作系統(tǒng)環(huán)境系統(tǒng)，返回操作系統(tǒng)環(huán)境7 7格式輸入輸出命令格式輸入輸出命令 格式格式1 1： SAY SAY 功能：在主窗口指定的位置處顯示表達(dá)式的值功能：在主窗口指定的位置處顯示表達(dá)式的值 格式格式2 2： SAY SAY GET GET RE

9、AD READ 功能：在窗口指定位置處分別顯示表達(dá)式和變量的值。若使用功能：在窗口指定位置處分別顯示表達(dá)式和變量的值。若使用READ READ 語句，則可以對(duì)變量進(jìn)行修改語句，則可以對(duì)變量進(jìn)行修改7.3 程序基本控制結(jié)構(gòu)1. 1. 順序結(jié)構(gòu)順序結(jié)構(gòu)：按程序中語句的書寫順序逐條執(zhí)行：按程序中語句的書寫順序逐條執(zhí)行2. 2. 分支結(jié)構(gòu)分支結(jié)構(gòu)（選擇結(jié)構(gòu)）：根據(jù)邏輯條件的結(jié)果執(zhí)行不同的命令序列（選擇結(jié)構(gòu)）：根據(jù)邏輯條件的結(jié)果執(zhí)行不同的命令序列 單分支結(jié)構(gòu)單分支結(jié)構(gòu)：IFENDIFIFENDIF 例例: IF X3: IF X3 Y=5 Y=5 ENDIF ENDIF 雙分支結(jié)構(gòu)雙分支結(jié)構(gòu)：IFELS

10、EENDIFIFELSEENDIF 例例: IF X=0: IF X=0 Y=X Y=X* * *2+32+3 ELSE ELSE Y=X Y=X* *X X ENDIF ENDIF條件條件A AB BT TF F條件條件F FA AT T7.3 程序基本控制結(jié)構(gòu)舉例：設(shè)計(jì)密碼校驗(yàn)系統(tǒng)（假設(shè)密碼為舉例：設(shè)計(jì)密碼校驗(yàn)系統(tǒng)（假設(shè)密碼為abcabc）CLSARCLSARSET TALK OFFSET TALK OFFACCEPT “ACCEPT “請(qǐng)輸入您的密碼請(qǐng)輸入您的密碼: TO MM: TO MMIF MM=abcIF MM=abc ? ? 歡迎使用本系統(tǒng)！歡迎使用本系統(tǒng)！ ELSE ELSE

11、 ? “ ? “密碼錯(cuò)誤，無權(quán)登錄密碼錯(cuò)誤，無權(quán)登錄!ENDIFENDIFSET TALK ONSET TALK ON7.3 程序基本控制結(jié)構(gòu)n舉例：求一元二舉例：求一元二次方程的實(shí)根次方程的實(shí)根（系數(shù)分別為（系數(shù)分別為a,b,c)SET TALK OFFSET TALK OFFCLEARCLEARINPUT INPUT 輸入系數(shù)輸入系數(shù)a a的值的值: TO A: TO AINPUT INPUT 輸入系數(shù)輸入系數(shù)b b的值的值: TO B: TO BINPUT INPUT 輸入系數(shù)輸入系數(shù)c c的值的值: TO C: TO CZ=BZ=B* *B-4B-4* *A A* *C CIF Z=0

12、IF Z=0 X1=(-B+SQRT(Z)/(2 X1=(-B+SQRT(Z)/(2* *A)A) X2=(-B-SQRT(Z)/(2 X2=(-B-SQRT(Z)/(2* *A)A) ? ? 方程的根為方程的根為:,X1,X2:,X1,X2ELSE ELSE ? ? 無實(shí)根無實(shí)根 ENDIFENDIFSET TALK ONSET TALK ON7.3 程序基本控制結(jié)構(gòu) 多分支結(jié)構(gòu)多分支結(jié)構(gòu)：DO CASEENDCASEDO CASEENDCASE例例: : INPUT INPUT 請(qǐng)輸入成績請(qǐng)輸入成績: TO X: TO XDO CASEDO CASECASE X90CASE X90 ? ?

13、 優(yōu)優(yōu) CASE X=80CASE X=80 ? ? 良良 CASE X=60CASE X=60 ? ? 及格及格 OTHERWIZEOTHERWIZE ? “ ? “差差”ENDCASEENDCASE條件條件1 1ENDCASEENDCASE后面語句后面語句N NY Y條件條件2 2條件條件n nOTHERWISEOTHERWISEN NN N語句列語句列1 1語句列語句列2 2語句列語句列n n其它語句列其它語句列Y YY YY YN N7.3 程序基本控制結(jié)構(gòu)3. 3. 循環(huán)結(jié)構(gòu)：循環(huán)結(jié)構(gòu)： DO WHILEENDDO DO WHILEENDDO例例: S=0: S=0 I=1 I=1

14、DO WHILE I=10 DO WHILE I=10 S=S+I S=S+I I=I+1 I=I+1 ENDDO ENDDO ? S ? SENDDOENDDO后面語句后面語句條件條件循環(huán)體循環(huán)體F FT T7.3 程序基本控制結(jié)構(gòu)例例: :顯示所有同學(xué)顯示所有同學(xué), ,當(dāng)遇到姓當(dāng)遇到姓“李李”的同學(xué)退出的同學(xué)退出USE USE 學(xué)生學(xué)生DO WHILE .NOT.EOF()DO WHILE .NOT.EOF() IF IF 姓名姓名=李李 EXIT EXIT ELSE ELSE DISPLAY DISPLAY ENDIF ENDIF SKIP SKIPENDDOENDDO條件條件ENDDO

15、ENDDO后的語句后的語句Y YN NLOOPLOOPEXITEXIT循環(huán)體循環(huán)體7.3 程序基本控制結(jié)構(gòu)舉例：舉例： DO WHILE I=10DO WHILE I=10 DO WHILE NOT EOF() DO WHILE NOT EOF() DO WHILE .T. DO WHILE .T.練習(xí)練習(xí)1. 1. 計(jì)算計(jì)算N! N! 2. 2. 編寫查詢程序編寫查詢程序3. 3. 編寫刪除程序編寫刪除程序4. 4. 編寫添加程序編寫添加程序5. 5. 計(jì)算計(jì)算1-2+3-4+5-6+9-101-2+3-4+5-6+9-106. 6. 統(tǒng)計(jì)男女生同學(xué)的人數(shù)統(tǒng)計(jì)男女生同學(xué)的人數(shù)7. 7. 給每

16、一個(gè)同學(xué)評(píng)定給每一個(gè)同學(xué)評(píng)定“優(yōu)良中差優(yōu)良中差”8. 8. 判斷一個(gè)數(shù)是否是素?cái)?shù)判斷一個(gè)數(shù)是否是素?cái)?shù)7.3 程序基本控制結(jié)構(gòu) FOR ENDFOR FOR ENDFOR【例】編程輸出矩形乘法口訣表【例】編程輸出矩形乘法口訣表SET TALK OFFSET TALK OFFCLEARCLEARFOR I=1 TO 9 FOR I=1 TO 9 FOR J=1 TO 9 FOR J=1 TO 9 ? STR(I,1)+? STR(I,1)+* *+STR(J,1)+=+STR(I+STR(J,1)+=+STR(I* *J,2)+ J,2)+ ENDFOR ENDFOR ? ?ENDFORENDFO

17、RSET TALK ONSET TALK ONRETURNRETURN7.3 程序基本控制結(jié)構(gòu)【例】編程輸出下三角形乘法口訣表【例】編程輸出下三角形乘法口訣表SET TALK OFFSET TALK OFFCLEARCLEARFOR I= 1 TO 9FOR I= 1 TO 9 FOR J=1 TO I FOR J=1 TO I? STR(J,1)+? STR(J,1)+* *+STR(I,1)+=+STR(I+STR(I,1)+=+STR(I* *J,2)+ J,2)+ ENDFOR ENDFOR ? ? ENDFORENDFOR7.3 程序基本控制結(jié)構(gòu)【例】輸入【例】輸入1010個(gè)數(shù)，并將

18、它們用比較法按由大到小的順序排序輸出個(gè)數(shù)，并將它們用比較法按由大到小的順序排序輸出SET TALK OFFSET TALK OFFCLEARCLEARDIMENSION A10DIMENSION A10FOR I=1 TO 10FOR I=1 TO 10 INPUT INPUT 請(qǐng)輸入一個(gè)數(shù)請(qǐng)輸入一個(gè)數(shù): TO AI: TO AIENDFORENDFORFOR I=1 TO 9FOR I=1 TO 9 FOR J=I TO 10 FOR J=I TO 10 IF AIAJ IF AIA(J+1) IF A(J)A(J+1) T=A(J) T=A(J) A(J)=A(J+1) A(J)=A(J+

19、1) A(J+1)=T A(J+1)=T ENDIF ENDIF NEXT J NEXT JNEXT I NEXT I FOR I=1 TO 10FOR I=1 TO 10 ? A(I) ? A(I)NEXT INEXT I7.3 程序基本控制結(jié)構(gòu)【例】輸入【例】輸入1010個(gè)數(shù)，用選擇法將它們排序個(gè)數(shù)，用選擇法將它們排序CLEARCLEARSET TALK OFFSET TALK OFFDIMENSION A(10)DIMENSION A(10)FOR I=1 TO 10FOR I=1 TO 10 INPUT TO A(i) INPUT TO A(i)NEXT INEXT IFOR I=1

20、TO 9FOR I=1 TO 9 P=1 P=1 FOR J=1 TO 10-I FOR J=1 TO 10-I IF A(P)A(J) IF A(P)A(J) P=J P=J ENDIF ENDIF NEXT J NEXT J T=A(P) T=A(P) A(P)=A(10-I+1) A(P)=A(10-I+1) A(10-I+1)=T A(10-I+1)=TNEXT I NEXT I FOR I=1 TO 10FOR I=1 TO 10 ? A(I) ? A(I)NEXT INEXT I7.3 程序基本控制結(jié)構(gòu)圖案打印程序一圖案打印程序一CLEARCLEARFOR i=1 TO 4 FOR

21、 i=1 TO 4 FOR K=1 TO 2 FOR K=1 TO 2* *i-1i-1 I,40-I+K SAY I,40-I+K SAY * * NEXT NEXTNEXTNEXT * * * * * * * * * * * * * * * * * * *7.3 程序基本控制結(jié)構(gòu)圖案打印程序二圖案打印程序二CLEARCLEARFOR i=1 TO 4 FOR i=1 TO 4 ? SPACE(5-I) ? SPACE(5-I) FOR K=1 TO 5 FOR K=1 TO 5? ? * * NEXT NEXT? ?NEXTNEXT * * * * * * * * * * * * * *

22、* * * * * * * * *CLEARCLEARFOR i=1 TO 4 FOR i=1 TO 4 FOR K=1 TO 5 FOR K=1 TO 5 I,40-I+K SAY I,40-I+K SAY * * NEXT NEXTNEXTNEXT7.3 程序基本控制結(jié)構(gòu)圖案打印程序三圖案打印程序三CLEARCLEARFOR I=4 TO 1 STEP -1FOR I=4 TO 1 STEP -1 FOR K=1 TO 2 FOR K=1 TO 2* *I-1I-1 10-I,40-I+K SAY 10-I,40-I+K SAY * * NEXT NEXTNEXTNEXTCLEARCLEA

23、RFOR I=4 TO 1 STEP -1 FOR I=4 TO 1 STEP -1 ? SPACE(5-I) ? SPACE(5-I) FOR K=1 TO 2 FOR K=1 TO 2* *I-1I-1 ? ? * * NEXT NEXT ? ?NEXTNEXT* * * * * * * * * * * * * * * * * * * *7.3 程序基本控制結(jié)構(gòu)CLEARCLEARINPUT INPUT 請(qǐng)輸入請(qǐng)輸入N N的值的值: TO N: TO NFOR I=1 TO N FOR I=1 TO N FOR K=1 TO 2 FOR K=1 TO 2* *I-1I-1 i,40-I+K

24、 SAY i,40-I+K SAY * * NEXT NEXTNEXTNEXTFOR I=N-1 TO 1 STEP -1FOR I=N-1 TO 1 STEP -1 FOR K=1 TO 2 FOR K=1 TO 2* *i-1 i-1 2 2* *N-I,40-I+K SAY N-I,40-I+K SAY * * NEXT NEXTNEXTNEXT * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *7.4 子程序與過程文件 1.1.過程的建立與調(diào)用過程的建立與調(diào)用 過程也叫子程序，是一個(gè)相對(duì)獨(dú)立的程序段過程也叫子程序，

25、是一個(gè)相對(duì)獨(dú)立的程序段, , 可以被其他程序調(diào)可以被其他程序調(diào)用。調(diào)用子程序的程序稱為主程序用。調(diào)用子程序的程序稱為主程序 1. 1. 過程的建立與調(diào)用過程的建立與調(diào)用 過程的建立過程的建立 一個(gè)過程就是一個(gè)具有特定功能的命令文件（一個(gè)過程就是一個(gè)具有特定功能的命令文件（.PRG.PRG），它的建），它的建立、運(yùn)行與一般程序相同。但是，一個(gè)過程中至少要有一條立、運(yùn)行與一般程序相同。但是，一個(gè)過程中至少要有一條RETURNRETURN返回語句返回語句 過程的調(diào)用過程的調(diào)用 在上級(jí)程序中設(shè)置一條在上級(jí)程序中設(shè)置一條 DO DO 命令即可調(diào)用一個(gè)過程命令即可調(diào)用一個(gè)過程 命令：命令：DO DO IN

26、 IN WITH WITH 7.4 子程序與過程文件 1.1.過程的建立與調(diào)用過程的建立與調(diào)用. . .DO SUB1DO SUB1. . . . . . . . .CANCELCANCEL 主程序主程序MAIN.PRGMAIN.PRG. . . .DO SUB2DO SUB2. . . . . . . . .RETURNRETURN 子程序子程序SUB1.PRGSUB1.PRG . . . . . . . . . . . . . . . . . . . RETURN RETURN . . . . . . . . . . . . RETURN TO MASTERRETURN TO MASTER

27、子程序子程序SUB2.PRGSUB2.PRG7.4 子程序與過程文件 2.2.過程文件過程文件 將多個(gè)過程存放在一個(gè)文件中形成過程文件。過程文件中的過程不能作將多個(gè)過程存放在一個(gè)文件中形成過程文件。過程文件中的過程不能作為一個(gè)命令文件單獨(dú)存盤或獨(dú)立運(yùn)行為一個(gè)命令文件單獨(dú)存盤或獨(dú)立運(yùn)行 過程文件的建立過程文件的建立 命令：命令：MODIFY COMMAND MODIFY COMMAND 過程文件的基本結(jié)構(gòu)：過程文件的基本結(jié)構(gòu)： PROCEDURE PROCEDURE RETURN TO MASTER RETURN TO MASTER ENDPROC ENDPROC 過程文件的打開與關(guān)閉過程文件的

28、打開與關(guān)閉 命令：命令：SET PROCEDURE TO SET PROCEDURE TO 7.4 子程序與過程文件 3.3.帶參數(shù)的過程調(diào)用帶參數(shù)的過程調(diào)用 將不同的參數(shù)分別傳遞給同一過程，執(zhí)行同一功能的操作后返回將不同的參數(shù)分別傳遞給同一過程，執(zhí)行同一功能的操作后返回不同的結(jié)果，可以大大提高程序模塊的靈活性不同的結(jié)果，可以大大提高程序模塊的靈活性 定義帶參數(shù)的過程定義帶參數(shù)的過程： PROCEDURE PROCEDURE PARAMETERS PARAMETERS RETURN RETURN ENDPROC ENDPROC 調(diào)用帶參數(shù)的過程調(diào)用帶參數(shù)的過程： 命令：命令：DO DO WIT

29、H WITH 7.5 自定義函數(shù) 自定義函數(shù)的建立和使用方法與過程相同。函數(shù)除了完成某種特自定義函數(shù)的建立和使用方法與過程相同。函數(shù)除了完成某種特定操作外，還返回一個(gè)值定操作外，還返回一個(gè)值 1. 1. 定義函數(shù)定義函數(shù) FUNCTION FUNCTION ( () RETURN RETURN ENDFUNC ENDFUNC 2. 2. 調(diào)用函數(shù)調(diào)用函數(shù) 格式：格式： ()n 7.6 變量作用域 1 1全局變量全局變量 使用使用 PUBLIC PUBLIC 關(guān)鍵字定義的變量（也稱公共變量），可以是全局關(guān)鍵字定義的變量（也稱公共變量），可以是全局內(nèi)存變量或數(shù)組內(nèi)存變量或數(shù)組 格式：格式：PUBL

30、IC PUBLIC |數(shù)組數(shù)組 2 2局部變量局部變量 使用使用 LOCAL LOCAL 關(guān)鍵字定義的變量關(guān)鍵字定義的變量 格式：格式：LOCAL LOCAL |數(shù)組數(shù)組 3 3私有變量私有變量 有通過有通過 PUBLIC PUBLIC 或或 LOCAL LOCAL 關(guān)鍵字定義而在程序中直接使用（即由關(guān)鍵字定義而在程序中直接使用（即由系統(tǒng)自動(dòng)隱含建立）的變量系統(tǒng)自動(dòng)隱含建立）的變量 私有變量在建立它的程序及其下屬的子程序中有效，一旦建立它的程序運(yùn)行結(jié)束，私有變量在建立它的程序及其下屬的子程序中有效，一旦建立它的程序運(yùn)行結(jié)束，這些私有變量就自動(dòng)清除這些私有變量就自動(dòng)清除 當(dāng)子程序中的變量與上級(jí)程序中的變量同名時(shí)，可以在當(dāng)前子程序中使用當(dāng)子程序中的變量與上級(jí)程序中的變量同名時(shí)，可以在當(dāng)前子程序中使用 PRIVATE PRIVATE 關(guān)鍵字對(duì)該同名變量進(jìn)行隱藏說明，使其在當(dāng)前子程序中暫時(shí)無效關(guān)鍵字對(duì)該同名變量進(jìn)行隱藏說明，使其在當(dāng)前子程序中暫時(shí)無效 格式：格式：PRIVATE PRIVATE 7.6 變量作用域CLEAR MEMORYCLEAR MEMORYCLEARCLEARPUBLIC