*       *********************************************************
*       *                                                         
*       * 10/07/03              MENU1.MPR               15:15:28  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * Author's Name                                           
*       *                                                         
*       * Copyright (C) 2003 Company Name                         
*       * Address                                                 
*       * City,     Zip                                           
*       *                                                         
*       * Description:                                            
*       * This PROGRAM was automatically generated BY GENMENU.    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                      Menu Definition                    
*       *                                                         
*       *********************************************************
*

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _12d0wpbh2 OF _MSYSMENU PROMPT "學(xué)生信息查詢" COLOR SCHEME 3
DEFINE PAD _12d0wpbh3 OF _MSYSMENU PROMPT "Excel文件編輯" COLOR SCHEME 3 ;
	KEY ALT+E, ""
DEFINE PAD _12d0wpbh4 OF _MSYSMENU PROMPT "退出系統(tǒng)" COLOR SCHEME 3
ON PAD _12d0wpbh2 OF _MSYSMENU ACTIVATE POPUP 學(xué)生信息查
ON PAD _12d0wpbh3 OF _MSYSMENU ACTIVATE POPUP excel文件
ON PAD _12d0wpbh4 OF _MSYSMENU ACTIVATE POPUP 退出系統(tǒng)

DEFINE POPUP 學(xué)生信息查 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 學(xué)生信息查 PROMPT "學(xué)籍信息查詢"
DEFINE BAR 2 OF 學(xué)生信息查 PROMPT "學(xué)生成績查詢"
ON SELECTION BAR 1 OF 學(xué)生信息查 do form modifystudent
ON SELECTION BAR 2 OF 學(xué)生信息查 do form 表單2

DEFINE POPUP excel文件 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF excel文件 PROMPT "學(xué)生信息"
DEFINE BAR 2 OF excel文件 PROMPT "學(xué)生成績"
ON SELECTION BAR 1 OF excel文件 do form 表單1
ON SELECTION BAR 2 OF excel文件 do form 成績

DEFINE POPUP 退出系統(tǒng) MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 退出系統(tǒng) PROMPT "退出"
ON SELECTION BAR 1 OF 退出系統(tǒng) ;
	DO _12d0wpbh5 ;
	IN LOCFILE("\FOXWORK\MENU1" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU1?")


*       *********************************************************
*       *                                                         
*       * _12D0WPBH5  ON SELECTION BAR 1 OF POPUP 退出系統(tǒng)        
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  MENU1.MPR,            Record:   13          
*       * Called By:  ON SELECTION BAR 1 OF POPUP 退出系統(tǒng)        
*       * Prompt:     退出                                        
*       * Snippet:    1                                           
*       *                                                         
*       *********************************************************
*
PROCEDURE _12d0wpbh5
clos all
quit