(論文)數(shù)據(jù)庫(kù)系統(tǒng)VB+SQL(2013年優(yōu)秀畢業(yè)設(shè)計(jì)論文)

畢業(yè)論文摘 要在市場(chǎng)經(jīng)濟(jì)發(fā)達(dá)的今天，終生制的用人制度不再適應(yīng)時(shí)代的發(fā)展，人才流動(dòng)變得越來(lái)越頻繁。而且隨著教師數(shù)量的增加，使用信息系統(tǒng)進(jìn)行教師信息管理成為一種迫切的需要。本人使用開發(fā)工具Visual Basic 6.0并結(jié)合Microsoft SQL Server 2000數(shù)據(jù)庫(kù)開發(fā)的教師信息管理系統(tǒng)，可以讓多個(gè)用戶管理教師基本資料、任課情況、科研情況以及獎(jiǎng)懲情況。本系統(tǒng)在功能上不僅實(shí)現(xiàn)了數(shù)據(jù)的添加、修改和打印功能，而且應(yīng)客戶的要求，對(duì)于每個(gè)模塊都實(shí)現(xiàn)了數(shù)據(jù)的動(dòng)態(tài)查詢和按任意字段進(jìn)行排序。在數(shù)據(jù)庫(kù)設(shè)計(jì)上，滿足了關(guān)系數(shù)據(jù)庫(kù)的完整性要求；在使用上，操作簡(jiǎn)便、具有良好的人機(jī)交互界面。關(guān)鍵字：VISUAL BASIC，SQL，MSHFlexGrid，ActiveX數(shù)據(jù)對(duì)象 SummaryThe market economy in today prospers, making the whole life of use persons system no longer adapts to the development of the ages, the talented person flow to become more and more multifarious. And along with the increment of teachers quantity, the usage information system proceeds the management of teacher becomes a kind of crying need. Combined Visual Basic 6.0 with Microsoft SQL Server 2000, The Teachers Management Information System explored by me not only can let several customers manage teachers basic information, class information, scientific researches information, rewards and punishment information; with the demand of customer, the system but also have the function of data increase, modification and print. Every module have the function that searching the data dynamicly and lineing up by the segment arbitrarily. With the database designing, the system satisfied the integrity request of the relation database; On the usage, this system have characteristics of convenient operation and person-to-computer communication interface.Keycodes:Visual Basic，SQL，MSHFlexGrid，ADO目 錄摘要-2引言-4第一章 系統(tǒng)概述-5第一節(jié) 基本開發(fā)工具-5第二節(jié) 系統(tǒng)的功能模塊結(jié)構(gòu)-6第三節(jié) 系統(tǒng)的簡(jiǎn)介-7第二章 數(shù)據(jù)庫(kù)概念結(jié)構(gòu)-8第一節(jié) 用戶管理模塊-8第二節(jié) 教師基本信息管理模塊-9第三節(jié) 任課情況管理模塊-10第四節(jié) 科研情況管理模塊-10第五節(jié) 獎(jiǎng)懲情況管理模塊-12第三章 系統(tǒng)設(shè)計(jì)-13第一節(jié) 數(shù)據(jù)庫(kù)連接-13第二節(jié) 數(shù)據(jù)庫(kù)初始化處理-14第三節(jié) 主窗體設(shè)計(jì)-16第四節(jié) 主要功能模塊設(shè)計(jì)實(shí)現(xiàn)-18一、 用戶管理模塊設(shè)計(jì)-18二、 記錄查詢模塊設(shè)計(jì)-21三、 記錄添加模塊設(shè)計(jì)-23四、 記錄修改模塊設(shè)計(jì)-25五、 記錄刪除模塊設(shè)計(jì)-26六、 報(bào)表輸出模塊設(shè)計(jì)-26總結(jié)-30參考文獻(xiàn)-31附錄-32教師信息管理系統(tǒng)引 言當(dāng)前，我國(guó)正面臨著如何加速幾十萬(wàn)個(gè)企業(yè)以及一些組織和世界接軌，參與國(guó)際市場(chǎng)競(jìng)爭(zhēng)這一重大問題，采納先進(jìn)制造技術(shù)與管理思想進(jìn)行改造勢(shì)在必行。信息管理系統(tǒng)是一個(gè)以人為主導(dǎo)，利用計(jì)算機(jī)硬件、軟件，網(wǎng)絡(luò)通信這些設(shè)備和其它的辦公設(shè)備進(jìn)行信息的收集、傳輸、加工、儲(chǔ)存、更新和維護(hù)達(dá)到戰(zhàn)略競(jìng)優(yōu)、提高效率的目的，來(lái)支持高層決策、中層控制和基層運(yùn)作的集成化的人機(jī)系統(tǒng)。MIS為管理者提供報(bào)告、提供最近的情況以及歷記。信息系統(tǒng)是信息化的物質(zhì)基礎(chǔ)，信息系統(tǒng)建設(shè)的好與壞，對(duì)于提高經(jīng)濟(jì)效益或管理效率有至關(guān)重要的作用。信息管理系統(tǒng)在當(dāng)今社會(huì)的各行各業(yè)扮演著非常重要的角色，廣泛應(yīng)用在各個(gè)領(lǐng)域。信息管理系統(tǒng)的應(yīng)用加快了信息的收集、整理，歸類，又可以大量的節(jié)省人力，而且能夠快速、準(zhǔn)確、系統(tǒng)地處理所需要的信息。建立信息系統(tǒng)，在各個(gè)層次和各個(gè)職能領(lǐng)域?qū)ζ髽I(yè)或組織經(jīng)營(yíng)決策管理，是提高市場(chǎng)競(jìng)爭(zhēng)力的重要方式。第一章 系統(tǒng)概述第一節(jié) 基本開發(fā)工具一、Visual Basic 6.0 概述Microsoft Visual Basic(簡(jiǎn)稱VB)采用可視化的開發(fā)方法，是一種易學(xué)易用、快速高效的應(yīng)用軟件開發(fā)工具。利用VB較好的數(shù)據(jù)庫(kù)接口和數(shù)據(jù)處理能力，程序員可以對(duì)包括Microsoft SQL Server和其他企業(yè)數(shù)據(jù)在內(nèi)的大部分?jǐn)?shù)據(jù)庫(kù)格式創(chuàng)建數(shù)據(jù)庫(kù)和前端應(yīng)用程序；利用ActiveX(TM)技術(shù)，VB可以使用如Microsoft Word 字處理器、Microsoft Excel 電子數(shù)據(jù)表及其他Windows應(yīng)用程序提供的功能，甚至可直接使用由VB專業(yè)版或企業(yè)版創(chuàng)建的應(yīng)用程序和對(duì)象；在此可以看出VB的功能之強(qiáng)大，是軟件開發(fā)工具中的佼佼者。二、SQL Server 2000 概述SQL Server 2000是微軟公司推出的網(wǎng)絡(luò)數(shù)據(jù)庫(kù)管理系統(tǒng)，其主要任務(wù)是存儲(chǔ)、管理和提供數(shù)據(jù)，以滿足客戶端連接和存儲(chǔ)數(shù)據(jù)的需要。它是真正的客戶機(jī)/服務(wù)器體系結(jié)構(gòu)，具有豐富的編程接口工具；其圖形化用戶界面，使得系統(tǒng)管理更直觀。其中，企業(yè)管理器是微軟管理控制臺(tái)一個(gè)內(nèi)建控制臺(tái)，使用企業(yè)管理器幾乎可以完成所有的管理工作，如設(shè)置用戶權(quán)限、創(chuàng)建和管理數(shù)據(jù)庫(kù)、創(chuàng)建管理表、存儲(chǔ)過程、導(dǎo)入/導(dǎo)出數(shù)據(jù)等。三、ADOADO（全稱ActiveX Data Objects）是一種便于使用的新的低層數(shù)據(jù)訪問接口，以統(tǒng)一的方式訪問存儲(chǔ)在不同信息源中的數(shù)據(jù)（包括關(guān)聯(lián)和非關(guān)聯(lián)數(shù)據(jù)庫(kù)、電子郵件和文件系統(tǒng)、文本和圖形、自定義商業(yè)對(duì)象等）。數(shù)據(jù)訪問接口是一個(gè)對(duì)象模型，它代表了訪問數(shù)據(jù)的各個(gè)方面。在VB中，可作用三種數(shù)據(jù)訪問接口，即數(shù)據(jù)訪問對(duì)象（DAO）、遠(yuǎn)程數(shù)據(jù)對(duì)象（RDO）和數(shù)據(jù)對(duì)象（ADO），這三種接口代表了數(shù)據(jù)訪問技術(shù)的三個(gè)發(fā)展時(shí)代，其中最新的是ADO，它也最靈活，囊括了DAO和RDO的所有優(yōu)點(diǎn)，不僅能快速地訪問本地?cái)?shù)據(jù)庫(kù)，而且也適用于訪問遠(yuǎn)程數(shù)據(jù)庫(kù)，是Microsoft公司長(zhǎng)期的數(shù)據(jù)訪問策略，將替代DAO和RDO成為以后最主要的數(shù)據(jù)訪問接口。第二節(jié) 系統(tǒng)的功能模塊結(jié)構(gòu)教師信息管理系統(tǒng)包括五個(gè)模塊：用戶管理模塊、教師基本信息管理模塊、任課情況管理模塊、科研情況管理模塊、獎(jiǎng)懲情況管理模塊。其設(shè)計(jì)的系統(tǒng)功能模塊為：教師信息管理系統(tǒng)用戶管理模塊基本信息管理模塊任課情況管理模塊科研情況管理模塊獎(jiǎng)懲情況管理模塊論文情況管理模塊科研項(xiàng)目情況管理模塊報(bào)表打印記錄查詢記錄刪除記錄修改記錄添加第三節(jié) 系統(tǒng)簡(jiǎn)介該系統(tǒng)采用Microsoft SQL Server 2000作為系統(tǒng)數(shù)據(jù)庫(kù)開發(fā)平臺(tái)，使用了ADO實(shí)現(xiàn)數(shù)據(jù)庫(kù)的連接、訪問以及其它的操作。系統(tǒng)主要是由5個(gè)模塊組成，而且各個(gè)模塊是相互獨(dú)立的，分別為：一、用戶管理模塊在該模塊中，用戶登錄必須通過訪問數(shù)據(jù)庫(kù)驗(yàn)證其用戶名和密碼是否正確，通過驗(yàn)證正確后，才能進(jìn)入系統(tǒng)。用戶進(jìn)入系統(tǒng)后，可以添加、修改和刪除用戶信息，若系統(tǒng)用戶有且僅有一個(gè)時(shí)，系統(tǒng)將會(huì)彈出對(duì)話框提示不能刪除此用戶，方便了系統(tǒng)的管理，也提高了系統(tǒng)的安全性。二、教師基本信息管理模塊三、任課情況管理模塊四、科研情況管理模塊：包括科研項(xiàng)目情況管理模塊和論文情況管理模塊五、獎(jiǎng)懲情況管理模塊此系統(tǒng)中，上述模塊都可按其每個(gè)模塊對(duì)應(yīng)表的各個(gè)字段進(jìn)行排序，也可以按教師的姓名等字段進(jìn)行查詢，相應(yīng)的記錄都可以在表格控件中顯示出來(lái)。在表格控件中單擊右鍵，就可以對(duì)所查詢到的記錄進(jìn)行編輯管理，如添加、修改、刪除等操作，這樣使得系統(tǒng)有較高好的操作性。另外，在這此模塊中還實(shí)現(xiàn)了動(dòng)態(tài)查詢功能，當(dāng)在添加記錄窗體中新增了一條記錄后，在查詢窗體里動(dòng)態(tài)地出現(xiàn)了新增加的記錄選項(xiàng)，可以方便地進(jìn)行查詢。重要的是，在第二到第五個(gè)模塊中還實(shí)現(xiàn)了打印功能，增加了系統(tǒng)的實(shí)用性。最后，系統(tǒng)還增加了一個(gè)狀態(tài)欄，用于顯示當(dāng)前的狀態(tài)、日期和時(shí)間，方便用戶的查看。本信息系統(tǒng)可以讓學(xué)校隨時(shí)掌握教師的基本信息，有效地管理和充分利用教師各方面信息，減少學(xué)校工作的成本，協(xié)調(diào)各個(gè)部門的工作。第二章 數(shù)據(jù)庫(kù)概念結(jié)構(gòu)根據(jù)系統(tǒng)的設(shè)計(jì)要求，以模塊為標(biāo)準(zhǔn)建立數(shù)據(jù)庫(kù)，有利于數(shù)據(jù)庫(kù)的完整性，也有得于系統(tǒng)的擴(kuò)充性和維護(hù)性。在數(shù)據(jù)庫(kù)設(shè)設(shè)計(jì)時(shí)，考慮到盡量避免出現(xiàn)數(shù)據(jù)類型錯(cuò)誤的情況，絕大多數(shù)的表元素可以為空值。下面介紹五個(gè)主要模塊的數(shù)據(jù)庫(kù)結(jié)構(gòu)。第一節(jié) 用戶管理模塊該模塊是用于管理和驗(yàn)證用戶信息，對(duì)合法的用戶授予使用權(quán)限。本模塊中只有一個(gè)表tabuser表，下面就是這個(gè)表的實(shí)體關(guān)系：tabuserpasswordbhusername用戶密碼用戶名編號(hào)第二節(jié) 教師基本信息管理模塊該模塊所包含的都是教師個(gè)人的一些基本信息，包含一個(gè)表tabjbxx，它的實(shí)體關(guān)系如下圖示：畢業(yè)院校進(jìn)校時(shí)間獲得學(xué)歷及學(xué)位時(shí)間學(xué)歷及學(xué)位jxsjhdxlxwsjxljxwbyyx任教時(shí)間職稱zhicheng聘任時(shí)間rjsjgangwei崗位prsjtabjbxxbhzhiwu編號(hào)職務(wù)xingming zhuanyezzmmcsnyjiguanxingbie姓名政治面貌專業(yè)出生年月籍貫性別第三節(jié) 任課情況管理模塊該模塊的功能是管理教師在不同學(xué)期的任課情況，包含一個(gè)表tabrkqk，實(shí)體關(guān)系如圖：tabrkqkkcmingbanjibhxingmingxueqisksu課程名班級(jí)姓名編號(hào)學(xué)期上課時(shí)數(shù)sysukclb實(shí)驗(yàn)時(shí)數(shù)課程類別第四節(jié) 科研情況管理模塊該模塊包括兩個(gè)方面內(nèi)容：項(xiàng)目情況管理模塊和論文情況管理模塊。這兩個(gè)模塊都有動(dòng)態(tài)查詢功能，也有對(duì)數(shù)據(jù)進(jìn)行操縱的功能（如添加、修改、刪除和打印功能）；在SQL中建了兩個(gè)表tabkyqk和tablwqk，分別用于這兩個(gè)模塊中，其實(shí)體關(guān)系如下圖：“項(xiàng)目情況”表：tabkyqkxmmcbhxingmingnianduxmly姓名項(xiàng)目名稱編號(hào)年度資助金額jsrqksrq結(jié)束日期開始日期“論文情況”表：tablwqkfbsjfbgwmclwmcnianduxingmingbh發(fā)表時(shí)間發(fā)表刊物名稱論文名稱年度編號(hào)姓名第五節(jié) 獎(jiǎng)懲情況管理模塊該模塊的主要功能就是集中統(tǒng)一管理教師在各年度的獎(jiǎng)懲情況，包含一個(gè)表tabjcqk，實(shí)體關(guān)系如圖所示：tabjcqkjlchjldwjlchnianduxingmingbh獎(jiǎng)勵(lì)稱號(hào)獎(jiǎng)勵(lì)單位獎(jiǎng)勵(lì)稱號(hào)年度姓名編號(hào)beizhujlyy獎(jiǎng)勵(lì)原因備注第三章 系統(tǒng)設(shè)計(jì)第一節(jié) 數(shù)據(jù)庫(kù)連接一、ADO技術(shù)首先單擊VB“工程”菜單的“引用”，彈出如下圖所示的對(duì)話框，勾選ADO(ActiveX Data Objects)并單擊確定。如下圖：因本人更擅長(zhǎng)于用數(shù)據(jù)環(huán)境，就使用了ADO編程模型而沒有用ADO控件進(jìn)行VB和SQL的連接。為了使程序更為簡(jiǎn)潔，在VB程序設(shè)計(jì)時(shí)添加了一個(gè)模塊，定義了兩個(gè)公用函數(shù)，在以后的程序設(shè)計(jì)過程中基本上都是調(diào)用這兩個(gè)函數(shù)進(jìn)行連接操作。兩個(gè)函數(shù)為：Public Function ConnectString() As StringPublic Function ExecuteSQL(ByVal SQL As String, MsgString As String) As ADODB.Recordset系統(tǒng)在運(yùn)行時(shí)，程序就是通過調(diào)用這兩個(gè)函數(shù)來(lái)實(shí)現(xiàn)數(shù)據(jù)庫(kù)的連接和記錄的查詢。第二節(jié) 數(shù)據(jù)庫(kù)初始化處理在系統(tǒng)運(yùn)行初期，除了用戶表中有一條記錄外，teacher數(shù)據(jù)庫(kù)中其余表都是一張空表，里面是沒有任何數(shù)據(jù)的，這時(shí)就要對(duì)數(shù)據(jù)庫(kù)中的表進(jìn)行初始化。一、用戶管理模塊在“用戶管理模塊”中，由于用戶表中的用戶名和密碼都設(shè)置不能為空，當(dāng)用戶表中有且僅有一條記錄時(shí)，若刪除這個(gè)用戶就會(huì)彈出如下所示消息框，這樣就避免了在運(yùn)行時(shí)因空值引發(fā)的錯(cuò)誤的情況。這個(gè)功能實(shí)現(xiàn)首先要判斷系統(tǒng)總共有幾個(gè)用戶，代碼如下： intCount = 0 txtSQL = select * from tabuser Set mrc = ExecuteSQL(txtSQL, MsgText) If mrc.EOF = False Then Do While Not mrc.EOF intCount = intCount + 1 mrc.MoveNext Loop End If 若用戶有且僅有一個(gè)則彈出如上圖所示的消息框，若有多個(gè)用戶，則可進(jìn)行刪除操作。在刪除時(shí)，同樣要驗(yàn)證用戶名和密碼是否匹配。代碼如下： txtSQL = select * from tabuser where username = & txtusername.Text & Set mrc = ExecuteSQL(txtSQL, MsgText)If mrc.EOF = False ThenIf intCount = 1 Then MsgBox 此系統(tǒng)用戶就只有一個(gè)，不能刪除此用戶！, vbOKOnly + _vbExclamation, 警告 End If Else MsgBox 沒有這個(gè)用戶名！, vbOKOnly + vbExclamation, 警告 Exit Sub End If二、其它模塊在其余四個(gè)模塊中，若數(shù)據(jù)表中沒有記錄時(shí)就彈出如下圖所示的消息框：現(xiàn)在以“教師基本信息管理模塊”為例，由以下程序段實(shí)現(xiàn)的： txtSQL = select * from tabjbxx Set mrc = ExecuteSQL(txtSQL, MsgText)If mrc.EOF =True ThenMsgBox 數(shù)據(jù)庫(kù)中沒有記錄！, vbOKOnly + vbExclamation, 警告End If當(dāng)單擊主窗體的“基本信息添加”菜單，彈出“教師信息添加”窗體，就可以向tabjbxx表中添加記錄了。類似地，其它三個(gè)模塊也是這樣進(jìn)行表格的初始化處理的，這里就不一一敘述了。第三節(jié) 主窗體設(shè)計(jì)主窗體frmmain包括菜單欄和狀態(tài)條組成，界面如下圖：一、菜單欄的設(shè)計(jì)菜單的設(shè)計(jì)是由“菜單編輯器” 設(shè)計(jì)實(shí)現(xiàn)的，界面如下圖所示：二、狀態(tài)條的設(shè)計(jì)狀態(tài)條（StatusBar1）位于主窗體的底部，主要用于顯示應(yīng)用程序的各種狀態(tài)的信息，其中第一欄顯示系統(tǒng)當(dāng)前狀態(tài)，第二、第三欄分別顯示當(dāng)前的日期和時(shí)間，如下圖所示：StatusBar控件是ActiveX控件，包含在MSCOMCTL.OCX文件中，添加后該控件將在控件箱中出現(xiàn)；在窗體上創(chuàng)建StatusBar1，用鼠標(biāo)右鍵單擊該控件，選擇快捷菜單中的“屬性”命令，出現(xiàn)“屬性頁(yè)”（如下圖）；在此可設(shè)置分欄數(shù)目為3、各欄所顯示的內(nèi)容等信息。第四節(jié) 主要功能模塊設(shè)計(jì)實(shí)現(xiàn)一、用戶管理模塊設(shè)計(jì)該模塊是系統(tǒng)數(shù)據(jù)安全的防火墻，只有通過了該模塊的身份驗(yàn)證，用戶才有權(quán)使用該系統(tǒng)。在數(shù)據(jù)庫(kù)的用戶表中包含了所有用戶的信息，隨著用戶的增減及考慮到系統(tǒng)安全性，用戶表的信息也相應(yīng)地可以添加、修改和刪除。如下圖所示教師管理系統(tǒng)的登錄界面frmlogin：在登錄時(shí)，可以在列表框中選擇用戶名，然后輸入密碼，單擊“確認(rèn)”按鈕驗(yàn)證正確后便可進(jìn)入系統(tǒng)主窗體。主要代碼為：UserName =