8-12.txt

来自「超市进销存管理系统 学生学籍管理系统 1、把源代码解压到适当的目录下（教材讲」· 文本 代码 · 共 23 行

【例8.12】变量状态举例。
*程序名称：EXAM8-12.PRG
*功能说明：变量状态举例
CLEAR MEMORY
CLEAR
PUBLIC Pn1,Pn3                &&全局变量
DISPLAY MEMORY LIKE Pn?       &&第1个
DO Pro1
PROCEDURE Pro1
Pn2= "Visual FoxPro"             &&私有变量
DISPLAY MEMORY LIKE Pn?     &&第 2个
DO Pro2
DISPLAY MEMORY LIKE Pn?     &&第 4个
ENDPROC
PROCEDURE Pro2
PRIVATE Pn1                    &&隐蔽说明
LOCAL Pn4                     &&局部变量
Pn3= "is ten years"
Pn2="snnay" 
Pn4="abc"
DISPLAY MEMORY LIKE Pn?      &&第 3个
ENDPROC