畢業(yè)論文----高校輔導(dǎo)員管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)

1、<p>　　高校輔導(dǎo)員管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)</p><p>　　[摘 要] 高校輔導(dǎo)員管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺(tái)數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個(gè)方面。對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。而對(duì)于后者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。</p><p>　　經(jīng)過分析,我們使用 MICROSOFT公司的VFP 8.0

2、開發(fā)工具,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡(jiǎn)潔操縱數(shù)據(jù)庫的智能化對(duì)象,首先在短時(shí)間內(nèi)建立系統(tǒng)應(yīng)用原型,然后,對(duì)初始原型系統(tǒng)進(jìn)行需求迭代,不斷修正和改進(jìn),直到形成用戶滿意的可行系統(tǒng)。</p><p>　　[關(guān)鍵詞] 輔導(dǎo)員 數(shù)據(jù)庫 SQL</p><p><b>　　前言</b></p><p>　　高校輔導(dǎo)員管

3、理系統(tǒng)是一個(gè)教育單位不可缺少的部分,它的內(nèi)容對(duì)于學(xué)校的決策者和管理者來說都至關(guān)重要,所以高校輔導(dǎo)員管理系統(tǒng)應(yīng)該能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄?。但一直以來人們使用傳統(tǒng)人工的方式管理文件檔案，這種管理方式存在著許多缺點(diǎn),如:效率低、保密性差,另外時(shí)間一長(zhǎng),將產(chǎn)生大量的文件和數(shù)據(jù),這對(duì)于查找、更新和維護(hù)都帶來了不少的困難。</p><p>　　隨著科學(xué)技術(shù)的不斷提高,計(jì)算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深

4、刻認(rèn)識(shí),它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。</p><p>　　作為計(jì)算機(jī)應(yīng)用的一部分,使用計(jì)算機(jī)對(duì)學(xué)生信息進(jìn)行管理,具有著手工管理所無法比擬的優(yōu)點(diǎn)。例如:檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等。這些優(yōu)點(diǎn)能夠極大地提高學(xué)生檔案管理的效率,也是企業(yè)的科學(xué)化、正規(guī)化管理,與世界接軌的重要條件。</p><p>　　因此，開發(fā)這樣一套管理軟件成為很有

5、必要的事情,在下面的各章中我們將以開發(fā)一套學(xué)生檔案管理系統(tǒng)為例,談?wù)勂溟_發(fā)過程和所涉及到的問題及解決方法。</p><p><b>　　1　系統(tǒng)簡(jiǎn)介</b></p><p>　　本系統(tǒng)為高校輔導(dǎo)員管理系統(tǒng)，是一個(gè)具有綜合性學(xué)校學(xué)生管理系統(tǒng)，它集成了學(xué)生檔案管理,考勤管理等多種功能，其開發(fā)主要包括數(shù)據(jù)庫的建立和維護(hù)及查詢，打印功能的實(shí)現(xiàn)，因而具有較強(qiáng)的實(shí)用性和先進(jìn)性。&

6、lt;/p><p>　　1.1　系統(tǒng)需求及分析</p><p>　　1.1.1 系統(tǒng)需求</p><p>　　目前，許多高校已開始啟動(dòng)教學(xué)管理信息化工作，有的學(xué)校已經(jīng)發(fā)展得不錯(cuò)，有的學(xué)校還剛起步。為了推進(jìn)教學(xué)管理的信息化，減少教職工的工作量，縮短學(xué)校、教師、學(xué)生之間的溝通環(huán)節(jié)，需要借助計(jì)算機(jī)，讓其學(xué)生信息進(jìn)行自動(dòng)高效的管理。學(xué)生信息管理系統(tǒng)體現(xiàn)了先進(jìn)的教學(xué)管理指導(dǎo)思想

7、，能夠滿足學(xué)校的要求。</p><p>　　通過調(diào)查分析，要求該系統(tǒng)具有以下功能：</p><p>　　(1) 由于操作人員的計(jì)算機(jī)操作水平相對(duì)較差，要求有良好的人機(jī)界面。</p><p>　　(2) 由于該系統(tǒng)的使用要有數(shù)據(jù)安全性，要求有較好的用戶權(quán)限管理。</p><p>　　(3) 原始數(shù)據(jù)的處理，簡(jiǎn)單方便。</p>&l

8、t;p>　　(4) 方便的數(shù)據(jù)查詢，支持多條件查詢。</p><p>　　(5) 方便數(shù)據(jù)輸出報(bào)表的打印。</p><p>　　(6) 數(shù)據(jù)主要計(jì)算自動(dòng)完成，盡量減少人工干預(yù)。</p><p>　　1.1.2　可行性分析</p><p>　　目的：可行性研究的目的是用最小的代價(jià)在盡可能的時(shí)間內(nèi)確定問題是否能解決。</p>

9、<p>　　經(jīng)濟(jì)上的可行性：由于現(xiàn)在我校已經(jīng)為各辦公室配備了微機(jī)，而且用于管理的微機(jī)都是P4級(jí)的機(jī)器，在存儲(chǔ)量，速度方面都能滿足數(shù)據(jù)庫運(yùn)行的要求。</p><p>　　技術(shù)上的可行性：由于本系統(tǒng)涉及的計(jì)算過程不是很復(fù)雜，在技術(shù)難度方面，由于有指導(dǎo)老師的指導(dǎo)和相關(guān)參考文獻(xiàn)，特別是網(wǎng)上資料豐富，參考一些功能模塊程序的設(shè)計(jì)，因此本系統(tǒng)目標(biāo)的實(shí)現(xiàn)是完全可以的。</p><p>　　1.1

10、.3開發(fā)和運(yùn)行</p><p>　　本系統(tǒng)的設(shè)計(jì)是在windows xp中文版環(huán)境下，使用Visual Foxpro8.0開發(fā)成功。它可運(yùn)行于 windows2000及xp相關(guān)平臺(tái)的數(shù)據(jù)庫開發(fā)系統(tǒng)。Visual Foxpro8.0它不僅可以簡(jiǎn)化數(shù)據(jù)庫管理，而且應(yīng)用程序的開發(fā)流程更為合理；它使組織數(shù)據(jù)，定義數(shù)據(jù)庫規(guī)則和建立應(yīng)用程序等工作變行簡(jiǎn)單易行；利用可視化的設(shè)計(jì)工具和向?qū)?，用戶可以快速地?chuàng)建表單，查詢和打印報(bào)表

11、。</p><p><b>　　1.2　背景介紹</b></p><p>　　當(dāng)今社會(huì)，隨著科技的不斷發(fā)展，計(jì)算機(jī)已在人們的日常生活和工作領(lǐng)域中日益普及，并且人們對(duì)于計(jì)算機(jī)的應(yīng)用不再是簡(jiǎn)單的文字處理和最初的科學(xué)計(jì)算。計(jì)算機(jī)早已涉及到我們生活的各個(gè)方面，更多的是利用計(jì)算機(jī)來進(jìn)行管理從而減輕我們的工作。隨著教育的不斷普及，接受高等教育的人越來越多，對(duì)學(xué)生信息的管理也越來越

12、復(fù)雜。學(xué)生的種類越來越多，人工管理這些復(fù)雜的資料變得幾乎不再可能。因此，迫切需要對(duì)學(xué)生信息進(jìn)行自動(dòng)化的管理。</p><p>　　1.3 系統(tǒng)功能簡(jiǎn)介</p><p>　　本系統(tǒng)適用于大中專院校，其功能主要分為五大類：</p><p><b>　　信息錄入功能</b></p><p>　　本系統(tǒng)應(yīng)實(shí)現(xiàn)是對(duì)學(xué)生基本信息、家

13、庭成員、考勤情況等錄入。</p><p><b>　　2．瀏覽功能</b></p><p>　　該功能包括瀏覽學(xué)生基本信息、家庭成員關(guān)系。</p><p><b>　　3．查詢功能</b></p><p>　　該功能包括按學(xué)號(hào)、姓名進(jìn)行查詢學(xué)生基本信息</p><p><

14、;b>　　4.修改功能</b></p><p>　　該功能包括都學(xué)生基本信息修改，相片修改。</p><p><b>　　5.報(bào)表打印功能</b></p><p>　　該功能包括各種信息統(tǒng)計(jì)表的打印</p><p><b>　　6．驗(yàn)證功能</b></p><p

15、>　　該系統(tǒng)還有驗(yàn)證功能，為了保證系統(tǒng)的安全，在登陸系統(tǒng)前必須輸入有效的密碼。</p><p>　　1.4 系統(tǒng)開發(fā)目標(biāo)</p><p>　　節(jié)約資源，提高學(xué)籍信息的精確度；方便快速操作，精簡(jiǎn)人員，節(jié)約開支。</p><p><b>　　2系統(tǒng)設(shè)計(jì)</b></p><p>　　2.1系統(tǒng)模塊結(jié)構(gòu)設(shè)計(jì)</p&g

16、t;<p>　　系統(tǒng)的運(yùn)行從歡迎表單開始,進(jìn)入登陸表單,在這里要求擁護(hù)輸入自己的登陸密碼,并設(shè)置三次密碼核對(duì)功能,如果三次輸入密碼不正確,則要求退出系統(tǒng);否則出現(xiàn)系統(tǒng)菜單,接受用戶的操作。操作完畢后用戶可以從系統(tǒng)菜單中退出系統(tǒng)。系統(tǒng)運(yùn)行步驟如1-1圖所示。</p><p><b>　　1-1圖</b></p><p>　　在本系統(tǒng)中，系統(tǒng)的功能主要分成六

17、個(gè)功能模塊，它們分別是：基礎(chǔ)維護(hù)、用戶維護(hù)、考勤管理、學(xué)生家庭、關(guān)于系統(tǒng)和退出（其中每個(gè)功能模塊有可細(xì)化為幾項(xiàng)子功能）下面分別介紹各功能模塊的作用。</p><p><b>　　●基礎(chǔ)維護(hù)</b></p><p>　　利用本模塊可實(shí)現(xiàn)學(xué)生基本信息的瀏覽、查詢和修改。</p><p><b>　　●用戶維護(hù)</b></

18、p><p>　　利用本模塊可實(shí)現(xiàn)用戶名及密碼的修改和增加新用戶。</p><p><b>　　●考勤管理</b></p><p>　　利用本模塊可進(jìn)行考勤登記和按年及月進(jìn)行考勤統(tǒng)計(jì)，班級(jí)人員統(tǒng)計(jì)。</p><p><b>　　●學(xué)生家庭</b></p><p>　　利用能夠本模塊

19、可進(jìn)行學(xué)生家庭成員與學(xué)生的關(guān)系及各方面情況進(jìn)行登記。</p><p><b>　　●關(guān)于系統(tǒng)</b></p><p>　　利用本模塊可進(jìn)行對(duì)系統(tǒng)版權(quán)信息進(jìn)行查詢。</p><p><b>　　●退出</b></p><p>　　該模塊的退出功能主要用來實(shí)現(xiàn)退出本系統(tǒng)。</p><

20、p>　　高校輔導(dǎo)員管理系統(tǒng)功能結(jié)構(gòu)框架如圖 1-2圖所示。</p><p><b>　　圖1-2</b></p><p>　　2.2 項(xiàng)目管理器的建立</p><p>　　啟動(dòng)Visual FoxPro8.0，進(jìn)入程序主界面新建一個(gè)以“高校輔導(dǎo)員管理系統(tǒng).pjx”命名的項(xiàng)目管理器，如圖1-3和如圖1-4所示：</p><

21、;p>　　3.3　數(shù)據(jù)庫和表的建立</p><p>　　建好項(xiàng)目管理器，就可以建立學(xué)生信息管理系統(tǒng)所需要的數(shù)據(jù)庫和數(shù)據(jù)表。</p><p>　　3.3.1　建立數(shù)據(jù)庫</p><p>　　建立一個(gè)名為“數(shù)據(jù)庫.dbc”的數(shù)據(jù)庫，如圖1-5 所示。</p><p>　　圖1-5 【新建數(shù)據(jù)庫】對(duì)話框</p><p>

22、;　　剛創(chuàng)建的數(shù)據(jù)庫只是一個(gè)空的數(shù)據(jù)庫，還沒有數(shù)據(jù)。只有創(chuàng)建了數(shù)據(jù)表和其他數(shù)據(jù)對(duì)象后，才能輸入數(shù)據(jù)或者進(jìn)行其他數(shù)據(jù)庫的操作。</p><p><b>　　3.4 數(shù)據(jù)庫設(shè)計(jì)</b></p><p>　　主要設(shè)計(jì)下面幾個(gè)數(shù)據(jù)表1-1、數(shù)據(jù)表1-2、數(shù)據(jù)表1-3、數(shù)據(jù)表1-4、數(shù)據(jù)表1-5、數(shù)據(jù)表1-6：</p><p><b>　　表1

23、-6</b></p><p><b>　　4 系統(tǒng)各功能模塊</b></p><p><b>　　4.1　表單設(shè)計(jì)</b></p><p>　　4.1.1 歡迎.scx 表單設(shè)計(jì)</p><p>　　該表單的基本功能是操作員進(jìn)入系統(tǒng)。</p><p>　　(1)

24、創(chuàng)建一個(gè)名為“歡迎”的表單文件。</p><p>　　(2) 在表單中添加控件。</p><p>　　圖1-6 系統(tǒng)歡迎窗口</p><p>　　此表單能產(chǎn)生文字閃爍效果 </p><p>　　(4) 按照下列表1-6,列出具體條目，設(shè)置表單及控件的必要屬性。</p><p>　　(5) 編寫相關(guān)事件代碼。</p

25、><p>　　■表單timer1的timer的事件代碼：</p><p>　　IF thisform.label1.Left=thisform.Width &設(shè)置長(zhǎng)度</p><p>　　thisform.label1.Left =0</p><p><b>　　ELSE</b></p><p

26、>　　thisform.label1.Left=thisform.label1.Left+1</p><p><b>　　ENDIF</b></p><p>　　i=INT(RAND()*255)</p><p>　　j=INT(RAND()*255)</p><p>　　k=INT(RAND()*255)

27、 &改變顏色</p><p>　　thisform.label3.ForeColor=rgb(i,j,k)</p><p>　　■按鈕“進(jìn)入”的click事件代碼：</p><p>　　DO form 登陸</p><p>　　thisform.Release </p><p&

28、gt;　　4.1.2登陸.scx表單設(shè)計(jì)</p><p>　　該表單的基本功能是操作員進(jìn)入系統(tǒng)。</p><p>　　(1) 創(chuàng)建一個(gè)名為“登陸”的表單文件。</p><p>　　(2) 在表單中添加控件。</p><p><b>　　圖1-7</b></p><p>　　按照下列表1-7,列出具

29、體條目，設(shè)置表單及控件的必要屬性。</p><p><b>　　表1-7</b></p><p>　　■按鈕“確定”的click事件代碼：</p><p>　　USE 姓名及密碼 &&打開表</p><p>　　LOCATE for alltrim(姓名)==a

30、lltrim(thisform.combo1.value) &&根據(jù)下拉列表的選擇在數(shù)據(jù)表中進(jìn)行尋找</p><p>　　if found() &&如果數(shù)據(jù)表的值不為空</p><p>　　if alltrim(thisform.text1.value)==alltrim(姓名及密碼.密碼) &&

31、;根據(jù)所獲得的數(shù)據(jù)在數(shù)據(jù)表中查找所對(duì)應(yīng)的值</p><p>　　thisform.Hide &&隱藏?cái)?shù)據(jù)表</p><p>　　thisform.release</p><p><b>　　&&打開菜單</b></p><p>　　Do 主菜單.MPR</p>

32、<p>　　Else &&假設(shè)能找到對(duì)應(yīng)的值則進(jìn)入系統(tǒng),否則出現(xiàn)出錯(cuò)對(duì)話框</p><p>　　messagebox("口令不正確，重新輸入!",48,"登陸信息") </p><p>　　thisform.text1.setfocus </p><p

33、>　　thisform.text1.value="" &&清空文本框的值</p><p>　　thisform.spinner1.value=thisform.spinner1.value+1 &&計(jì)算錄入次數(shù)多于三次錄入錯(cuò)誤，程序報(bào)告退出</p><p>　　if thisform.spinner1.value>

34、;=3</p><p>　　messagebox("不是合法用戶!")</p><p>　　thisform.release</p><p>　　CLEAR EVENTS </p><p><b>　　QUIT</b></p><p><b>　　endif&l

35、t;/b></p><p>　　thisform.refresh</p><p><b>　　ENDIF</b></p><p><b>　　ENDIF</b></p><p>　　■按鈕“退出”的click事件代碼：</p><p>　　thisform.Releas

36、e</p><p>　　CLEAR EVENTS</p><p>　　■表單timer1的timer的事件代碼： &&設(shè)置移動(dòng)字幕</p><p>　　thisform.label1.width=thisform.label1.width+2</p><p>　　if thisform.label1.

37、width>=250</p><p>　　thisform.label1.width=0</p><p>　　thisform.label1.width=thisform.label1.width+2</p><p><b>　　endif</b></p><p>　　4.1.3 學(xué)生信息查詢.scx表單設(shè)計(jì)<

38、;/p><p>　　該表單的基本功能是對(duì)學(xué)生的信息進(jìn)行查詢，可以按學(xué)號(hào)、姓名，進(jìn)行分類查詢。</p><p>　　(1) 創(chuàng)建一個(gè)名為“學(xué)生信息查詢”的表單文件。</p><p>　　(2) 設(shè)置表單的數(shù)據(jù)環(huán)境。將“學(xué)生信息基本表.dbf”、“ 姓名及密碼.dbf”2個(gè)表添加在數(shù)據(jù)中。</p><p>　　(3) 在表單中添加控件。布局如圖1-8

39、：</p><p>　　說明：表格控件是將數(shù)據(jù)環(huán)境中的“學(xué)生信息基本表”直接拖到表單上自動(dòng)形成的。</p><p>　　圖1-8 學(xué)生信息查詢</p><p>　　(4) 按照下列表1-8列出具體條目，設(shè)置表單及控件的必要屬性。</p><p><b>　　表1-8</b></p><p>　　(

40、5) 編寫相關(guān)事件代碼。</p><p>　　■表單Form1的Init的事件代碼：</p><p>　　THISFORM.Label2.Visible=.F. &&輸入編號(hào)、姓名提示標(biāo)簽及文本框</p><p>　　THISFORM.Text1.Visible=.F.</p><p>　　THISFORM

41、.Text3.Visible=.F.</p><p>　　THISFORM.Command4.Visible=.F.</p><p>　　THISFORM.grdStu_info.Readonly=.T. &&表格數(shù)據(jù)不可修改</p><p>　　■按鈕組Optiongroup1的click的事件代碼：</p><p>　　I

42、F this.Value=1 &&判斷按鈕組的值</p><p>　　thisform.Label1.Caption="請(qǐng)輸入學(xué)號(hào)"</p><p><b>　　else </b></p><p>　　thisform.Label1.Caption="請(qǐng)輸入姓名

43、"</p><p><b>　　endif</b></p><p>　　■按鈕“查詢”中Click的事件代碼：</p><p>　　*按輸入的條件在表格中顯示查詢的記錄</p><p>　　SELECT 學(xué)生信息基本表</p><p>　　IF thisform.optiongroup

44、1.Value=1</p><p>　　LOCATE for 學(xué)號(hào)=alltrim(thisform.text1.Value)</p><p><b>　　ELSE</b></p><p>　　LOCATE for 姓名=alltrim(thisform.text1.Value)</p><p><b>　　E

45、NDIF</b></p><p>　　IF FOUND()</p><p>　　thisform.command2.Enabled= .T.</p><p><b>　　ELSE</b></p><p>　　=MESSAGEBOX("沒有找到相應(yīng)的記錄！?。?quot;,64,"信使服務(wù)&

46、quot;)</p><p><b>　　endif</b></p><p>　　thisform.Refresh </p><p>　　■按鈕“退出”中Click的事件代碼：</p><p>　　THISFORM.Release</p><p>　　■按鈕“打印”中Click的事件代碼：<

47、/p><p>　　REPORT FORM 詳細(xì)報(bào)表.frx preview</p><p>　　4.1.4 學(xué)生信息修改2.scx.表單設(shè)計(jì)</p><p>　　該表單的基本功能是管理員對(duì)學(xué)生的數(shù)據(jù)維護(hù)，可以對(duì)其學(xué)生信息進(jìn)行刪除、修改、編輯等。</p><p>　　(1) 創(chuàng)建一個(gè)名為“學(xué)生信息修改”的表單文件。</p><p

48、>　　設(shè)置表單的數(shù)據(jù)環(huán)境。將“學(xué)生信息基本表.dbf”、“ 姓名及密碼.dbf”2個(gè)表添加在數(shù)據(jù)中。</p><p>　　(3) 在表單中添加控件布局如圖1-8：</p><p>　　圖1-8 學(xué)生數(shù)據(jù)維護(hù)</p><p>　　說明：表格控件是將數(shù)據(jù)環(huán)境中的“學(xué)生信息基本表”直接拖到表單上自動(dòng)形成的。</p><p>　　(4) 按照下

49、列表1-9列出具體條目，設(shè)置表單及控件的必要屬性。</p><p><b>　　表1-9</b></p><p>　　5、編寫相關(guān)事件代碼。</p><p>　　■按鈕“修改”的Click的事件代碼：</p><p>　　IF this.Caption="修改"</p><p>

50、;　　thisform.SetAll ('readonly',.f.,'combobox') &&修改只讀屬性</p><p>　　thisform.SetAll ('readonly',.f.,'textbox')</p><p>　　thisform.SetAll ('readonly&#

51、39;,.f.,'editbox')</p><p>　　thisform.SetAll ('enabled',.f.,'commandbotton') &&修改可用屬性</p><p>　　this.Enabled= .T. &&本表單可用&l

52、t;/p><p>　　this.Caption="保存"</p><p><b>　　GO bottom</b></p><p>　　thisform.Refresh</p><p>　　thisform.txt學(xué)號(hào).SetFocus</p><p><b>　　ELSE

53、</b></p><p>　　thisform.SetAll ('readonly',.t.,'combobox') &&修改只讀屬性</p><p>　　thisform.SetAll ('readonly',.t.,'textbox')</p><p>　　th

54、isform.SetAll ('readonly',.t.,'editbox')</p><p>　　thisform.SetAll ('enabled',.t.,'commandbotton')</p><p>　　this.Enabled= .T.</p><p>　　this.Caption=&q

55、uot;修改"</p><p>　　endif &&當(dāng)表單中的數(shù)據(jù)可用修改則caption屬性為保存,否則為修改</p><p>　　■按鈕“增加”的Click的事件代碼：</p><p>　　IF this.Caption="添加"</p><p>　　thisfo

56、rm.SetAll ('readonly',.f.,'combobox')</p><p>　　thisform.SetAll ('readonly',.f.,'textbox')</p><p>　　thisform.SetAll ('readonly',.f.,'editbox')</

57、p><p>　　thisform.SetAll ('enabled',.f.,'commandbotton')</p><p>　　this.Enabled= .T.</p><p>　　this.Caption="保存"</p><p>　　APPEND BLANK

58、 &&產(chǎn)生一個(gè)新的空白頁</p><p><b>　　GO bottom</b></p><p>　　thisform.Refresh</p><p>　　thisform.txt學(xué)號(hào).SetFocus</p><p><b>　　ELSE</b></p

59、><p>　　thisform.SetAll ('readonly',.t.,'combobox')</p><p>　　thisform.SetAll ('readonly',.t.,'textbox')</p><p>　　thisform.SetAll ('readonly',.t.,

60、'editbox')</p><p>　　thisform.SetAll ('enabled',.t.,'commandbotton')</p><p>　　this.Enabled= .T.</p><p>　　this.Caption="添加"</p><p><b

61、>　　endif</b></p><p>　　■按鈕“首記錄”的Click的事件代碼：</p><p>　　SELECT 學(xué)生基本情況表</p><p>　　GO top &&首記錄</p><p>　　this.Enabled= .F.</p>

62、<p>　　thisform.comm2.Enabled = .F. </p><p>　　thisform.comm3.Enabled = .t. </p><p>　　thisform.comm4.Enabled = .t.</p><p>　　thisform.Refresh </p><p>　　■按鈕“前一記錄”的Cl

63、ick的事件代碼：</p><p>　　SELECT 學(xué)生信息基本表</p><p>　　SKIP -1 &&向前移動(dòng)</p><p>　　IF bof() then </p><p><b>　　GO top </b></p><p&g

64、t;　　this.Enabled= .F.</p><p>　　thisform.comm1.Enabled = .F. </p><p><b>　　endif</b></p><p>　　thisform.comm3.Enabled = .t. </p><p>　　thisform.comm4.Enabled =

65、.t.</p><p>　　thisform.Refresh </p><p>　　■按鈕“下一記錄”的Click的事件代碼：</p><p>　　SELECT 學(xué)生信息基本表</p><p><b>　　SKIP 1</b></p><p>　　IF EOF() then </p>

66、<p><b>　　GO bottom</b></p><p>　　this.Enabled= .F.</p><p>　　thisform.comm4.Enabled = .F. </p><p><b>　　endif</b></p><p>　　thisform.comm1.En

67、abled = .t. </p><p>　　thisform.comm2.Enabled = .t.</p><p>　　thisform.Refresh </p><p>　　■按鈕“尾記錄”的Click的事件代碼：</p><p>　　SELECT 學(xué)生信息基本表</p><p><b>　　GO b

68、ottom</b></p><p>　　this.Enabled= .F.</p><p>　　thisform.comm3.Enabled = .F. </p><p>　　thisform.comm2.Enabled = .t. </p><p>　　thisform.comm1.Enabled = .t.</p>

69、<p>　　thisform.Refresh </p><p>　　■按鈕“退出”的Click的事件代碼：</p><p>　　thisform.release</p><p>　　4.1.5學(xué)生信息瀏覽.scx表單設(shè)計(jì)</p><p>　　該表單基本功能是管理員對(duì)學(xué)生數(shù)據(jù)維護(hù)，可對(duì)學(xué)生信息進(jìn)瀏覽。</p>&l

70、t;p>　　(1) 創(chuàng)建一個(gè)名為“學(xué)生信息瀏覽”的表單文件。</p><p>　　(2) 設(shè)置表單的數(shù)據(jù)環(huán)境。將“學(xué)生信息基本表.dbf”、 “姓名及密碼.dbf”2個(gè)表添加在數(shù)據(jù)中。</p><p>　　(3) 在表單中添加控件。布局如圖1-10：</p><p>　　圖1-10 成績(jī)查詢</p><p>　　4、按照下列表1-7列出

71、具體條目，設(shè)置表單及控件的必要屬性</p><p><b>　　表1-9</b></p><p>　　(5) 編寫相關(guān)事件代碼。</p><p>　　■按鈕“首記錄”的Click的事件代碼：</p><p>　　SELECT 學(xué)生基本情況表</p><p><b>　　GO top &l

72、t;/b></p><p>　　this.Enabled= .F.</p><p>　　thisform.comm2.Enabled = .F. </p><p>　　thisform.comm3.Enabled = .t. </p><p>　　thisform.comm4.Enabled = .t.</p><p

73、>　　thisform.Refresh </p><p>　　■按鈕“前一記錄”的Click的事件代碼：</p><p>　　SELECT 學(xué)生信息基本表</p><p><b>　　SKIP -1</b></p><p>　　IF bof() then </p><p><b>

74、;　　GO top </b></p><p>　　this.Enabled= .F.</p><p>　　thisform.comm1.Enabled = .F. </p><p><b>　　endif</b></p><p>　　thisform.comm3.Enabled = .t. </p>

75、;<p>　　thisform.comm4.Enabled = .t.</p><p>　　thisform.Refresh </p><p>　　■按鈕“下一記錄”的Click的事件代碼：</p><p>　　SELECT 學(xué)生信息基本表</p><p><b>　　SKIP 1</b></p&g

76、t;<p>　　IF EOF() then </p><p><b>　　GO bottom</b></p><p>　　this.Enabled= .F.</p><p>　　thisform.comm4.Enabled = .F. </p><p><b>　　endif</b>&

77、lt;/p><p>　　thisform.comm1.Enabled = .t. </p><p>　　thisform.comm2.Enabled = .t.</p><p>　　thisform.Refresh </p><p>　　■按鈕“尾記錄”的Click的事件代碼：</p><p>　　SELECT 學(xué)生信息

78、基本表</p><p><b>　　GO bottom</b></p><p>　　this.Enabled= .F.</p><p>　　thisform.comm3.Enabled = .F. </p><p>　　thisform.comm2.Enabled = .t. </p><p>　

79、　thisform.comm1.Enabled = .t.</p><p>　　thisform.Refresh </p><p>　　■按鈕“退出”的Click的事件代碼：</p><p>　　thisform.release</p><p>　　4.1.6 考勤登記表.scx表單設(shè)計(jì)</p><p>　　該表單的

80、基本功能是管理員對(duì)學(xué)生的數(shù)據(jù)維護(hù)，可以對(duì)其學(xué)生考勤信息進(jìn)行登記等。</p><p>　　(1) 創(chuàng)建一個(gè)名為“考勤登記表”的表單文件。</p><p>　　(2) 設(shè)置表單的數(shù)據(jù)環(huán)境。將“考勤記錄表.dbf”、“ 學(xué)生信息基本表.dbf”2個(gè)表添加在數(shù)據(jù)中。</p><p>　　(3) 在表單中添加控件。布局如圖1-10：</p><p>　

81、　圖1-10 考勤登記表</p><p>　　(4) 按照下列表1-8列出具體條目，設(shè)置表單及控件的必要屬性。</p><p><b>　　表1-8</b></p><p>　　(5) 編寫相關(guān)事件代碼。</p><p>　　■按鈕“登記”的Click的事件代碼：</p><p>　　&&

82、amp; 判斷所填入的值是否為空</p><p>　　IF EMPTY(thisform.combo1.Value ) or EMPTY(thisform.text1.value) or EMPTY(thisform.combo2.Value )</p><p>　　=MESSAGEBOX("項(xiàng)目沒有添完,請(qǐng)補(bǔ)充完整!")</p><p><

83、;b>　　ELSE </b></p><p>　　SELECT 考勤記錄表</p><p>　　APPEND BLANK &&增加一個(gè)空白記錄</p><p>　　REPLACE 學(xué)號(hào) with thisform.combo1.Value,缺勤日期 with thisform.text1.Value ,缺勤類別

84、with thisform.combo2.Value &&修改空白記錄</p><p>　　thisform.combo1.Value =""</p><p>　　thisform.combo2.Value =""</p><p>　　=MESSAGE("該學(xué)生缺勤記錄已被保存！")<

85、;/p><p><b>　　ENDIF</b></p><p>　　4.1.7考勤表.scx表單設(shè)計(jì)</p><p>　　該表單的基本功能是管理員對(duì)學(xué)生的數(shù)據(jù)維護(hù)，可以對(duì)其學(xué)生考勤信息進(jìn)行登記等。</p><p>　　(1) 創(chuàng)建一個(gè)名為“考勤登記表”的表單文件。</p><p>　　(2) 設(shè)置表單

86、的數(shù)據(jù)環(huán)境。將“考勤表.dbf”、“ 學(xué)生信息基本表.dbf”2個(gè)表添加在數(shù)據(jù)中。</p><p>　　(3) 在表單中添加控件。布局如圖1-10：</p><p>　　■按鈕“統(tǒng)計(jì)結(jié)果”的Click的事件代碼：</p><p>　　SELECT 考勤記錄表</p><p>　　SET filter to YEAR(缺勤日期)=VAL(thi

87、sform.text2.Value);</p><p>　　and MONTH(缺勤日期)=VAL(thisform.text3.Value )</p><p>　　CREATE CURSOR hzb(學(xué)號(hào) c(4),姓名 c(8),病假天數(shù) n(2,0),事假天數(shù) n(2,0),曠課天數(shù) n(2,0)) &&新建一個(gè)臨時(shí)表,并設(shè)其參數(shù)</p>&

88、lt;p>　　SELECT 學(xué)號(hào) from 考勤記錄表 where;</p><p>　　YEAR(缺勤日期)=val(thisform.text2.Value);</p><p>　　and MONTH(缺勤日期)=val(thisform.text3.Value ) into cursor lsb1</p><p>　　SELECT lsb1</p

89、><p><b>　　go top </b></p><p>　　bjts=0 &&設(shè)置初始值</p><p><b>　　sjts=0</b></p><p><b>　　kkts=0</b></p><p><

90、b>　　cdts=0</b></p><p><b>　　ztts=0</b></p><p>　　DO while not EOF() &&當(dāng)記錄不為空的時(shí)候</p><p>　　var_xh=lsb1.學(xué)號(hào)</p><p>　　SELECT 考勤記錄表

91、 &&計(jì)算缺勤次數(shù)</p><p>　　COUNT for 學(xué)號(hào)=var_xh and 缺勤類別="病假" to bjts</p><p>　　COUNT for 學(xué)號(hào)=var_xh and 缺勤類別="事假" to sjts</p><p>　　COUNT for 學(xué)號(hào)=var_xh and 缺勤類別=

92、"曠課" to kkts</p><p>　　COUNT for 學(xué)號(hào)=var_xh and 缺勤類別="遲到" to cdts</p><p>　　COUNT for 學(xué)號(hào)=var_xh and 缺勤類別="早退" to ztts</p><p>　　SELECT 學(xué)生信息基本表</p>&

93、lt;p>　　LOCATE for 學(xué)號(hào)=lsb1.學(xué)號(hào)</p><p><b>　　xm=姓名</b></p><p>　　SELECT hzb</p><p>　　APPEND BLANK </p><p>　　REPLACE 學(xué)號(hào) with lsb1.學(xué)號(hào),姓名 with xm,病假天數(shù) with bjts,

94、事假天數(shù) with sjts,曠課天數(shù) with kkts</p><p>　　SELECT lsb1</p><p><b>　　SKIP</b></p><p><b>　　enddo</b></p><p><b>　　GO top </b></p><

95、;p>　　thisform.grid1.ColumnCount =-1</p><p>　　thisform.grid1.RecordSource="hzb" </p><p>　　在系統(tǒng)中需要打印學(xué)生基本信息表，所以下面我們來設(shè)計(jì) 詳細(xì)報(bào)表.frx，步驟：文檔→報(bào)表→新建，彈出窗口如圖1-11：</p><p><b>　　圖

96、1-11</b></p><p>　　具體報(bào)表布局如圖1-12：</p><p>　　圖1-12 【報(bào)表設(shè)計(jì)器】</p><p><b>　　預(yù)覽效果如下：</b></p><p>　　圖1-13 瀏覽【報(bào)表設(shè)計(jì)器】</p><p><b>　　其他報(bào)表省略。</b&g

97、t;</p><p><b>　　4.3 菜單設(shè)計(jì)</b></p><p>　　(1) 創(chuàng)建菜單。步驟：文檔→其他→菜單，保存菜單名為：主菜單.mnx。</p><p>　　(2) 定義主菜單欄如圖1-14:</p><p>　　圖1-14 【主菜單欄】</p><p>　　(3) 定義【基礎(chǔ)維護(hù)

98、】菜單的各菜單項(xiàng)如圖1-15：</p><p>　　圖1-15【學(xué)生信息管理欄】</p><p>　　(4) 插入分隔線。將光標(biāo)放在需要添加的位置，單擊［插入］按鈕，出現(xiàn)新菜單項(xiàng)，將菜單項(xiàng)名稱改為：“\-”即可。</p><p><b>　　(5) 菜單代碼</b></p><p><b>　?。弁顺鱿到y(tǒng)］：&

99、lt;/b></p><p>　　clear events &&退出事件循環(huán)</p><p><b>　　quit</b></p><p><b>　　(5) 預(yù)覽菜單。</b></p><p>　　單擊［預(yù)覽］按鈕即可</p><p>&

100、lt;b>　　5 主程序設(shè)計(jì)</b></p><p>　　(1)　建立主程序，步驟：代碼→程序，保存名為：main.prg</p><p>　　SET TALK OFF &&關(guān)閉對(duì)話</p><p>　　SET ESCAPE OFF &&關(guān)閉ESCAPE鍵</p><p>　

101、　SET EXACT ON &&打開完全匹配</p><p>　　SET EXCLUSIVE ON &&打開獨(dú)占</p><p>　　SET CONSOLE ON &&將輸出結(jié)果到發(fā)送到Visual FoxPro主窗口或當(dāng)前的活動(dòng)窗口</p><p>　　SET DATE TO LONG

102、&&設(shè)置長(zhǎng)日期</p><p>　　SET SCORE OFF &&關(guān)閉分值欄</p><p>　　SET SAFETY OFF &&關(guān)閉安全提示</p><p>　　SET STATUS BAR OFF &&關(guān)閉系統(tǒng)提示欄</p><p>　　SET C

103、ENTURY ON &&打開世紀(jì)開關(guān)</p><p>　　SET DELETED ON &&屏閉刪除項(xiàng)</p><p>　　SET SYSMENU OFF &&關(guān)閉系統(tǒng)菜單</p><p>　　SET NOTIFY OFF &&關(guān)閉提示</p><p&g

104、t;　　&&設(shè)置系統(tǒng)窗口屬性</p><p>　　_SCREEN.MaxButton = .f.&&取消最大化按鈕</p><p>　　_SCREEN.MaxWidth =980&&設(shè)置最大寬度</p><p>　　_SCREEN.MaxHeight =600&&設(shè)置最

105、大高度</p><p>　　_SCREEN.Caption = "高校輔導(dǎo)員管理系統(tǒng)" &&設(shè)置窗口標(biāo)題</p><p>　　_SCREEN.Picture = 'back.jpg' &&設(shè)置窗口背景圖片</p><p>　　stretch=2 &&變比例填充&

106、lt;/p><p>　　_SCREEN.AutoCenter = .T.&&指定表單初次顯示時(shí)，自動(dòng)位于主窗口中央</p><p><b>　　&&定義全局變量</b></p><p>　　public UserName</p><p>　　Do FORM 歡迎.scx

107、 &&進(jìn)入歡迎表單</p><p>　　READ EVENTS </p><p>　　Procedure OnQuit </p><p>　　CLEAR EVENTS. &&清空關(guān)閉窗口</p><p><b>　　CLOSE ALL</

108、b></p><p><b>　　QUIT</b></p><p><b>　　Endproc</b></p><p>　　7 連編應(yīng)用程序系統(tǒng)</p><p>　　在［項(xiàng)目管理器］對(duì)話框中［代碼］頁面中，選擇程序中的主程序main.mpg。單擊［連編］按鈕，彈出［連編選項(xiàng)］對(duì)話框如圖1-1

109、6：</p><p>　　圖1-16【連編選項(xiàng)】</p><p><b>　　8 系統(tǒng)的實(shí)現(xiàn)</b></p><p>　　8.1　系統(tǒng)開發(fā)的難點(diǎn)與問題</p><p>　　由于本人是初次開發(fā)數(shù)據(jù)庫管理系統(tǒng)，對(duì)于表單中程序代碼的功能還不能運(yùn)用自如，及對(duì)數(shù)據(jù)庫中各文件的處理還不能達(dá)到目的，導(dǎo)致在程序調(diào)試中經(jīng)常出錯(cuò)</p

110、><p><b>　　9 結(jié)束語</b></p><p>　　經(jīng)過一個(gè)多月的設(shè)計(jì)和開發(fā)，這套高校輔導(dǎo)員管理系統(tǒng)基本完成。其功能基本符合學(xué)校的要求，能夠完成學(xué)生檔案的存儲(chǔ)及考勤程序的查詢，同時(shí)能實(shí)現(xiàn)各相關(guān)報(bào)表的打印。但是由于在知識(shí)，經(jīng)驗(yàn)方面存在不足，時(shí)間也比較緊張，所以該系統(tǒng)還有很多待于完善的地方。如用戶界面不夠優(yōu)美，對(duì)系統(tǒng)容錯(cuò)處理不夠等。但最主要的收獲是學(xué)會(huì)了系統(tǒng)設(shè)計(jì)的思

111、維方法，同時(shí)能虛心向?qū)W校指導(dǎo)老師和同學(xué)請(qǐng)教及相互幫助的協(xié)作精神。</p><p><b>　　參考文獻(xiàn)</b></p><p>　　[1] 啟明工作室visual foxpro6.0中文版數(shù)據(jù)庫應(yīng)用系統(tǒng)開發(fā)實(shí)例.人民郵電出版社,2004.9</p><p>　　[2] 李明,顧振山 Visual FoxPro 8.0 實(shí)用教程.清華大學(xué)出版社,

112、2005.9</p><p>　　[3]張翼英　Visual FoxPro課程設(shè)計(jì). 清華大學(xué)出版社,2007.01</p><p>　　[4] 武新華,雍曉克,王孝俊,李揚(yáng)　Visual FoxPro管理信息系統(tǒng)開發(fā)案例. 西安電子科技大學(xué)出版社,2004.7</p><p>　　[5] 羅晟,銀華強(qiáng),劉普艷,Visual FoxPro 8.0 數(shù)據(jù)庫項(xiàng)目案例導(dǎo)航

113、.清華大學(xué)出版社,2005.1</p><p>　　[6] 蘇選良,張益星,林榮清,數(shù)據(jù)庫與管理信息系統(tǒng)實(shí)驗(yàn)教程.電子工業(yè)出版社</p><p>　　[7] 陳博 周曉杰等, Visual FoxPro 8.0數(shù)據(jù)庫開發(fā)實(shí)例教程清華大學(xué)出版社,2004</p><p>　　[8] 張瑩 Visual FoxPro數(shù)據(jù)庫與程序設(shè)計(jì)教程.機(jī)械工業(yè)出版社,2007.02&