【導讀】在此次大作業(yè)之間，我們班級并沒有一套完善的學生管理系統(tǒng)。管理工作主要是簡單的WORD文檔的使用和ACESS數(shù)據(jù)庫的應用。法簡單但功能很不完善，簡明性和實用性都較差。因此，我們第四小組決定利用。此次大作業(yè)的機會，開發(fā)一套專門用于班級管理工作的數(shù)據(jù)庫系統(tǒng)。經過仔細研究分析，我們決定將系統(tǒng)分為三大菜單部分。分別為學生人事檔案管。理，學生成績查詢，后臺操作管理三部分。為了便于指導員和學校領導對班級情。況的了解管理，其中主要側重點在學生人事檔案管理方面。又分為學生人事維護打印和查詢打印兩個分支。如下圖所示(圖1). 05計專學生管理系統(tǒng)基于FOXPRO中文版開發(fā)。面具有方面，實用，簡單，直接等優(yōu)點。同時其也具有一定的局限性。同時在安全性方面，我們也十分重視。特別是操作員級別的劃分等密。和密碼，系統(tǒng)是不能進入的。具體的代碼實現(xiàn)也將在詳細設計書說?！翱诹铗炞C窗口”表單，口令正確則調用系統(tǒng)菜單。

　　

【正文】 amp。amp。輸入次數(shù)超過 3 次 MESSAGEBOX(禁止進入系統(tǒng) !,警告 ) ENDCASE 退出按鈕 (COMMAND2)CLICK 事件代碼： RELEASE THISFORM CLEAR EVENTS (四 )系統(tǒng)菜單設計 1 學生信息管理系統(tǒng)的菜單 在應用系統(tǒng)中，各個了模塊是通過菜單組織在一起的。通過對人事工資管理系統(tǒng)功能模塊的設計，可以交系統(tǒng)劃分為 3 大模塊：學生信息管理、學生成績查詢、系統(tǒng)管理，具體的菜單設計見下表： 學生信息管理 學生成績管理 系統(tǒng)管理 學生信息維護 學生成績查詢 操作員管理 口令設置 學生信息查詢 權限管理 系統(tǒng)日志 數(shù) 據(jù)備份 數(shù)據(jù)恢復 退出系統(tǒng) 1 在菜單設計器中實現(xiàn)權限設置 在菜單項設計器中，通過 [提示選項 ]對話框設置菜單項的跳過條件可以實現(xiàn)用戶權限。每個操作員對每個菜單項有兩種權限： 0 或 1?！?0”表示此操作員對該菜單項沒有操作權，系統(tǒng)運行后，該菜單項為灰色。不能打開對應的表單，“ 1”代表該操作員對該菜單項具有操作權，系統(tǒng)運行后，該菜單項可用，鼠標單擊菜單項能打開對應的表單。 操作員對各菜單項的權限保存在表文件 中，在登錄系統(tǒng)時讀出該操作員對應各菜單項的權限，并賦值給一個數(shù)組 RR。 本系統(tǒng)共 10 個菜單項，所以定義的數(shù)組也包含 10 個元素。 1 學生信息維護表單包換下列功能：數(shù)據(jù)錄入、修改、刪除、查詢、瀏覽、保存、打印等。本表單左邊是瀏覽窗口，便于用戶瀏覽數(shù)據(jù)；右邊是編輯窗口，主要用于輸入修改數(shù)據(jù)。 1 在表單數(shù)據(jù)環(huán)境中添加表： 、 cjb、 dbf。 學生人事表和成績表的結構請打開數(shù)據(jù)庫表查看。 在表單數(shù)據(jù)環(huán)境的 BRFOREOPENTABLES 事件中添加代碼： =.t. 1 事件代碼： FORM1 的 INIT 事件代碼： =.F. =.F. =.T. =.T. =.T. =.T. =.T. =.T. =.T. =.T. =.T. =.T. =.F. =.T. =.T. =.T. =.T. =.T. =.T. =.T. =.T. =.F. =.F. FORM1 的 CLICK 事件代碼： =.F. =.F. GRID1 的 afterrowclochange 事件代碼： LPARAMETERS nColIndex (dynamicbackcolor,IIF(reo(),rgb(255,255,255),rgb(0,255,0)),column) select rsb 此代碼實現(xiàn)不現(xiàn)顏色顯示選中的 GRID 對象的行及列。 “第一個“按鈕的 CLICK 事件代碼： select rsb go top =.f. =.f. if not eof() =.t. =.t. endif “前一個“按鈕的 CLICK 事件代碼： select rsb skip 1 if bof() go top =.f. =.f. endif if not eof() =.t. =.t. endif “下一個“按鈕的 CLICK 事件代碼： select rsb skip if eof() go bottom =.f. =.f. endif if not bof() =.t. =.t. endif “最后一個“按鈕的 CLICK 事件代碼： select rsb go bottom =.f. =.f. if not bof() =.t. =.t. endif “增加“按鈕的 CLICK 事件代碼： if =增加 =保存 =.F. =.F. =.F. =.F. =.T. =.F. =.F. =.F. =.F. =.F. =.F. =.F. =.T. =.F. =.F. =.F. =.F. =.F. =.F. =.F. SELECT RSB APPEND BLANK GO BOTTOM () ELSE =增加 =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.f. =.t. =.t. =.t. =.t. =.t. =.t. =.t. endif “刪除“按鈕的 CLICK 事件代碼： SELECT RSB XH= sel=messagebox(該記錄學號為： +XH+chr(13)+真的要刪除嗎 ?,4+32+256,提示) if sel=6 delete endif “查找“按鈕的 CLICK 事件代碼： =.t. =.t. = () “打印“按鈕的 CLICK 事件代碼： report form .\menu1\ preview for =alltrim() “退出“按鈕的 CLICK 事件代碼： select rsb pack “ TEXT7”的 valid 事件代碼為： select rsb set filter to 學號 =alltrim() or 學生姓名=alltrim() locate for 學號 =alltrim() or 學生姓名=alltrim() set filter to 運行界面： (如圖 5) (圖 5) 學生信息查詢菜單的設計 學生人事信息的查詢是基于 表，菜單提供學號，姓名，全體查詢。分別利用不同的命令代碼方式實現(xiàn)查詢打印功能。功能是便于指導員和老師，學生用戶的檢索查詢。 各事件的代碼如下： FORM1 的 INIT 事件代碼： *輸入編號、姓名提示標簽及文本框 =.F. =.F. () *輸入起始日期、截止日期提示標簽及文本框不可見 =.F. =.F. =.F. =.F. =.F. *表格數(shù)據(jù)不可修改 =.T. Optiongroup1 的 CLICK 事件代碼： *選定查詢類別后，設置各控件是否可見 DO CASE CASE =1 amp。amp。按學號查詢 =.T. =.T. =.F. =.F. =.F. =.F. =.F. =請輸入要查詢的學號： = CASE =2 amp。amp。按姓名查詢 =.T. =.T. =.F. =.F. =.F. =.F. =.F. =請輸入學生姓名： = () CASE =3 amp。amp。按出生日期查詢 =.F. =.F. =.T. =.T. =.T. =.T. =.T. CASE =4 amp。amp。顯示全體記錄 =.F. =.F. =.F. =.F. =.F. =.F. =.F. SET FILTER TO GO TOP ENDCASE GRID1 的數(shù)據(jù)連接連接 RSB 表。一一對應該對應的數(shù)據(jù)項， COMMAND4(查詢 )的 CLICK 事件代碼： *按輸入的日期條件在表格中顯示查詢的記錄 SELECT rsb PUBLIC qsrq,jzrq qsrq= jzrq= DO CASE CASE NOT EMPTY(qsrq) AND EMPTY(jzrq) SET FILTER TO 出生日期 =qsrq CASE EMPTY(qsrq) AND NOT EMPTY(jzrq) SET FILTER TO 出生日期 =jzrq CASE NOT EMPTY(qsrq) AND NOT EMPTY(jzrq) SET FILTER TO 出生日期 =qsrq AND 出生日期 =jzrq OTHERWISE MESSAGEBOX(未輸入查詢時間 !,提示 ) ENDCASE COMMAND1 的 CLICK 事件代碼： REPORT FORM .\menu1\ PREVIEW 實現(xiàn)調 用 .\menu1\。 該表單的運行圖示如下 (圖 7) 學生成績查詢菜單的設計 首先，學生成績查詢菜單的設計與學生信息查詢菜單的設計比較類似。菜單調用 的是 。各事件代碼均類似于學生信息查詢的事件代碼。 其打印預覽按鈕的 CLICK 的事件代碼為： DO CASE CASE =1 SET FILTER TO 學號 =ALLTRIM() CASE =1 SET FILTER TO 學生姓名 =ALLTRIM() CASE =1 ENDCASE REPORT FORM .\ PREVIEW 菜單運行的界面如下： (圖 8) (圖 8) 系統(tǒng)菜單的設計 系統(tǒng)菜單的設計主要分為操作員管理、口令設置、權限 管理、系統(tǒng)日志、數(shù)據(jù)備份、數(shù)據(jù)恢復、 退出系統(tǒng)七項。各項調用相應的表單。在操作員管理項可實現(xiàn)操作員的添加，刪除，編輯等功能，口令設置實現(xiàn)口令修改的功能，權限管理實現(xiàn)該操作員相應的操作權限功能的設置，系統(tǒng)日志用來記錄每個操作員的登陸動作，便于系統(tǒng)的安全管理，數(shù)據(jù)備份和數(shù)據(jù)恢復主要是為數(shù)據(jù)庫的數(shù)據(jù)安全管理設置的。退出系統(tǒng)菜單功能實現(xiàn)退出到操作系統(tǒng)界面，把內存歸還給操作系統(tǒng)。系統(tǒng)菜單的各項設計類似于前幾項菜單的設計，代碼也基本類似于學生信息管理菜單的設計，在此不再詳細給出。操作員管理的菜單運行如下： (圖 10) 第四小組分工明細表： 系統(tǒng)規(guī)劃 表單設計 菜單設計 論文輸入 馬靜 15% 15% 10% 崔紅軍 15% 35% 30% 60% 蘇波 15% 15% 10% 黎龍 15% 30% 10% 洪曉雷 15% 20% 20% 康玉濤 5% 10% 20% 項 目 名 字 楊凱峰 20% 10% 參與資料： VF 數(shù)據(jù)庫設計 鐵道出版社 39。Go away! You mustn39。t look.39。 I hesitated, but childhood is a time thic kly beset with inprehensible, though important, conventions, so I withdrew a few yards and turned my back. I heard her breathing hard. Then she was crying again. I turned round. 39。I can39。t,39。 she said, looking at me fearfully through her tears, so I knelt down to see what I could do about it. 39。You mustn39。t ever tell,39。 she said. 39。Never, never! Promise?39。 I promised. She was very brave. Nothing more than the puppy noises. When I did succeed in getting the foot free, it looked queer: I mean, it was all twisted and puffy I didn39。t even notice then that it had more than the usual number of toes. . . . I managed to hammer the shoe out of the cleft, and handed it to her. But she found she could not put it on her swollen foot. Nor could she put the foot to the ground. I thought I might carry her on my back, but she was heavier than I expected, and it was clear that we should not get far like that. 39。I39。ll have to go and fetch somebod