【正文】
*輸入起始日期、截止日期提示標(biāo)簽及文本框不可見=.F.=.F.=.F.=.F.=.F.*表格數(shù)據(jù)不可修改=.T.Optiongroup1的CLICK事件代碼:*選定查詢類別后,設(shè)置各控件是否可見DO CASE CASE =1 amp。amp。按學(xué)號查詢 =.T. =.T. =.F. =.F. =.F. =.F. =.F. =請輸入要查詢的學(xué)號: = CASE =2 amp。amp。按姓名查詢 =.T. =.T. =.F. =.F. =.F. =.F. =.F. =請輸入學(xué)生姓名: = () 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 ENDCASEGRID1的數(shù)據(jù)連接連接RSB表。一一對應(yīng)該對應(yīng)的數(shù)據(jù)項(xiàng),COMMAND4(查詢)的CLICK事件代碼:*按輸入的日期條件在表格中顯示查詢的記錄SELECT rsbPUBLIC qsrq,jzrqqsrq=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(未輸入查詢時間!,提示)ENDCASECOMMAND1的CLICK事件代碼:REPORT FORM .\menu1\ PREVIEW實(shí)現(xiàn)調(diào)用.\menu1\。該表單的運(yùn)行圖示如下(圖9)圖9學(xué)生信息查詢表單()設(shè)計(jì)首先,學(xué)生成績查詢菜單的設(shè)計(jì)與學(xué)生信息查詢菜單的設(shè)計(jì)比較類似。菜單調(diào)用 。1) 。2) 學(xué)生成績查詢表單界面中主要控件屬性如表9所示。表9學(xué)生成績查詢表單控件屬性對象名稱屬性名稱屬性值Form1caption學(xué)生成績查詢AutoCenter.T.Grid1recordsourcetype1別名recordsourcecjbOptiongroup1buttoncount3value1Command1caption打印預(yù)覽…設(shè)計(jì)界面如圖10,界面如下:圖10學(xué)生成績查詢表單3) 各事件代碼均類似于學(xué)生信息查詢的事件代碼。其打印預(yù)覽按鈕的CLICK的事件代碼為:DO CASE CASE =1 SET FILTER TO 學(xué)號=ALLTRIM()。 CASE =1 SET FILTER TO 學(xué)生姓名。=ALLTRIM() CASE =1ENDCASEREPORT FORM .\ PREVIEW……系統(tǒng)菜單的設(shè)計(jì)主要分為操作員管理、口令設(shè)置、權(quán)限管理、系統(tǒng)日志、數(shù)據(jù)備份、數(shù)據(jù)恢復(fù)、 退出系統(tǒng)七項(xiàng)。各項(xiàng)調(diào)用相應(yīng)的表單。在操作員管理項(xiàng)可實(shí)現(xiàn)操作員的添加,刪除,編輯等功能,口令設(shè)置實(shí)現(xiàn)口令修改的功能,權(quán)限管理實(shí)現(xiàn)該操作員相應(yīng)的操作權(quán)限功能的設(shè)置,系統(tǒng)日志用來記錄每個操作員的登陸動作,便于系統(tǒng)的安全管理,數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)主要是為數(shù)據(jù)庫的數(shù)據(jù)安全管理設(shè)置的。退出系統(tǒng)菜單功能實(shí)現(xiàn)退出到操作系統(tǒng)界面,把內(nèi)存歸還給操作系統(tǒng)。系統(tǒng)菜單的各項(xiàng)設(shè)計(jì)類似于前幾項(xiàng)菜單的設(shè)計(jì),代碼也基本類似于學(xué)生信息管理菜單的設(shè)計(jì),在此不再詳細(xì)給出。操作員管理的菜單運(yùn)行如下:(圖11)圖11 學(xué)生成績查詢六、參考文獻(xiàn)[1] 周永恒.Visual FoxPro 基礎(chǔ)教程 (第3版).北京:高等教育出版社,2006.26