有关VFP的问题

Question

那你的READ EVENT 是放在哪個位置的?參照一下這個吧!
MAIN.PRG 為主文件;MAIN.SCX設為頂層表單;
clea all
close all
set   to "."
set century on
set date to japan
set sysmenu off 
set delete on 
_screen.visible = .f.
public s_Systempath
s_Systempath = ''
s_SystemPath = Sys(2003)
Set Path To s_SystempathDo form  main.scx
Read event