͸

vfp编写的学生选可系统

*       *********************************************************
*       *                                                         
*       * 03/12/03             主菜单1.MPR              09:02:55  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 曹永德                                                  
*       *                                                         
*       * 版权所有 (C) 2003 广西北流市                           
*       * 广西                                                    
*       * 北流, 广西  537400                                        
*       * 中国                                              
*       *                                                         
*       * 说明:                                            
*       * 此程序由 GENMENU 自动生成。    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                         菜单定义                        
*       *                                                         
*       *********************************************************
*

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _0wk0je7fx OF _MSYSMENU PROMPT "数据录入　" COLOR SCHEME 3
DEFINE PAD _0wk0je7fy OF _MSYSMENU PROMPT "数据查询" COLOR SCHEME 3
DEFINE PAD _0wk0je7fz OF _MSYSMENU PROMPT "数据修改" COLOR SCHEME 3
DEFINE PAD _0wk0je7g0 OF _MSYSMENU PROMPT "打印报表　" COLOR SCHEME 3
DEFINE PAD _0wk0je7g1 OF _MSYSMENU PROMPT "退出系统" COLOR SCHEME 3
ON PAD _0wk0je7fx OF _MSYSMENU ACTIVATE POPUP 数据录入　
ON PAD _0wk0je7fy OF _MSYSMENU ACTIVATE POPUP 数据查询
ON PAD _0wk0je7fz OF _MSYSMENU ACTIVATE POPUP 数据修改
ON PAD _0wk0je7g0 OF _MSYSMENU ACTIVATE POPUP 打印报表　
ON SELECTION PAD _0wk0je7g1 OF _MSYSMENU quit

DEFINE POPUP 数据录入　 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 数据录入　 PROMPT "学生基本情况录入"
DEFINE BAR 2 OF 数据录入　 PROMPT "学生注册录入"
DEFINE BAR 3 OF 数据录入　 PROMPT "学生成绩录入"
DEFINE BAR 4 OF 数据录入　 PROMPT "班主任录入"
DEFINE BAR 5 OF 数据录入　 PROMPT "班级课程录入"
ON SELECTION BAR 1 OF 数据录入　 do form d:\cao2\学生基本情况录入表2.scx
ON SELECTION BAR 2 OF 数据录入　 do form d:\cao2\学生注册录入2.scx
ON SELECTION BAR 3 OF 数据录入　 do form d:\cao2\学生成绩录入表2.scx
ON SELECTION BAR 4 OF 数据录入　 do form d:\cao2\班主任录入.scx
ON SELECTION BAR 5 OF 数据录入　 do form d:\cao2\班级课程录入表2.scx

DEFINE POPUP 数据查询 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 数据查询 PROMPT "学生基本情况查询"
DEFINE BAR 2 OF 数据查询 PROMPT "学生注册查询"
DEFINE BAR 3 OF 数据查询 PROMPT "学生成绩查询"
DEFINE BAR 4 OF 数据查询 PROMPT "班主任查询"
DEFINE BAR 5 OF 数据查询 PROMPT "班级课程查询"
ON SELECTION BAR 1 OF 数据查询 do form d:\cao2\学生基本情况查询表2.scx
ON SELECTION BAR 2 OF 数据查询 do form d:\cao2\学生注册查询.scx
ON SELECTION BAR 3 OF 数据查询 do form d:\cao2\学生成绩查询表.scx
ON SELECTION BAR 4 OF 数据查询 do form d:\cao2\班主任查询.scx
ON SELECTION BAR 5 OF 数据查询 do form d:\cao2\班级课程查询表.scx

DEFINE POPUP 数据修改 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 数据修改 PROMPT "学生基本情况修改"
DEFINE BAR 2 OF 数据修改 PROMPT "学生注册情况修改"
DEFINE BAR 3 OF 数据修改 PROMPT "学生成绩修改"
DEFINE BAR 4 OF 数据修改 PROMPT "班主任修改"
DEFINE BAR 5 OF 数据修改 PROMPT "班级课程修改"
ON SELECTION BAR 1 OF 数据修改 do form d:\cao2\学生基本情况修改表2.scx
ON SELECTION BAR 2 OF 数据修改 do form d:\cao2\学生注册修改.scx
ON SELECTION BAR 3 OF 数据修改 do form d:\cao2\学生成绩修改.scx
ON SELECTION BAR 4 OF 数据修改 do form d:\cao2\班主任修改.scx
ON SELECTION BAR 5 OF 数据修改 do form d:\cao2\班级课程修改.scx

DEFINE POPUP 打印报表　 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 打印报表　 PROMPT "学生通讯录"
DEFINE BAR 2 OF 打印报表　 PROMPT "班级学生名册"
DEFINE BAR 3 OF 打印报表　 PROMPT "学生注册情况报表"
DEFINE BAR 4 OF 打印报表　 PROMPT "未注册学生名单"
DEFINE BAR 5 OF 打印报表　 PROMPT "学生成绩报告单"
DEFINE BAR 6 OF 打印报表　 PROMPT "班级学生成绩报表"
DEFINE BAR 7 OF 打印报表　 PROMPT "班主任一览表"
DEFINE BAR 8 OF 打印报表　 PROMPT "班级任课教师安排表"
DEFINE BAR 9 OF 打印报表　 PROMPT "教师任课情况一览表"
DEFINE BAR 10 OF 打印报表　 PROMPT "课程设置报表"
ON SELECTION BAR 1 OF 打印报表　 REPORT FORM d:\cao2\学生通讯录.frx PREVIEW
ON SELECTION BAR 2 OF 打印报表　 REPORT FORM d:\cao2\班级学生名册.frx PREVIEW
ON SELECTION BAR 3 OF 打印报表　 REPORT FORM d:\cao2\注册表2.frx PREVIEW
ON SELECTION BAR 4 OF 打印报表　 REPORT FORM d:\cao2\未注册学生报表2.frx PREVIEW
ON SELECTION BAR 5 OF 打印报表　 REPORT FORM d:\cao2\学生成绩报告单.frx PREVIEW
ON SELECTION BAR 6 OF 打印报表　 REPORT FORM d:\cao2\班级学生成绩报表.frx PREVIEW
ON SELECTION BAR 7 OF 打印报表　 REPORT FORM d:\cao2\班主任一览表.frx PREVIEW
ON SELECTION BAR 8 OF 打印报表　 REPORT FORM d:\cao2\班级任课教师安排表.frx PREVIEW
ON SELECTION BAR 9 OF 打印报表　 REPORT FORM d:\cao2\教师任课情况一览表.frx PREVIEW
ON SELECTION BAR 10 OF 打印报表　 REPORT FORM d:\cao2\课程设置报表.frx PREVIEW