求大神们见见这个结果是什么!vfp10前学的忘光了

求大神们看看这个结果是什么!vfp10前学的忘光了
本帖最后由 lanfeiniao488 于 2013-05-10 17:00:32 编辑
****P1*******
SET TALK OFF  
CLEAR 
A=1 
B=“GOOD”
?“P1:”
LIST MEMO LIKE?   
WAIT 
DO P2 WITH A,B    
?“P1:” 
LIST MEMO LIKE ? 
WAIT      RETU

****P2.PRG******
PROC P2
PARA X,Y
Y=Y+“MORNING!”
 X=DATE()+X
A=100
B=“OK!
?“P2:”
 LIST MEMO LIKE ?
WAIT
ENDPROC
vfp

------解决方案--------------------
求大神们见见这个结果是什么!vfp10前学的忘光了