【正文】
統(tǒng)管理、操作更為直觀方便。記得在以前各種關(guān)于SQL Server的文章,都會(huì)將其定位成中小型應(yīng)用方面,這種感覺被大家自然的延續(xù)到了2000版之中。大量的第三方控件針對(duì)VB提供。有很少功能的對(duì)話框窗口(比如沒有最大化和最小化按鈕的窗體)可以用來提供彈出功能。窗體控件的增加和改變可以用拖放技術(shù)實(shí)現(xiàn)。它源自于BASIC編程語(yǔ)言。 把TempCJB表的數(shù)據(jù)插入到CJB表 insert into CJB Select XH,KCH,CJ from TempCJB if(error0)goto errhandle。其代碼如下:創(chuàng)建學(xué)生信息表:CREATE TABLE XSB( XH char(6) not null primary key, XM char(10) not null, XB bit, CSSJ datetime, ZY char(10), ZXF int, BZ varchar(500),)Go創(chuàng)建課程表:create table KCB( KCH char(6), KCM char(6), KKXQ int, XF int,)創(chuàng)建成績(jī)表:create table CJB( XH char(6), KCM char(6), CJ int,)查詢表:select * from XSBselect * from KCBselect * from CJBselect * from tempCJB3視圖創(chuàng)建學(xué)生課程成績(jī)表,名字為temCJB,create view temCJBasselect ,from KCBinner join CJB on =inner join XSB on =4存儲(chǔ)過程:CJ_Data,Load_CJ,Write_CJ,TJ_CJ1 xsb單條記錄的insert,update,delete操作 create procedure CJB_Data(in_xh char(6),in_kch char(3),in_cj int)as set nocount on declare in_count int declare in_xf tinyint declare in_cjb_cj int set in_xf=(select XF from KCB where KCH=in_kch) set in_count=( select count(*) from CJB where XH=in_xh and KCH=in_kch) set in_cjb_cj=( select CJ from CJB where XH=in_xh and KCH=in_kch) if(in_count0) /* 學(xué)生已選該課程*/ begin delete from CJB where XH=in_xh and KCH=in_kch if(in_cjb_cj60) /* 選課成績(jī)及格,增加xsb的總學(xué)分*/ begin update XSB set ZXF=ZXFin_xf where XH=in_xh end end if (in_cj!=1) /* 新成績(jī)0 ,添加記錄*/ begin insert into CJB values(in_xh,in_kch,in_cj) if(in_cj60) /* 新成績(jī)60 ,改寫總學(xué)分*/ begin update XSB set ZXF=ZXF+in_xf where XH=in_xh end endgo2 將某專業(yè)所有學(xué)生所選某課程的信息添加到tempcjb中 create procedure Load_CJ(ZY char(12),KCH varchar(3)) asbegin declare Stu_XH char(6) declare Stu_CJ int 查找是否有tempCJB表,若有則刪除 if exists (select * from sysobjects where objectproperty(object_id(39。,size=10,maxsize=12,filegrowth=10%)log on (name=xscjgl_log,filename = 39。(2) 在“數(shù)據(jù)庫(kù)”文件夾上單擊鼠標(biāo)的右鍵,選擇“新建數(shù)據(jù)庫(kù)”菜單選項(xiàng),單擊它,系統(tǒng)會(huì)顯示“數(shù)據(jù)庫(kù)屬性”對(duì)話框。學(xué)生(學(xué)號(hào),學(xué)生姓名,性別,專業(yè),班級(jí),出生日期)(2)一個(gè)m:n聯(lián)系轉(zhuǎn)換為一個(gè)關(guān)系模式。設(shè)計(jì)一個(gè)完善的數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)不可能一蹴而就,它往往是上述6個(gè)階段的不斷反復(fù)。輸入數(shù)據(jù):成績(jī)信息。它可以手工文檔或手工憑單,也可以是計(jì)算機(jī)文檔。學(xué)生成績(jī)管理系統(tǒng)數(shù)據(jù)流圖如圖31所示,其中所涉及到的數(shù)據(jù)存儲(chǔ)文件,學(xué)生增加信息專業(yè)分配學(xué)生管理成績(jī)處理成績(jī)分析修改信息刪除信息查詢信息錄入檔案學(xué)生信息登記課程查詢學(xué)生查詢學(xué)生成績(jī)庫(kù)顯示信息學(xué)生學(xué)生信息登記成績(jī)信息登記表學(xué)生信息登記表成績(jī)信息登記查詢刪除修改添加登記登記專業(yè)信息登記表成績(jī)考核成績(jī)統(tǒng)計(jì)入檔參加課程編號(hào)學(xué)生編號(hào)成績(jī)信息學(xué)生信息課程信息成績(jī)信息學(xué)生信息成績(jī)信息成績(jī)檔案 圖31 學(xué)生成績(jī)管理系統(tǒng)數(shù)據(jù)流數(shù)據(jù)字典通常包括數(shù)據(jù)項(xiàng)、數(shù)據(jù)結(jié)構(gòu)、數(shù)據(jù)流、數(shù)據(jù)存儲(chǔ)和處理過程五個(gè)部分。數(shù)據(jù)流圖就是用來刻畫數(shù)據(jù)流和數(shù)據(jù)轉(zhuǎn)換的信息系統(tǒng)建模技術(shù)。人工操作必將被計(jì)算機(jī)代替。產(chǎn)業(yè)信息化,管理現(xiàn)代化,科學(xué)化已經(jīng)成為行業(yè)發(fā)展的重要課題,這不僅是企業(yè)提高自身競(jìng)爭(zhēng)力,甚至是國(guó)家提高綜合國(guó)力,走向國(guó)民富強(qiáng)的重要手段。數(shù)據(jù)庫(kù)一個(gè)信息系統(tǒng)的各個(gè)部分能否緊密地結(jié)合在一起以及如何結(jié)合,關(guān)鍵在數(shù)據(jù)庫(kù)。數(shù)據(jù)庫(kù)技術(shù)是計(jì)算機(jī)科學(xué)與技術(shù)中發(fā)展最快的領(lǐng)域之一,也是應(yīng)用最廣的技術(shù)之一,它已成為計(jì)算機(jī)信息系統(tǒng)與應(yīng)用系統(tǒng)的核心技術(shù)和重要基礎(chǔ)。本論文從系統(tǒng)分析、系統(tǒng)設(shè)計(jì)、系統(tǒng)實(shí)施和使用等幾個(gè)方面對(duì)學(xué)生成績(jī)管理系統(tǒng)的功能需求、體系結(jié)構(gòu)和開發(fā)等進(jìn)行了介紹,較好實(shí)現(xiàn)了該系統(tǒng)的一個(gè)原型系統(tǒng)。通過對(duì)一個(gè)實(shí)際問題的分析、設(shè)計(jì)與實(shí)現(xiàn),將原理與應(yīng)用相結(jié)合,通過把書本上學(xué)到的知識(shí)用于解決實(shí)際問題,培養(yǎng)學(xué)生的動(dòng)手能力,也是對(duì)前期課堂教學(xué)效果的檢驗(yàn);另一方面,使學(xué)生能深入理解和靈活掌握理論教學(xué)內(nèi)容。該系統(tǒng)可使學(xué)校教職員工減輕工作壓力,系統(tǒng)地對(duì)教務(wù)、學(xué)生選課、教學(xué)和學(xué)生成績(jī)等各項(xiàng)服務(wù)和信息進(jìn)行管理。數(shù)據(jù)庫(kù)是數(shù)據(jù)管理的最新技術(shù),是計(jì)算機(jī)學(xué)科的重要分支。數(shù)據(jù)庫(kù)是數(shù)據(jù)管理的最新技術(shù),是計(jì)算機(jī)科學(xué)的重要分支。網(wǎng)絡(luò)技術(shù)的應(yīng)用使得計(jì)算機(jī)之間通信和信息共享成為可能,而數(shù)據(jù)庫(kù)技術(shù)的應(yīng)用則為人們奠定了數(shù)據(jù)存儲(chǔ)、信息檢索和數(shù)據(jù)分析等應(yīng)用功能的基礎(chǔ),使得各項(xiàng)業(yè)務(wù)工作通過信息化技術(shù)高效運(yùn)轉(zhuǎn)和被處理。因此可見,隨著我國(guó)教育的迅速發(fā)展,信息技術(shù)在其上的應(yīng)用會(huì)更加地廣泛和深入。3系統(tǒng)需求分析系統(tǒng)開發(fā)的總體任務(wù)是實(shí)現(xiàn)學(xué)生成績(jī)管理,主要完成的功能有:(1) 學(xué)生信息管理對(duì)全體學(xué)生信息查詢,或某個(gè)學(xué)生信息查詢,并能直接實(shí)現(xiàn)添加記錄、刪除記錄、打印報(bào)表及刷新等功能。數(shù)據(jù)流圖(Data Flow Diagram,DFD)是用來描繪軟件系統(tǒng)邏輯模型的圖形工具,用于描繪信息在系統(tǒng)中的流動(dòng)和處理情況。1 數(shù)據(jù)項(xiàng):XH含義說明:唯一標(biāo)識(shí)每個(gè)學(xué)生別名:學(xué)生編號(hào)長(zhǎng)度:6取值范圍:000000至999999取值含義:前兩位標(biāo)識(shí)該學(xué)生入學(xué)時(shí)間,后四位按順序編號(hào)。輸出數(shù)據(jù):專業(yè)信息。學(xué)生成績(jī)管理系統(tǒng)學(xué)生信息管理學(xué)生成績(jī)管理成績(jī)錄入成績(jī)分布信息錄入信息查詢信息刪除5數(shù)據(jù)庫(kù)設(shè)計(jì)數(shù)據(jù)庫(kù)技術(shù)是信息資源管理最有效的手段,它是指對(duì)于一個(gè)給定的應(yīng)用環(huán)境,利用現(xiàn)有的數(shù)據(jù)庫(kù)管理系統(tǒng)構(gòu)造最優(yōu)的數(shù)據(jù)庫(kù)模式,建立數(shù)據(jù)庫(kù)及其應(yīng)用系統(tǒng),有效存儲(chǔ)數(shù)據(jù),滿足用戶信息要求和處理要求。它是現(xiàn)實(shí)世界的一個(gè)真實(shí)模型,表達(dá)自然、直觀,又易于理解。成績(jī)(學(xué)號(hào),學(xué)生姓名,課程號(hào),成績(jī),專業(yè))創(chuàng)建數(shù)據(jù)庫(kù)的過程實(shí)際上就是為數(shù)據(jù)庫(kù)設(shè)計(jì)名稱,設(shè)計(jì)所占用的存儲(chǔ)空間和存放文件的位置過程等。(5) 在“事務(wù)日志”標(biāo)簽中的“事務(wù)日志文件”對(duì)話框部分,輸入文件名、位置及服務(wù)日志的初始大小。1. 利用企業(yè)管理器創(chuàng)建表。istable39。 提交事務(wù) mit tran。Visual Basic語(yǔ)言特性一個(gè)典型的VB進(jìn)程VB的中心思想就是要便于程序員使用,無論是新手或者專家。默認(rèn)的屬性值會(huì)在控件創(chuàng)建的時(shí)候提供,但是程序員也可以進(jìn)行更改。VB使用參數(shù)計(jì)算的方法來進(jìn)行垃圾收集,這個(gè)方法中包含有大量的對(duì)象,提供基本的面向?qū)ο笾С?。用它可以方便地管理?shù)據(jù)庫(kù)和開發(fā)應(yīng)用程序,它使用了最先進(jìn)的數(shù)據(jù)庫(kù)構(gòu)架,與Windows NT/2000平臺(tái)緊密集成,具有完全的Web功能。有了強(qiáng)大的性能和功能支持,再配合其一向?yàn)槿朔Q道的易用性,SQL Server可以說成為了開發(fā)者手中的一柄利器!另外,目前國(guó)內(nèi)的一些關(guān)于微軟平臺(tái)的數(shù)據(jù)庫(kù)編程教程,喜歡使用Access作為數(shù)據(jù)庫(kù)平臺(tái)的案例,并展開相關(guān)的內(nèi)容。2)、動(dòng)態(tài)自動(dòng)管理和優(yōu)化功能。SQL Server 2005既能運(yùn)行在Windows桌面操作系統(tǒng)下,又可運(yùn)行在服務(wù)器操作系統(tǒng)(包括Windows NT和Windows 2000)下;既能運(yùn)行在單CPU計(jì)算機(jī)上,又能運(yùn)行在對(duì)稱多處理系統(tǒng)下。學(xué)生信息錄入 xsdelete女39。 ‘MsgBox (ccc + SqlStr)End IfEnd Subl 編寫“專業(yè)”列表框的Click程序Private Sub StuZY_Click() MakeSqlStr ‘生成查詢條件 ‘刷新DataGrid控件End Subl 編寫“查詢”按鈕的Click程序Private Sub Stusch_Click() MakeSqlStr = select xh as 學(xué)生號(hào),xm as 學(xué)生名,case when xb=1 then 39。 End Subl 卸載窗體(Form)Private Sub Form_Unload(Cancel As Integer) End Subl 編寫“退出”按鈕的Click事件程序Private Sub Sturec_Click() Unload SInfoInsertEnd Subl 編寫“查找”按鈕的Click事件程序Private Sub StuSearch_Click() 39。 SqlStr, SqlCon, adOpenDynamic, adLockPessimistic If Not Then 39。 else 39。User ID=sa。 + KCM + 39。Data Source=localhostRecordSource:Select KCH,RS1 as 39。,RS5 as 39。 = adCmdText Set SqlRes = SKCH = SqlRes(KCH) Dim StKCH = TJ_CJ = adCmdStoredProcSet StKCH = (KCH, adVarChar, adParamInput, 3) (StKCH) SqlCmd(KCH) = StuKCH (KCH) = Select KCH,RS1 as 39。,RS5 as 39。學(xué)生成績(jī)分布分析,選擇專業(yè)按確定鍵,即可看到成績(jī)分布圖。8參考文獻(xiàn)[1],2000[2],2000[3],2002[4],2002[5],2003[6],2003[7]童愛紅,,2007[8]丁寶康,2003[9]曾宇昆,2005[10]劉志銘,高春艷,2004[11]李卓玲,2007