




版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡介
數(shù)據(jù)庫程序設(shè)計(jì)VFP班級(jí):人力資源 120231208090462013-2014目錄31.1 31.2 3 4 53.153.263.31011143.3.2 143.3.3 163.3.4 163.4 1616一、系統(tǒng)總分析1.1系統(tǒng)功能簡介錄入:錄入學(xué)號(hào)、學(xué)生姓名,錄入課程號(hào)、課程名,錄入成績修改:按課程號(hào)修改成績查詢:按學(xué)號(hào)查詢?cè)撏瑢W(xué)的各科成績、按課程號(hào)查詢?cè)撏瑢W(xué)的成績打?。喊凑n程號(hào)打印成績單1.2系統(tǒng)結(jié)構(gòu)圖學(xué)生信息管理系統(tǒng)學(xué)生 成績 課程 退出學(xué)學(xué)學(xué)打成成成成課課課課生生生績績績績程程程程輸維查印輸查維打輸維查打入護(hù)詢?nèi)朐冏o(hù)印入護(hù)詢印二、數(shù)據(jù)庫設(shè)計(jì)本系統(tǒng)根據(jù)學(xué)生成績單、基本信息單等單據(jù)的數(shù)據(jù)需求,從學(xué)生成績單、基本信息單、成績從高到低排序單相關(guān)數(shù)據(jù)統(tǒng)計(jì)單中歸納出三個(gè)表的數(shù)據(jù)庫。在項(xiàng)目文件中建立student.dbc數(shù)據(jù)庫,在數(shù)據(jù)庫中分別建立xs.dbf(學(xué)生表)、kc.dbf(課程表)、cj.dbf(成績表)三個(gè)表現(xiàn)將這些表列出如下:1)成績表:學(xué)號(hào)、課程號(hào)、成績一成績表名稱字段名數(shù)據(jù)類型寬度小數(shù)位數(shù)索引null學(xué)號(hào)XhC10無普通升序否課程號(hào)KchC3無普通升序否成績cjN30無否2)學(xué)生表:姓名、學(xué)號(hào)、性別、籍貫、入學(xué)成績、婚否、出生日期、簡歷、照片、外語二學(xué)生表名稱字段名字段類型寬度小數(shù)位數(shù)索引null姓名XmC6無無否學(xué)號(hào)XhC10無主索引否性別XbC2無無否籍貫JgC14無無否入學(xué)成績RxcjN30普通索引否婚否HfL1無無否出生日期CsrqC8無普通索引否簡歷JlM4無無否照片ZpG4無無否外語WyC10無無否(3)課程表:課程號(hào)、課程名、學(xué)分三課程表名稱字段名字段類型寬度索引null課程號(hào)kchC3主索引無課程名KcmC18無無學(xué)分xfN2無無信息如下圖:三、程序設(shè)計(jì)界面分別建立如下表單文件:3.1登錄表單(1)mm.scx(密碼)表單輸入姓名、密碼錯(cuò)誤小于四次可修改姓名密碼,輸入姓名、密碼4次錯(cuò)誤強(qiáng)制終止程序執(zhí)行,姓名密碼正確調(diào)用huanying.scx表單程序釋放當(dāng)前表單。命令:在form1中設(shè)置load事件公用變量:publicii=1命令按鈕“確認(rèn)”中 click事件代碼:i=i+1ifi<=3ifthisform.text2.value='201201'andthisform.text1.value=' 卞敏辰'messagebox('歡迎使用學(xué)生管理信息系統(tǒng) !',0,'信息提示')doformhuanying.scxthisform.releaseelseifthisform.text2.value='19930624'messagebox('用戶名稱錯(cuò)誤,請(qǐng)重新輸入 !',16,'信息提示')thisform.text1.value=''thisform.text1.setfocuselseifthisform.text1.value='王鵬'messagebox('密碼錯(cuò)誤,請(qǐng)重新輸入 !',16,'信息提示')thisform.text2.value=''thisform.text2.setfocuselsemessagebox('姓名和密碼都錯(cuò)誤,請(qǐng)重新輸入 !',16,'信息提示')thisform.text1.value=''thisform.text1.setfocusthisform.text2.value=''thisform.text2.setfocusendifendifendifelsemessagebox('你無權(quán)登陸本系統(tǒng) !',16,'信息提示')thisform.releaseendif顯示效果如下圖:用戶名錯(cuò)誤: 輸入三次以上密碼錯(cuò)誤:3.2歡迎界面(2)huanying.scx( 歡迎)表單點(diǎn)擊“確認(rèn)”按鈕調(diào)用 xitong表單,釋放當(dāng)前表單;如果不點(diǎn)擊“確認(rèn)”按鈕調(diào)用xitong表單10秒后自動(dòng)調(diào)用xitong表單,釋放當(dāng)前表單。點(diǎn)擊“重置時(shí)間”按鈕則重新計(jì)時(shí)。A.Timer1:internal屬性1000Clik事件代碼:thisform.text1.value=thisform.text1.value-1ifthisform.text1.value=0doformxitong.scxreleasethisformEndifB.command1:click事件代碼:doformxitong.scxreleasethisformC.command2:click事件代碼:thisform.text1.value=10顯示效果如下圖:3.3系統(tǒng)菜單(3)進(jìn)入xitong 頁面3.3.1學(xué)生1、xscx1.scx(學(xué)生查詢)cjcxxh表單,點(diǎn)擊相應(yīng)的按鈕調(diào)用相應(yīng)的表單或查詢,其中按學(xué)號(hào)查詢調(diào)用該表單中有一個(gè)下拉組合框,和一個(gè)表格構(gòu)成,下拉組合框中選擇姓名學(xué)號(hào),表格中顯示相應(yīng)的各門成績。按課程查詢類似,按專業(yè)號(hào)課程號(hào)、班級(jí)課程號(hào)查詢可以用SELE或表單完成。命令代碼:Command2:doformcjcx1Command1:doformcjcx2Command5:thisform.releaseA:按姓名學(xué)號(hào)查詢命令代碼:Combo1interactivechange 事件:x1=this.valuethisform.grid1.columncount=3thisform.grid1.recordsourcetype=4thisform.grid1.recordsource='select cj.xh,kch,cj fromcjwherecj.xh=bo1.value intocursorlx2'Thisform.refresh按課程號(hào)查詢命令代碼:Combo1interactivechange 事件:x1=this.valuethisform.grid1.columncount=3thisform.grid1.recordsourcetype=4thisform.grid1.recordsource='selectcj.kch,xh,cjfromcjwherecj.kch=x1intocursorlx3'thisform.refresh2、學(xué)生輸入xssr.scx(學(xué)生輸入)該表單可增加學(xué)生表記錄,學(xué)號(hào)相同不能輸入,為空不能輸入。確認(rèn)按鈕命令:i=thisform.optiongroup1.valuedocasecasei=1WY1="英語"casei=2WY1="日語"casei=3WY1="俄語"endcaseXM1=THISFORM.text1.V ALUEXh1=THISFORM.text2.VALUExb1=THISFORM.text3.VALUEJL1=THISFORM.edit1.VALUEIFLEN(ALLTRIM(XH1))=0=MESSAGEBOX(" 輸入項(xiàng)不能為空 !",0+16,"ERROR")THISFORM.text2.SETFOCUSELSESEEKXH1ORDERxhIFFOUND()=MESSAGEBOX("學(xué)號(hào)不唯一!",0+16,"ERROR")THISFORM.text2.SETFOCUSELSEINSERTINTOxs(xm,xh,xb,wy,bz)V ALUE(XM1,XH1,XB1,WY1,JL1)THISFORM.text1.VALUE=""THISFORM.text2.VALUE=""THISFORM.text3.VALUE="男"THISFORM.OPTIONGROUP1.V ALUE=1THISFORM.edit1.VALUE=""ENDIFENDIF關(guān)閉按鈕命令:Thisform.release顯示效果如下圖:當(dāng)為空值時(shí): 當(dāng)學(xué)號(hào)相同時(shí):3、學(xué)生維護(hù)xswh.scx(學(xué)生維護(hù))該表單可以通過往前往后翻或姓名查詢找到需要修改或刪除的記錄進(jìn)行修改或刪除。A:commandgroup1命令:docasecasethis.value=1gomand1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.t.casethis.value=2skip-1ifbof()gomand1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.t.elsethis.setall('enabled',.t.)endifcasethis.value=3skipifeof()gomand1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.f.elsethis.setall('enabled',.t.)endifcasethis.value=4gomand1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.f.endcaseThisform.refresh刪除按鈕:x=messagebox('您真的確定要?jiǎng)h除嗎? ',1)ifx=1selekcdeley=this.parent.parent.text1.valueselezykcsetordertokcdmscanforkcdh=ydeleendsselekcskipendiThisform.refresh關(guān)閉按鈕命令:Thisform.release運(yùn)行:第一條記錄: 第二條記錄:最后一條記錄: 刪除記錄:4、打印3.3.4成績1、成績查詢2、成績輸入Command1click事件命令代碼:thisform.releaseCommando2click1事件命令代碼:deleteskip-1appendblankthisform.refreshCommand3click事件命令代碼:xh1=THISFORM.text1.VALUEkch1=THISFORM.text2.VALUEcj1=THISFORM.text3.VALUEIFLEN(ALLTRIM(xh1))=0=MESSAGEBOX(" 輸入項(xiàng)不能為空 !",0+16,"ERROR")THISFORM.text1.SETFOCUSELSEINSERTINTOcj(xh,kch,cj)V ALUE(xh1,kch1,val(cj1))THISFORM.text1.VALUE=""THISFORM.text2.VALUE=""THISFORM.text3.VALUE=''ENDIF3、成績維護(hù)Commandgroup1click 事件命令代碼:DOCASECASETHIS.VALUE=1GOTOPTHIS.COMMAND1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.t.casethis.value=2skip-1ifbof()GOTOPTHIS.COMMAND1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.t.elsethis.setall('enabled',.t.)endifcasethis.value=3skipifbof()gobottomThIS.COMMAND1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.f.elsethis.setall('enabled',.t.)endifcasethis.value=4gobottomThIS.COMMAND1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.f.endcasethisform.refresh4、成績打印3.3.5課程1、課程查詢2、課程輸入3、課程維護(hù)4、課程打印3.3.5退出3.4報(bào)表四、總結(jié)當(dāng)今世界,信息科學(xué)技術(shù)已經(jīng)滲透到經(jīng)濟(jì)、文化和社會(huì)的各個(gè)領(lǐng)域,迅速改變著人們的觀念、生活和社會(huì)結(jié)構(gòu),作為大學(xué)生的我們應(yīng)該緊跟時(shí)代潮流,不斷豐富自己的知識(shí),以適應(yīng)知識(shí)經(jīng)濟(jì)發(fā)展的需要。通過這次關(guān)于學(xué)生信息管理系統(tǒng)的課程設(shè)計(jì),讓我更加深刻地感受到了掌握計(jì)算機(jī)知識(shí)的重要,并在這短暫的實(shí)踐中熟練的掌握了數(shù)據(jù)庫的設(shè)計(jì)、表單的設(shè)計(jì)、表單與數(shù)據(jù)庫的連接、SQL語言的使用和了解它的功能:數(shù)據(jù)定義、數(shù)據(jù)操縱、數(shù)據(jù)控制,以及簡單VF程序的編寫?;緦?shí)現(xiàn)了學(xué)生信息的管理,包括系統(tǒng)的登錄、學(xué)生信息的錄入、學(xué)生信息的瀏覽、學(xué)生信息的查詢、學(xué)生信息的修改和學(xué)生信息的刪除,并對(duì)VisualFoxPro6.0的各種功能有了進(jìn)一步的了解,并且使我的動(dòng)手操作能力得到了很大提高,為我們以后更加深入的學(xué)習(xí)奠定了基礎(chǔ)
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 2025-2030年中國烯烴行業(yè)現(xiàn)狀供需分析及市場深度研究發(fā)展前景及規(guī)劃可行性分析研究報(bào)告
- 2025-2030年中國燒烤汁行業(yè)市場現(xiàn)狀供需分析及投資評(píng)估規(guī)劃分析研究報(bào)告
- 換填淤泥施工方案
- 2025-2030年中國混合動(dòng)力車行業(yè)市場深度調(diào)研及發(fā)展趨勢與投資前景研究報(bào)告
- 退休返聘人員評(píng)估與考核協(xié)議
- 防空地下室改造實(shí)施方案(模板范文)
- 綠色建筑造價(jià)咨詢協(xié)議
- 2025至2030年中國碳素鋼線材行業(yè)投資前景及策略咨詢研究報(bào)告
- 城鎮(zhèn)污泥處理設(shè)施工程可行性研究報(bào)告(范文參考)
- 2025至2030年中國熱塑噴涂路面標(biāo)線機(jī)市場分析及競爭策略研究報(bào)告
- 供貨、安裝、調(diào)試、驗(yàn)收方案
- 第四課:印巴戰(zhàn)爭
- 武漢綠地中心項(xiàng)目技術(shù)管理策劃書(48頁)
- 婚無遠(yuǎn)慮必有財(cái)憂法商思維營銷之婚姻篇74張幻燈片
- 紅外圖像處理技術(shù)課件
- 小學(xué)一年級(jí)人民幣學(xué)具圖片最新整理直接打印
- 投擲:原地投擲壘球
- 港口碼頭常用安全警示標(biāo)志
- 密閉式周圍靜脈輸液技術(shù)PPT課件
- 電梯快車調(diào)試方法
- 主要材料損耗率表
評(píng)論
0/150
提交評(píng)論