【正文】
息表字段名稱字段類型寬度小數(shù)位NULL學號C12否姓名C8否性別C2否專業(yè)C10貸款否L2備注M4()學生基成績表()用于成績的基本等信息,包括學號、課程編號、課程名稱、成績等信息,其邏輯結(jié)構(gòu)如表2所示。程序的調(diào)用關系如下:,封面中調(diào)用“口令驗證窗口”。清屏CLEAR ALL amp。關閉各種類型的文件SET ESCAPE OFF amp。指定在改寫已有文件時不顯示對話框SET DELETE ON amp。在程序執(zhí)行期間廢止 Visual FoxPro 主菜單欄RELEASE WINDOW 常用 amp。年份以四位顯示SET DATE TO ymd amp。指定日期分隔字符SET HOURS TO 24 amp。系統(tǒng)窗口標題=.\ amp。調(diào)用登錄界面表單On ShutDown do OnShutdown amp。建立事件循環(huán) On ShutDown amp。退出系統(tǒng)時記錄操作員退出時間 CLOSE ALL CLEAR EVENTS amp。結(jié)束當前 Visual FoxPro 工作期,并將控制權(quán)返回給操作系統(tǒng)ENDIFENDFUNC運行主程序后,系統(tǒng)調(diào)用登陸界面表單()(圖3)圖3 系統(tǒng)調(diào)用界面1) 將用戶表添加到系統(tǒng)調(diào)用表單的數(shù)據(jù)環(huán)境中。,2??CHR(7)FORM1的UNLOAD事件代碼:SET BELL TO 39。()界面設計密碼驗證作為系統(tǒng)最基本的安全管理步驟。具體的代碼實現(xiàn)也將在詳細設計書說明。(2) ,并同時記錄此操作員的登錄系統(tǒng)的時間。表5 登陸表單控件屬性對象名稱屬性名稱屬性值Form1caption口令輸入窗口AutoCenter.T.Command1caption確定Command2caption退出3)事件代碼:Form1的init事件代碼:SET EXACT ON amp。數(shù)組用于實現(xiàn)菜單項權(quán)限PUBLIC i amp。operat用于保存操作員姓名 i=0“確定”按鈕(COMMAND1)CLICK事件代碼:*判斷密碼是否正確i=i+1SELECT operatorLOCATE FOR 操作員姓名=ALLTRIM()DO CASECASE i=3 AND FOUND() AND = *輸入次數(shù)未超過3次且用戶名正確、口令正確 operat=INSERT INTO log(操作員代號,操作員姓名,登錄時間) VALUES(。amp。主菜單共分為三個分菜單項:學生信息管理,學生成績管理,系統(tǒng)管理。每個操作員對每個菜單項有兩種權(quán)限:0或1。本系統(tǒng)共10個菜單項,所以定義的數(shù)組也包含10個元素。學生人事表和成績表的結(jié)構(gòu)請打開數(shù)據(jù)庫表查看。rgb(0,255,0)),column)select rsb 此代碼實現(xiàn)不現(xiàn)顏色顯示選中的GRID對象的行及列。學生姓名=alltrim()locate for 學號=alltrim() or 。圖8學生信息查詢表單1) 學生信息查詢表單界面中主要控件屬性如表8所示。amp。amp。該表單的運行圖示如下(圖9)圖9學生信息查詢表單()設計首先,學生成績查詢菜單的設計與學生信息查詢菜單的設計比較類似。表9學生成績查詢表單控件屬性對象名稱屬性名稱屬性值Form1caption學生成績查詢AutoCenter.T.Grid1recordsourcetype1別名recordsourcecjbOptiongroup1buttoncount3value1Command1caption打印預覽…設計界面如圖10,界面如下:圖10學生成績查詢表單3) 各事件代碼均類似于學生信息查詢的事件代碼。各項調(diào)用相應的表單。操作員管理的菜單運行如下:(圖11)圖11 學生成績查詢六、參考文獻[1] 周永恒.Visual FoxPro 基礎教程 (第3版).北京:高等教育出版社,2006.26