【文章內(nèi)容簡(jiǎn)介】 ty off if ==取消 = =.f. =.f. =刪除 =.t. =修改 else if alltrim()== =messagebox(缺少完整信息，無(wú)法刪除！ ,0+48,警告 ) else use deandma exclusive =alltrim() nn=messagebox(是否確定刪除此班級(jí) ,與其相關(guān)的數(shù)據(jù)都將刪除！ ,1+48,警告 ) if nn==1 t=0 locate for alltrim( )=alltrim() delete pack t=1 if t==0 messagebox(將刪除的內(nèi)容不存在，請(qǐng)重新輸入。 ,64,提示 ) endif endif = amp。amp。重新顯示 List列表 =alltrim() 17 endif endif 學(xué)生成績(jī)錄入 “確定”按鈕的 click事件添加如下的代碼 xuehao=allt() banji=allt() kecheng=allt() xueqi=allt() chengji=allt() sele grade if chengji== tt=messagebox(想輸入單科成績(jī)嗎？ ,4+32,提示 ) if tt==6 else endif else *locate for allt(學(xué)號(hào) )=xuehao *if eof() locate for allt(課程 )=kecheng if allt(學(xué)號(hào) )==.(班級(jí) )==banji repl 學(xué)號(hào) with xuehao repl 成績(jī) with val(chengji) repl 學(xué)期 with xueqi 18 else * append blank * repl 學(xué)號(hào) with xuehao * repl 班級(jí) with banji * repl 課程 with kecheng * repl 成績(jī) with val(chengji) * repl 學(xué)期 with xueqi *endif *else locate for allt(學(xué)號(hào) )=xuehao .and. allt(課程 )==kecheng .and. allt(學(xué)期 )==xueqi if eof() append blank repl 學(xué)號(hào) with xuehao repl 班級(jí) with banji repl 課程 with kecheng repl 成績(jī) with val(chengji) repl 學(xué)期 with xueqi else tt=messagebox(該科 的成績(jī)已存在，是否覆蓋？ ,4+32+256,提示 ) if tt==6 repl 成績(jī) with val(chengji) endif endif endif =.f. endif “查詢”按鈕的 click事件添加如下的代碼 sele ls if allt()== messagebox(請(qǐng)輸入學(xué)號(hào)或姓名！ ,64,提示 ) else locate for 學(xué)號(hào) =allt().or. 姓名=allt() if eof() messagebox(該班級(jí)沒(méi)有此人??！ ,64,提示 ) = 19 go nhere else =學(xué)號(hào) endif endif 修改學(xué)生成績(jī) “快速查詢”按鈕的 click事件添加如下的代碼 sele lsbj if allt()== messagebox(請(qǐng)輸入學(xué)號(hào)或姓名！ ,16,提示 ) else locate for 學(xué)號(hào) =allt().or. 姓名=allt() if eof() messagebox(本班級(jí)沒(méi)有此人，請(qǐng)重新輸入！ ,64,提示 ) = else xuehao=allt(學(xué)號(hào) ) 20 =姓名 =學(xué)號(hào) endif endif “下一位”按鈕的 click事件添加如下的代碼 =.t. =.t. if !allt()== sele lsbj skip 1 if eof() =.f. =.f. messagebox(已經(jīng)到最后一條記錄了！ ,48,提示 ) go bottom endif xuehao=allt(學(xué)號(hào) ) =allt(姓名 ) =allt(學(xué)號(hào) ) 21 學(xué)生成績(jī)查詢 “補(bǔ)考統(tǒng)計(jì)”按鈕的 click事件添加如下的代碼 if allt()== messagebox(請(qǐng)選擇班級(jí) !,64,提示 ) else bkbj= bkxq= do form bukao endif “定位查詢”按鈕的 click事件添加如下的代碼 if allt()== messagebox(請(qǐng)輸入學(xué)號(hào)或姓名！ ,64,提示 ) else locate for allt( )=allt().or.。 allt( )=allt() if found() lsxh=allt( ) lsxm=allt( ) buxq=allt() do form dgcj 22 else messagebox(沒(méi)有此人，請(qǐng)重新輸入 ,64,提示 ) endif endif 用戶管理 List1的 init事件中添加的代碼如下 sele yonghu (管理員 ) locate for 標(biāo)識(shí) =.T. do while found() (+姓名 ) continue enddo go top locate for 標(biāo)識(shí) =.F. (普通用戶 ) do while found() (+姓名 ) continue enddo “注冊(cè)”按鈕的 click事件添加如下的代碼 23 Set safety off sele yonghu if alltrim()== messagebox(用戶名不能為空！ ,0+48,警告 ) else locate for 姓名 =alltrim() if(.not. eof()) messagebox(此用戶已存在，請(qǐng)重新輸入！ ,64,警告 ) = else if alltrim()== messagebox(密碼不能為空！ ,0+48,警告 ) else if ()==() append blank repl 姓名 with alltrim(),。 密碼 with alltrim() if ==1 repl 標(biāo)識(shí) with .T. else repl 標(biāo)識(shí) with .F. endif = = = =.f. =.f. else tt=messagebox(確認(rèn)密碼錯(cuò)誤，請(qǐng)重新輸入！ ,0+48,警告 ) if tt==1 =.t. =.t. = 24 endif endif endif endif endif “刪除” 按鈕的 click事件添加如下的代碼 if allt()== messagebox(請(qǐng)選擇或輸入用戶名 ,64,提示 ) else use yonghu locate for 姓名 =allt()。 . =allt() if eof() messagebox(請(qǐng)選擇或輸入正確的用戶名 ,64,提示 ) = = else tt=messagebox(一定要?jiǎng)h除嗎？ ,4+48,刪除確認(rèn) ) if tt==6 delete pack endif endif endif 25 修改用戶密碼 “修改”按鈕的 click事件添加如下的代碼 sele yonghu if allt()== else locate for allt(姓名 )=allt() if eof() messagebox(此用戶不存在，請(qǐng)重新輸入！ ,64,提示 ) = () else if !allt(密碼 )==allt() messagebox(密碼錯(cuò)誤，請(qǐng)重新輸入！ ,64,提示 ) = () else if allt()== messagebox(請(qǐng)輸入新密碼！ ,64,提示 ) else if !allt()==allt() messagebox(確認(rèn)密碼錯(cuò)誤，請(qǐng)重新輸入！ ,64,提示 ) = else 26 repl 密碼 with allt() endif endif endif endif endif 關(guān)于系統(tǒng) 退出系統(tǒng) if messagebox(是否退出學(xué)生信息官系統(tǒng)？ ,36,學(xué)生信息管理系統(tǒng) )=6 Close all amp。amp。關(guān)閉所有打開(kāi)的文件 Clear Events amp。amp。結(jié)束事件循環(huán)，退出圖書(shū)管理系統(tǒng) Endif 27 6 結(jié)論 學(xué)生信息管理系統(tǒng)是學(xué)校信息管理系統(tǒng)的一個(gè)重要組成部分。他為其他系統(tǒng)（如學(xué)校圖書(shū)管理系統(tǒng)、學(xué)校檔案管理系統(tǒng)、教學(xué)管理系統(tǒng)、總務(wù)后勤管理系統(tǒng)等）提供學(xué)生的基本信息，同時(shí)它也需要如教學(xué)管理系統(tǒng)提供課程設(shè)置數(shù)據(jù)等。這些 系統(tǒng)在具體應(yīng)用中構(gòu)成一個(gè)大系統(tǒng)，相互調(diào)用對(duì)方的數(shù)據(jù)。由以上分析，我們可以充分認(rèn)識(shí)到設(shè)計(jì)并開(kāi)發(fā)一個(gè)學(xué)生信息管理系統(tǒng)的必要性和迫切性，本次設(shè)計(jì)和開(kāi)發(fā)的學(xué)生信息管理系統(tǒng)應(yīng)符合學(xué)校學(xué)生信息管理的規(guī)定，滿足對(duì)學(xué)校學(xué)生信息管理的需要，并達(dá)到操作過(guò)程中的直觀，方便，實(shí)用，安全等要求。系統(tǒng)采用模塊化程序設(shè)計(jì)的方法，既便于系統(tǒng)功能的組合和修改，又便于未參與系統(tǒng)開(kāi)發(fā)的技術(shù)維護(hù)人員補(bǔ)充和維護(hù)。 SIMS 通過(guò)教育網(wǎng)絡(luò)或互聯(lián)網(wǎng)把整個(gè)學(xué)校的學(xué)生信息匯聚起來(lái)，為學(xué)校教育主管部門提供全面及時(shí)的學(xué)生信息，方便管理，同時(shí)亦可通過(guò)校園網(wǎng)擴(kuò)展各類信 息化應(yīng)用，共享學(xué)生信息。 28 致 謝 踉踉蹌蹌地忙碌了 這些天 ，我的畢業(yè)設(shè)計(jì)課題也終將告一段落。點(diǎn)擊運(yùn)行，也基本達(dá)到預(yù)期的效果，虛榮的成就感在沒(méi)人的時(shí)候也總會(huì)冒上心頭。但由于能力和時(shí)間的關(guān)系，總是覺(jué)得有很多不盡人意的地方，譬如功能不全、外觀粗糙、底層代碼的不合理 …… 數(shù)不勝數(shù)?？墒?，我又會(huì)有點(diǎn)自戀式地安慰自己：做一件事情，不必過(guò)于在乎最終的結(jié)果，可貴的是過(guò)程中的收獲。以此語(yǔ)言來(lái)安撫我尚沒(méi)平復(fù)的心。 畢業(yè)設(shè)計(jì)，也許是我大學(xué)生涯交上的最后一個(gè)作業(yè)了。想籍 次機(jī)會(huì)感謝四年以來(lái)給我?guī)椭乃欣蠋?、同學(xué)，你們的友誼是我人生的財(cái)富，是我生命中不可或缺的一部分。我的畢業(yè)指導(dǎo)老師 謝鵬 老師，給我不厭其煩的指導(dǎo)。在此，特向 他 道聲謝謝。 29 參考文獻(xiàn) FoxPro 數(shù)據(jù)庫(kù)應(yīng)用實(shí)例完全解析 .北京：人民郵電出版社 .2021 年 FoxPro 軟件項(xiàng)目開(kāi)發(fā)實(shí)例 .北京：電子工業(yè)出版社 .2021 年 3. 周佩德 .數(shù)據(jù)庫(kù)原理及應(yīng)用 .北京：電子工業(yè)出版社 .2021 年 4．史濟(jì)民、湯觀全等 .Visual FoxPro 及其應(yīng)用系統(tǒng)開(kāi)發(fā) .北京 :清華大學(xué)出版社 .2021 5．鄭硯、周青 .Visual FoxPro 實(shí)用編程 100 例 .北京 :中國(guó)鐵道出版社 .2021 6．伍軍良 .Visual FoxPro :中國(guó)水利水電出版社 .2021 7．邵陽(yáng)、谷宇等 .Visual FoxPro 數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)實(shí)例導(dǎo)航 .北京 :人民郵電出版社 .2021 8．網(wǎng)冠科技 .Visual FoxPro 時(shí)尚變編程百例 .北京 :機(jī)械工業(yè)出版社 .2021 9．夏輝 王冬等 .Visual FoxPro 函數(shù)和系統(tǒng)變量手冊(cè) .北京 :清華大學(xué)出版社 .2021 10．陳華生 單啟成 .Visual FoxPro 教程 .蘇州 :蘇州大學(xué)出版社 .2021 11．錢培德 朱巧明 .Visual FoxPro 學(xué)習(xí)指導(dǎo) .蘇州 :蘇州大學(xué)出版社 .2021 1 原文已完。下文為附加文檔，如不需要，下載后可以編輯刪除，謝謝！ 施工組織設(shè)計(jì) 本施工組織設(shè)計(jì)是本著“一流的質(zhì)量、一流的工期、科學(xué)管理”來(lái)進(jìn)行編制的。編制時(shí)，我公司技術(shù)發(fā)展部、質(zhì)檢科以及項(xiàng)目部經(jīng)過(guò)精心研究、合理組織、充分利用先進(jìn)工藝 ，特制定本施工組織設(shè)計(jì)。 一、 工程概況： 西夏建材