VisualFoxPro課程設(shè)計(jì)實(shí)驗(yàn)報(bào)告

中國(guó)文案中國(guó)最大的商務(wù)辦公文檔下載基地： / -項(xiàng)目方案 調(diào)查報(bào)告 可研分析 廣告策劃 案例分析商業(yè)計(jì)劃 項(xiàng)目管理 電子商務(wù) 財(cái)稅管理 法律文書(shū)戰(zhàn)略管理 企業(yè)文化 行政管理 人力資源 管理制度合同文本 個(gè)人簡(jiǎn)歷 年終總結(jié) 公文寫(xiě)作 視頻講座-中國(guó)文案： 中國(guó)商務(wù)辦公文案的下載基地.娛樂(lè)中國(guó)： 免費(fèi)電影下載 在線電影觀看.辦公休閑小游戲： 超多FLASH游戲免費(fèi)玩.以下為文案正文：Visual FoxPro 課程設(shè)計(jì)實(shí)驗(yàn)報(bào)告“學(xué)生信息管理系統(tǒng)”國(guó)貿(mào)2班200204074224佘楷一.設(shè)計(jì)題目學(xué)生信息管理系統(tǒng)二.開(kāi)發(fā)軟件VFP6.0三.課題要求(1) 掌握課堂講授的基本數(shù)據(jù)庫(kù)知識(shí)和VFP的基本技巧： 1. 數(shù)據(jù)庫(kù)管理系統(tǒng)合數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)； 2. VFP的界面組成與操作； 3. VFP的工作方式； 4. 標(biāo)的基本操作（表的建立與修改、表達(dá)式、維護(hù)命令）； 5. 表的查詢與統(tǒng)計(jì)（排序與索引，SELECT-SQL查詢，數(shù)據(jù)庫(kù)于視圖）； 6. 程序設(shè)計(jì)初步（程序文件，程序的控制，多模塊程序）。(2) 自學(xué)部分書(shū)本關(guān)于VFP的內(nèi)容： 1. 菜單設(shè)計(jì)； 2. 表單設(shè)計(jì)； 3. 表單控件設(shè)計(jì)； 4. 實(shí)例：汽車(chē)修理管理系統(tǒng)的開(kāi)發(fā)。(3) 要求能夠獨(dú)立設(shè)計(jì)。完成一個(gè)簡(jiǎn)單的學(xué)生信息管理系統(tǒng)，此系統(tǒng)必須有如下基本功能： 1. 數(shù)據(jù)的查詢； 2. 記錄的增加，刪除，修改等功能； 3. 系統(tǒng)界面良好； 4. 操作方便，運(yùn)行穩(wěn)定。四.目的掌握基本的數(shù)據(jù)庫(kù)知識(shí)，熟悉VFP的使用。學(xué)習(xí)VFP數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)開(kāi)發(fā)的一般步驟：1. 需求分析2. 數(shù)據(jù)庫(kù)設(shè)計(jì)3. 應(yīng)用程序設(shè)計(jì)4. 軟件的運(yùn)行測(cè)試通過(guò)簡(jiǎn)單的系統(tǒng)設(shè)計(jì)、開(kāi)發(fā)，激發(fā)學(xué)生的學(xué)習(xí)興趣和動(dòng)手能力。五.設(shè)計(jì)時(shí)間第12周第19周六.設(shè)計(jì)主要流程流程圖：用戶登陸logo.scx管理員登陸普通用戶登陸選擇用戶類(lèi)型查詢維護(hù)退出統(tǒng)計(jì)退出查詢統(tǒng)計(jì)成績(jī)信息課程信息學(xué)生信息成績(jī)信息課程信息學(xué)生信息個(gè)人統(tǒng)計(jì)課程統(tǒng)計(jì)成績(jī)信息課程信息學(xué)生信息課程統(tǒng)計(jì)個(gè)人統(tǒng)計(jì)(1) 數(shù)據(jù)庫(kù)設(shè)計(jì)根據(jù)此系統(tǒng)需要建立數(shù)據(jù)庫(kù)sexxdb.dbc，數(shù)據(jù)庫(kù)中有如下幾個(gè)數(shù)據(jù)表：student.dbf、course.dbf、score.dbf、password.dbf、passwordm.dbf。student.dbf記錄的是學(xué)生的個(gè)人信息，如：學(xué)號(hào)、姓名、性別、民族、出生日期、所在專(zhuān)業(yè)、籍貫。Course.dbf記錄的是有關(guān)課程的信息，如：課程編號(hào)、課程名稱(chēng)、學(xué)分、任課老師。Score.dbf記錄的是每個(gè)同學(xué)不同科目的考試成績(jī)，有以下這些內(nèi)容：課程編號(hào)、課程名稱(chēng)、學(xué)號(hào)、成績(jī)。Password.dbf記錄系統(tǒng)普通用戶的用戶名和密碼。Passwordm.dbf記錄系統(tǒng)管理員的用戶名和密碼。(2) 應(yīng)用程序設(shè)計(jì)由于本系統(tǒng)是多用戶登陸，當(dāng)是管理員登陸時(shí)此系統(tǒng)的所有功能都可能用，當(dāng)是普通用戶登陸時(shí)此系統(tǒng)時(shí)將無(wú)法使用系統(tǒng)的維護(hù)功能。下面就各個(gè)表單功能和使用作如下簡(jiǎn)述：1. 用戶登錄先選擇用戶類(lèi)型：普通用戶、管理員，輸入密碼，按確定鍵進(jìn)入（按重寫(xiě)鍵重新填寫(xiě)；按退出鍵退出系統(tǒng)）。主要代碼如下：optiongroup1.click事件：do case case this.value=0 bo1.rowsource= case this.value=1 bo1.rowsource=password.用戶名 case this.value=2 bo1.rowsource=passwordm.管理員endcase“確定”鍵command1.click事件：public guestprivate Password1do case case thisform.optiongroup1.value=1 select password password1=alltrim(thisform.text1.value) locate for alltrim(用戶名)=alltrim(bo1.value) if found() and password1=alltrim(密碼) guest=2 thisform.release do form main.scx else =messagebox(用戶名或密碼錯(cuò)誤,請(qǐng)重新輸入!) thisform.text1.setfocus endif case thisform.optiongroup1.value=2 select passwordm password1=alltrim(thisform.text1.value) locate for alltrim(管理員)=alltrim(bo1.value) if found() and password1=alltrim(密碼) guest=1 thisform.release do form main.scx else =messagebox(用戶名或密碼錯(cuò)誤,請(qǐng)重新輸入!) thisform.text1.setfocus endifendcase在此代碼中定義了公共變量guest，是為了判斷用戶類(lèi)型以確定進(jìn)入系統(tǒng)界面后“維護(hù)”鍵是否可用?！爸貙?xiě)”鍵command2.click事件：bo1.value=thisform.text1.value=thisform.text1.setfocus“退出”鍵command3.click事件：thisform.release2. 系統(tǒng)界面當(dāng)使用者是普通用戶時(shí)，系統(tǒng)界面中的“維護(hù)”鍵是不可用的。當(dāng)管理員登陸時(shí)則可以使用“維護(hù)”鍵?！熬S護(hù)”鍵可否使用是通過(guò)form.activate來(lái)實(shí)現(xiàn)的：if guest=1 thisform.Command2.enabled=.t. else thisform.Command2.enabled=.f.endif“查詢”、“維護(hù)”、“統(tǒng)計(jì)”、“退出”鍵的click代碼分別為：do form chaxun.scxdo form weihu.scxdo form statistic.scxthisform.releasedo form logo3. 查詢界面用戶可以在此查詢學(xué)生信息、課程信息和成績(jī)信息。查詢學(xué)生信息時(shí)“確定”鍵的代碼是：thisform.pageframe1.page1.grid1.recordsource=XH=alltrim(thisform.pageframe1.page1.text1.value)thisform.pageframe1.page1.grid1.recordsource=select student.學(xué)號(hào), student.姓名, student.性別, student.民族, student.出生日期, student.專(zhuān)業(yè), student.籍貫 from student where alltrim(學(xué)號(hào))=XH or alltrim(姓名)=XH into cursor tempthisform.pageframe1.page1.text1.value=查詢課程信息時(shí)的代碼為：kcmc=alltrim(thisform.pageframe1.page2.text1.value)thisform.pageframe1.page2.grid1.recordsource=select course.課程編號(hào), course.課程名稱(chēng), course.學(xué)分, course.任課老師 from course where alltrim(課程名稱(chēng))=kcmc or alltrim(課程編號(hào))=kcmc into cursor tempthisform.pageframe1.page2.text1.value=查詢成績(jī)信息時(shí)的代碼為：xh=alltrim(thisform.pageframe1.page3.text1.value)thisform.pageframe1.page3.grid1.recordsource=select student.學(xué)號(hào),student.姓名,course.課程名稱(chēng),score.成績(jī) from student,course,score where alltrim(score.學(xué)號(hào))=xh and alltrim(student.學(xué)號(hào))=alltrim(score.學(xué)號(hào)) and alltrim(course.課程編號(hào))=alltrim(score.課程編號(hào)) into cursor tempthisform.pageframe1.page3.text1.value=4. 維護(hù)界面只有管理員才能進(jìn)入此界面。進(jìn)入此界面后，選擇組合框里的一項(xiàng)可以查詢此項(xiàng)的數(shù)據(jù)，但不能修改，只有按下“進(jìn)行修改”鍵后才能進(jìn)行修改，修改后按“確定”鍵確認(rèn)修改。按“退出”鍵退出此界面。此界面中optiongroup1的click事件代碼為：do casecase thisform.optiongroup1.option1.value=1thisform.grid1.recordsource=studentthisform.grid1.refreshcase thisform.optiongroup1.option2.value=1thisform.grid1.recordsource=coursethisform.grid1.refreshcase thisform.optiongroup1.option3.value=1thisform.grid1.recordsource=mand1.enabled=.mand2.enabled=.mand3.enabled=.t.“進(jìn)行修改”鍵的click代碼為：thisform.grid1.enabled=.t.thisform.grid1.readonly=.f.thisform.grid1.allowaddnew=.mand1.enabled=.f.“確定”鍵的click代碼為：usethisform.grid1.enabled=.t.thisform.grid1.allowaddnew=.f.thisform.grid1.readonly=.t.&thisform.grid1.recordsource=mand1.enabled=.mand2.enabled=.mand3.enabled=.f.5. 統(tǒng)計(jì)界面通過(guò)選擇組合框中的選項(xiàng)，可以統(tǒng)計(jì)個(gè)人成績(jī)或某一課程的成績(jī)。此界面中optiongroup1的click事件代碼為：Do caseCase this.value=0 Tbo1.rowsource=Case this.value=1 Tbo1.rowsource=student.學(xué)號(hào)Case this.value=2 Tbo1.rowsource=course.課程名稱(chēng)Endcase“確定”鍵的click代碼為：do case case thisform.optiongroup1.value=1xh=alltrim(bo1.value)select scorecalculate max(成績(jī)),min(成績(jī)),avg(成績(jī)),cnt(); for 學(xué)號(hào)=xh to a1,a2,a3,a4&顯示統(tǒng)計(jì)結(jié)果Thisform.text1.value=alltrim(str(a1)Thisform.text2.value=alltrim(str(a2)Thisform.text3.value=alltrim(str(a3)Thisform.text4.value=alltrim(str(a4)Case thisform.optiongroup1.value=2 Kcmc=alltrim(bo1.value) Select course Locate for 課程名稱(chēng)=kcmc Select score Calculate max(成績(jī)),min(成績(jī)),avg(成績(jī)),cnt(); For 課程名稱(chēng)=kcmc to a1,a2,a3,a4 &顯示統(tǒng)計(jì)結(jié)果Thisform.text1.value=alltrim(str(a1)Thisform.text2.value=alltrim(str(a2)Thisform.text3.value=alltrim(str(a3)Thisform.text4.value=alltrim(str(a4)Endcase(3) 程序測(cè)試登陸系統(tǒng)，選擇選項(xiàng)按鈕組中的“普通用戶”，在組合框中選擇用戶（如用 “王儀”登陸，密碼為111111），查看