【正文】
)六、參考文獻(xiàn)(參考的書籍或互聯(lián)網(wǎng)資源)1 譚浩強(qiáng).C程序設(shè)計(jì).北京:清華大學(xué)出版社,20052 ……略……27。系統(tǒng)菜單的各項(xiàng)設(shè)計(jì)類似于前幾項(xiàng)菜單的設(shè)計(jì),代碼也基本類似于學(xué)生信息管理菜單的設(shè)計(jì),在此不再詳細(xì)給出。在操作員管理項(xiàng)可實(shí)現(xiàn)操作員的添加,刪除,編輯等功能,口令設(shè)置實(shí)現(xiàn)口令修改的功能,權(quán)限管理實(shí)現(xiàn)該操作員相應(yīng)的操作權(quán)限功能的設(shè)置,系統(tǒng)日志用來記錄每個(gè)操作員的登陸動(dòng)作,便于系統(tǒng)的安全管理,數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)主要是為數(shù)據(jù)庫的數(shù)據(jù)安全管理設(shè)置的。=ALLTRIM() CASE =1ENDCASEREPORT FORM .\ PREVIEW……系統(tǒng)菜單的設(shè)計(jì)主要分為操作員管理、口令設(shè)置、權(quán)限管理、系統(tǒng)日志、數(shù)據(jù)備份、數(shù)據(jù)恢復(fù)、 退出系統(tǒng)七項(xiàng)。其打印預(yù)覽按鈕的CLICK的事件代碼為:DO CASE CASE =1 SET FILTER TO 學(xué)號(hào)=ALLTRIM()。2) 學(xué)生成績查詢表單界面中主要控件屬性如表9所示。菜單調(diào)用 。 OTHERWISE MESSAGEBOX(未輸入查詢時(shí)間!,提示)ENDCASECOMMAND1的CLICK事件代碼:REPORT FORM .\menu1\ PREVIEW實(shí)現(xiàn)調(diào)用.\menu1\。顯示全體記錄 =.F. =.F. =.F. =.F. =.F. =.F. =.F. SET FILTER TO GO TOP ENDCASEGRID1的數(shù)據(jù)連接連接RSB表。按出生日期查詢 =.F. =.F. =.T. =.T. =.T. =.T. =.T. CASE =4 amp。按姓名查詢 =.T. =.T. =.F. =.F. =.F. =.F. =.F. =請(qǐng)輸入學(xué)生姓名: = () CASE =3 amp。按學(xué)號(hào)查詢 =.T. =.T. =.F. =.F. =.F. =.F. =.F. =請(qǐng)輸入要查詢的學(xué)號(hào): = CASE =2 amp。表8學(xué)生信息查詢表單控件屬性對(duì)象名稱屬性名稱屬性值Form1caption學(xué)生信息查詢AutoCenter.T.Grid1recordsourcetype1別名recordsourcersbOptiongroup1buttoncount4value1Command1caption查詢2) 各事件的代碼如下:FORM1的INIT事件代碼:*輸入編號(hào)、姓名提示標(biāo)簽及文本框=.F.=.F.()*輸入起始日期、截止日期提示標(biāo)簽及文本框不可見=.F.=.F.=.F.=.F.=.F.*表格數(shù)據(jù)不可修改=.T.Optiongroup1的CLICK事件代碼:*選定查詢類別后,設(shè)置各控件是否可見DO CASE CASE =1 amp。功能是便于指導(dǎo)員和老師,學(xué)生用戶的檢索查詢。學(xué)生姓名=alltrim()set filter to運(yùn)行界面:(如圖7)圖7學(xué)生數(shù)據(jù)維護(hù)(chaxun)的設(shè)計(jì)學(xué)生人事信息的查詢?nèi)鐖D8,提供學(xué)號(hào),姓名,全體查詢。號(hào)=alltrim()“退出“按鈕的CLICK事件代碼:select rsbpack“TEXT7”的valid事件代碼為:select rsbset filter to 學(xué)號(hào)=alltrim() or ?!暗谝粋€(gè)“按鈕的CLICK事件代碼:select rsbgo top=.f.=.f.if not eof()=.t.=.t.endif“前一個(gè)“按鈕的CLICK事件代碼:select rsbskip 1if bof()go top=.f.=.f.endifif not eof()=.t.=.t.endif“下一個(gè)“按鈕的CLICK事件代碼:select rsbskipif eof()go bottom=.f.=.f.endifif not bof()=.t.=.t.endif“最后一