vfp编译后为什么不能运行。
VFP小虾,做了一菜单文件,一主程序,一表单,编译后运行时不显示。但是在windows的任务管理器中还在运行。请各位大侠指点。这里我省略了一些别的,只把主程序和菜单拿出来了。
*----------------------------------------
*以下是主程序的内容:
public userPath
set talk off
set delete on
set safety off
set decimal to 2
set exclusive on
set exact off
set ansi off
set sysmenu off
set message to
userpath = sys(5) + sys(2003)
set default to &userpath
_screen.Height = 600
_screen.Width = 800
_screen.Controlbox = .f.
_screen.Closable = .t.
_screen.AutoCenter = .t.
_screen.WindowType = 1
screen = .f.
do mainmenu1.prg
read events
return
*----------------------------------------
*主程序结束
*---------------------------------------
*以下是菜单程序的内容:
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD setpara OF _MSYSMENU PROMPT "系统设置(\S)" COLOR SCHEME 3 ;
KEY ALT+S, "" ;
MESSAGE "设置系统参数"
DEFINE PAD usermana OF _MSYSMENU PROMPT "用户管理(\<F)" COLOR SCHEME 3 ;
KEY ALT+F, "" ;
MESSAGE "用户添加、删除、权限设置或退出 "
DEFINE PAD datamana OF _MSYSMENU PROMPT "数据管理(\<D)" COLOR SCHEME 3 ;
KEY ALT+D, "ALT+D" ;
MESSAGE "数据导入、导出"
DEFINE PAD quitsystem OF _MSYSMENU PROMPT "退出系统(\<Q)" COLOR SCHEME 3 ;
KEY ALT+Q, "ALT+Q" ;
MESSAGE "退出系统"
ON SELECTION PAD setpara OF _MSYSMENU ?"系统设置"
ON SELECTION PAD usermana OF _MSYSMENU ?"用户管理"
ON PAD datamana OF _MSYSMENU ACTIVATE POPUP 数据管理d
ON SELECTION PAD quitsystem OF _MSYSMENU quit
DEFINE POPUP 数据管理d MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 数据管理d PROMPT "数据测评"
DEFINE BAR 2 OF 数据管理d PROMPT "数据导入"
DEFINE BAR 3 OF 数据管理d PROMPT "数据导出"
ON SELECTION BAR 1 OF 数据管理d ?"数据测评"
ON SELECTION BAR 2 OF 数据管理d ?"数据导入"
ON SELECTION BAR 3 OF 数据管理d ?"数据导出"
*--------------------------------------------------------------