SQL實(shí)訓(xùn)報(bào)告

《SQLServer應(yīng)用技術(shù)》實(shí)訓(xùn)報(bào)告

實(shí)訓(xùn)名稱：高校學(xué)生信息管理系統(tǒng)實(shí)訓(xùn)專業(yè)：計(jì)算機(jī)應(yīng)用技術(shù)班級：計(jì)算機(jī)10A1

學(xué)號：104643007姓名：陳健指導(dǎo)教師：劉忠民

201*年12月22日

實(shí)訓(xùn)成績

考核、評價(jià)項(xiàng)目對實(shí)訓(xùn)期間的出勤情實(shí)訓(xùn)表現(xiàn)況、實(shí)訓(xùn)態(tài)度、安全意與態(tài)度識、職業(yè)道德素質(zhì)評定（20分）成績考核內(nèi)容得分職業(yè)素質(zhì)、實(shí)訓(xùn)態(tài)度、效率觀念、協(xié)作精神實(shí)訓(xùn)評價(jià)根據(jù)學(xué)生在實(shí)訓(xùn)操作過程中的知識掌握情況、程序設(shè)實(shí)訓(xùn)操作根據(jù)學(xué)生實(shí)訓(xùn)操作的過計(jì)方法和技巧、基本操作技過程程進(jìn)行考核，評定成績能、知識應(yīng)用能力、分析問（40分）題和解決問題的能力，以及創(chuàng)新能力進(jìn)行考核。根據(jù)學(xué)生實(shí)訓(xùn)，程序設(shè)實(shí)訓(xùn)考核計(jì)的結(jié)果進(jìn)行考核，評（30分）定成績根據(jù)實(shí)訓(xùn)項(xiàng)目任務(wù)要求，對程序設(shè)計(jì)的結(jié)果，分模塊進(jìn)行測試考核實(shí)訓(xùn)文檔實(shí)訓(xùn)日記、實(shí)訓(xùn)報(bào)告等（10分）評定成績表達(dá)能力、文檔寫作能力、文檔的規(guī)范性總分

一、實(shí)訓(xùn)目的

1.熟練掌握SQLServer數(shù)據(jù)庫的設(shè)計(jì)及其對象的基本操作。2.熟練掌握數(shù)據(jù)查詢、視圖、存儲過程和觸發(fā)器的使用方法。3.熟練掌握vb應(yīng)用程序中界面設(shè)計(jì)的方法。

4.通過實(shí)訓(xùn)，使學(xué)生了解數(shù)據(jù)庫系統(tǒng)在實(shí)際應(yīng)用中的開發(fā)方法及設(shè)計(jì)過程，為今后從事管理信息系統(tǒng)的研究、開發(fā)、應(yīng)用提供必要的知識，更好地完成各種計(jì)算機(jī)應(yīng)用和開發(fā)任務(wù)。二、課程設(shè)計(jì)報(bào)告內(nèi)容1.實(shí)訓(xùn)內(nèi)容

學(xué)生信息管理工作是學(xué)校管理工作的重要組成部分，現(xiàn)在相當(dāng)一部分學(xué)校的學(xué)生管理工作仍沿用手工方式。隨著學(xué)校規(guī)模的擴(kuò)大、學(xué)生人數(shù)的增加，效率低下、容易出錯(cuò)的手工方式越來越不適應(yīng)實(shí)際管理工作的需要，按照軟件工程原理和數(shù)據(jù)庫技術(shù)開發(fā)學(xué)生信息管理系統(tǒng)已經(jīng)成為學(xué)生管理部門的迫切需要。程設(shè)計(jì)的題目是高校學(xué)生信息管理系統(tǒng)，本項(xiàng)目實(shí)現(xiàn)的功能主要包括以下內(nèi)容：

（1）完成數(shù)據(jù)的錄入和修改，并提交數(shù)據(jù)庫保存。其中的數(shù)據(jù)包括：專業(yè)信息、班級信息、學(xué)生信息、選修課程信息和成績信息等，系統(tǒng)能夠自動避免重復(fù)信息。

（2）實(shí)現(xiàn)信息查詢，主要包括學(xué)生信息查詢、選修課程信息查詢和成績信息查詢等。

（3）實(shí)現(xiàn)數(shù)據(jù)的刪除功能：對數(shù)據(jù)進(jìn)行刪除操作。系統(tǒng)能夠通過用戶給出的條件查詢所要?jiǎng)h除的數(shù)據(jù)，并提示用戶確認(rèn)是否刪除。若確定，則把相關(guān)信息從數(shù)據(jù)庫中刪除。

（4）報(bào)表功能。包括指定學(xué)生的選課情況和指定課程的選修情況。高校學(xué)生信息管理系統(tǒng)采用C/S體系結(jié)構(gòu)，按照客戶端設(shè)計(jì)和數(shù)據(jù)庫設(shè)計(jì)兩部分進(jìn)行�？蛻舳素�(fù)責(zé)提供表達(dá)邏輯、顯示用戶界面信息、訪問數(shù)據(jù)庫服務(wù)器等，采用VisualBasic6.0作為開發(fā)工具；服務(wù)器端則采用SQLServer201*作為數(shù)據(jù)庫管理系統(tǒng)，負(fù)責(zé)后臺的數(shù)據(jù)處理。2.系統(tǒng)功能模塊設(shè)計(jì)

學(xué)生信息管理客戶端主要對學(xué)生信息、課程信息、學(xué)生成績信息進(jìn)行管理，該系統(tǒng)分4個(gè)模功能塊，如圖所示。

系統(tǒng)主窗學(xué)生信息管課程信息管成績信息管增加學(xué)生信息

修改學(xué)生信息刪除學(xué)生信息查找學(xué)生信息學(xué)生信息報(bào)表增加課程信息修改課程信息刪除課程信息查找課程信息課程信息報(bào)表增加成績信息修改成績信息刪除成績信息查找成績信息3.實(shí)訓(xùn)設(shè)備或軟、硬件

硬件：PⅣ及以上性能的PC機(jī)

軟件：WindowsXP操作系統(tǒng)；VB6.0；SQLServer201*數(shù)據(jù)庫系統(tǒng)

三、結(jié)論

1.數(shù)據(jù)庫設(shè)計(jì)

數(shù)據(jù)庫的設(shè)計(jì)主要是在服務(wù)器端建立數(shù)據(jù)庫和數(shù)據(jù)表，并實(shí)現(xiàn)數(shù)據(jù)處理功能。根據(jù)系統(tǒng)需求分析和功能設(shè)計(jì)，可以將數(shù)據(jù)規(guī)劃為學(xué)生實(shí)體、課程實(shí)體、選課實(shí)體三個(gè)實(shí)體。在了解了數(shù)據(jù)庫結(jié)構(gòu)設(shè)計(jì)概念以后，開始創(chuàng)建數(shù)據(jù)庫和數(shù)據(jù)表。首先，用查詢分析器創(chuàng)建student數(shù)據(jù)庫，創(chuàng)建過程中需要注意修改操作系統(tǒng)文件名到新創(chuàng)建的文件夾。然后創(chuàng)建專業(yè)信息表spe_Info、班級信息表class_Info、課程信息表course_Info、學(xué)生信息表stu_Info、成績信息表score五個(gè)表。在數(shù)據(jù)庫及數(shù)據(jù)表創(chuàng)建完成后，對SQLSever服務(wù)器端數(shù)據(jù)進(jìn)行處理。首先創(chuàng)建stucourse_View視圖。在數(shù)據(jù)表的創(chuàng)建過程中應(yīng)注意，因?yàn)閷W(xué)號、專業(yè)編號、班級編號等是一一對應(yīng)的，所以學(xué)號在數(shù)據(jù)表中應(yīng)設(shè)置為主鍵，設(shè)置主鍵的語句為：stu_Nochar(6)NOTNULLPRIMARYKEY。由于系統(tǒng)對專業(yè)信息表等五個(gè)表的操作主要有：添加、修改、刪除，所以，針對stu_Info、course_Info和score_Info三個(gè)表定義相應(yīng)的儲存過程，以便在VisualBasic中根據(jù)需要調(diào)用對應(yīng)的儲存過程。由于系統(tǒng)對student數(shù)據(jù)庫中數(shù)據(jù)進(jìn)行添加、修改、刪除操

作時(shí)，應(yīng)保證數(shù)據(jù)的完整性，所以需對觸發(fā)器進(jìn)行定義以保證數(shù)據(jù)庫數(shù)據(jù)的完整性。對stu_Info表定義的UPDATE觸發(fā)器trg_stu_update的設(shè)計(jì)功能是：當(dāng)修改stu_Info表中某個(gè)學(xué)生的學(xué)號的同時(shí)修改score_Info表中該學(xué)號對應(yīng)記錄相應(yīng)的值。在完成了數(shù)據(jù)庫及數(shù)據(jù)表的創(chuàng)建后，為保證系統(tǒng)功能的實(shí)現(xiàn)，需對數(shù)據(jù)庫用戶權(quán)限進(jìn)行設(shè)置，在用戶欄中設(shè)置用戶及登錄密碼，維護(hù)數(shù)據(jù)庫的安全是確保數(shù)據(jù)庫正常運(yùn)行的重要工作。最后完成數(shù)據(jù)庫的設(shè)計(jì)后，要對數(shù)據(jù)庫進(jìn)行備份。數(shù)據(jù)庫的備份時(shí)對SQLSever數(shù)據(jù)事務(wù)日志進(jìn)行拷貝。做數(shù)據(jù)備份就是為了方便的數(shù)據(jù)庫恢復(fù)用。建數(shù)據(jù)庫是為了與所設(shè)計(jì)的程序相連接，連接數(shù)據(jù)庫需用到ADO訪問數(shù)據(jù)庫。如要連接SQLSever服務(wù)器中的student數(shù)據(jù)庫，用如下代碼對

Connection

的

DefaultDatabase

屬性值進(jìn)行設(shè)置：Cnn.

DefaultDatabase=”student”。

2.系統(tǒng)功能實(shí)現(xiàn)

“學(xué)生信息管理系統(tǒng)”系統(tǒng)功能的實(shí)現(xiàn)，主要是在VB中對系統(tǒng)模塊進(jìn)行設(shè)計(jì)，并連接數(shù)據(jù)庫以達(dá)到系統(tǒng)功能的實(shí)現(xiàn)。由于程序是利用ADO完成對數(shù)據(jù)庫的訪問和操作的，所以在對模塊的設(shè)計(jì)前需要添加ADO庫。本系統(tǒng)還需要用到ToolBar控件和MSFlexGrid控件，前者用于連接數(shù)據(jù)庫，后者用于以表格形式顯示數(shù)據(jù)庫表的內(nèi)容。本系統(tǒng)主要用于學(xué)生信息管理，主要任務(wù)是用計(jì)算機(jī)對學(xué)生各種信息進(jìn)行日常管理，如：查詢、修改、增加、刪除。首先是公共模塊中定義全局變量及子程序。在模塊中PublicMyConnectionAsNewADODB.Connection語句用于建立與數(shù)據(jù)庫的連接。而PublicSQLUsernameAsString用于存放SQL的登錄賬號。對ChangeFormPos(frmMainAsMDIForm,frmAsForm)子程序定義用于確定調(diào)用窗體在主窗體中的顯示位置。對登錄窗口的設(shè)計(jì)要用到了ComboBox控件，使在登錄時(shí)用戶可以直接從列表中選擇。在設(shè)計(jì)登錄窗體時(shí)，需要確保數(shù)據(jù)庫是否連接。在對主窗體MDIformMain的設(shè)計(jì)中需要添加MDI窗體，在設(shè)計(jì)過程中對控件的名稱及屬性的設(shè)置要細(xì)心，我開始就是由于將登錄控件的屬性值打成了cmbOK而使系統(tǒng)無法運(yùn)行。在設(shè)計(jì)專業(yè)管理窗口時(shí)，第一次用到了MSFlexGrid控件，該控件的作用是以表格形式顯示二維字符數(shù)組中每個(gè)單元的數(shù)據(jù)。常

用于處理復(fù)雜的二維數(shù)據(jù)表的問題。如校歷表、學(xué)生宿舍表、學(xué)生班級成績表等。這是實(shí)訓(xùn)過程中所學(xué)到的新的知識。通過txtSpeNo.Text=frmSpe.MSFlexGrid1.TextMatrix(frmSpe

.MSFlexGrid1.Row,1)txtSpeName.Text=frmSpe.MSFlexGrid1.TextMatrix(frmSpe.MSFlexGrid1.Row,2)txtSpeNo.Enabled=False語句達(dá)到單擊MSFlexGrid控件中某記錄行時(shí)，將該記錄的字段值顯示在對應(yīng)的控件中。學(xué)生信息管理模塊主要是實(shí)現(xiàn)學(xué)生信息的增加、修改、刪除、查詢和生成報(bào)表等功能，它的子窗體包括添加、修改學(xué)生信息窗體、學(xué)生信息查詢窗體、學(xué)生選課報(bào)表。在設(shè)計(jì)學(xué)生選課報(bào)表時(shí)，用到了DataReport報(bào)表，這也是以前沒有用到的知識。使用DataReport報(bào)表可以使顯示的信息更加明了并可以方便打印。在報(bào)表設(shè)計(jì)完成后，將以下程序添加到frmStu窗口的工具欄“報(bào)表”按鈕程序段中，DataEnvironment1.Commands(1).Parameters(1).Value=_

MSFlexGrid1.TextMatrix(MSFlexGrid1.Row,1)StuDataReport.Show，當(dāng)按下“報(bào)表”按鈕時(shí)，則顯示當(dāng)前MSFlexGrid.TextMatrix(MSFlexGrid1.Row,1)的值所指定學(xué)號的學(xué)生的所有選課信息。

四、結(jié)束語

兩周的實(shí)訓(xùn)終于結(jié)束了，這次實(shí)訓(xùn)的內(nèi)容是應(yīng)用SQLServer數(shù)據(jù)庫設(shè)計(jì)VB程序設(shè)計(jì)來設(shè)計(jì)“學(xué)生信息管理系統(tǒng)”。雖然時(shí)間只有短短的兩周，但使我獲益匪淺，感慨良多。使我感受最深的有如下幾點(diǎn)：第一，實(shí)訓(xùn)是個(gè)人所學(xué)知識的應(yīng)用，是綜合能力的檢驗(yàn)。要想學(xué)好數(shù)據(jù)庫，除了平時(shí)的理論功底外，還需要一定的時(shí)間動手能力，操作能力，要學(xué)會靈活應(yīng)用所學(xué)的知識。第二，通過這次實(shí)訓(xùn)，我深深地體會到積累知識的重要性，平時(shí)學(xué)習(xí)的不努力，在實(shí)訓(xùn)時(shí)必定會遇到很多的麻煩。此次實(shí)訓(xùn)讓我有了擴(kuò)寬知識面及提升技術(shù)能力的機(jī)會，我真正領(lǐng)會到實(shí)踐與理論相結(jié)合的重要性。本次實(shí)訓(xùn)的目的是讓我們掌握數(shù)據(jù)庫系統(tǒng)的原理、及將理論與實(shí)踐相結(jié)合熟練熟練掌握SQLServer數(shù)據(jù)庫的設(shè)計(jì)及其對象的基本操作。雖然在實(shí)訓(xùn)過程中遇到了許多難點(diǎn)和問題，但在老師和同學(xué)們的幫助下，最終解決了這些問題并熟練的掌握了SQLServer數(shù)據(jù)庫的設(shè)計(jì)及其對象的基本操作以及VB應(yīng)用程序中界面設(shè)計(jì)的方法。通過實(shí)訓(xùn)，使我了解了據(jù)庫系統(tǒng)在實(shí)際應(yīng)用中的開發(fā)方法及設(shè)計(jì)過程，為今后從事管理信息系統(tǒng)的研究、開發(fā)、應(yīng)用提供必要的知識，更好地完成各種計(jì)算機(jī)應(yīng)用和開發(fā)任務(wù)。

擴(kuò)展閱讀：SQL實(shí)訓(xùn)報(bào)告

程設(shè)計(jì)報(bào)

課程名稱SQLserver201*管理系別：工程技術(shù)系專業(yè)班級：計(jì)網(wǎng)0901學(xué)號：0911060131姓名：江攀課程題目：SQL數(shù)據(jù)庫應(yīng)用完成日期：201*年12月16日指導(dǎo)老師：師韻

201*年12月16日

課告

Windowsserver201*服務(wù)器實(shí)訓(xùn)

首先熟知SQLServer201*數(shù)據(jù)庫和MicrosoftVisualBasic課程設(shè)計(jì)目的6.0企業(yè)版的注冊方法與技能，了解SQLServer201*的體系結(jié)構(gòu)；掌握使用SQLServer企業(yè)管理器創(chuàng)建數(shù)據(jù)庫的技能與方法；掌握使用SQLServer企業(yè)管理器創(chuàng)建基本表的技能與方法；了解SQLServer201*查詢分析器的應(yīng)用方法；熟悉SQLServer201*和VisualBasic6.0的運(yùn)行環(huán)境。前后臺連接。能認(rèn)真獨(dú)立完成實(shí)訓(xùn)內(nèi)容；實(shí)訓(xùn)前做好上機(jī)實(shí)訓(xùn)的準(zhǔn)備，課程設(shè)計(jì)要求針對實(shí)訓(xùn)內(nèi)容，認(rèn)真復(fù)習(xí)與本次實(shí)訓(xùn)有關(guān)的知識，完成實(shí)訓(xùn)內(nèi)容的預(yù)習(xí)準(zhǔn)備工作；實(shí)訓(xùn)后做好實(shí)訓(xùn)總結(jié)（包括實(shí)訓(xùn)過程中遇到的問題及其解決方法、實(shí)訓(xùn)心得體會等），并根據(jù)實(shí)訓(xùn)情況完成實(shí)訓(xùn)報(bào)告。1、Sqlserver數(shù)據(jù)庫對應(yīng)的物理文件。2、大小的估算和設(shè)置。3、觸發(fā)器的類型。4、觸發(fā)器的約束。課程設(shè)計(jì)注意事項(xiàng)課程設(shè)計(jì)內(nèi)容

1、數(shù)據(jù)庫的概念設(shè)計(jì)和邏輯設(shè)計(jì)。2、數(shù)據(jù)庫和數(shù)據(jù)表的創(chuàng)建。3、數(shù)據(jù)查詢。4、數(shù)據(jù)庫的備份。5、數(shù)據(jù)庫的導(dǎo)入與導(dǎo)出。Windowsserver201*服務(wù)器實(shí)訓(xùn)

課程設(shè)計(jì)簡要操作步驟1、安裝和配置VB前臺和SQL201*后臺2、后臺SQLserver201*配置，創(chuàng)建服務(wù)器，創(chuàng)建數(shù)據(jù)表3、前臺VB6.0設(shè)計(jì)登錄信息窗口寫入代碼4、前臺VB和后臺SQL201*關(guān)聯(lián)，然后測試連接是否成功5、啟動前臺登錄窗口測試并完成所有項(xiàng)目6、附錄前臺登錄窗口代碼此次實(shí)訓(xùn)，雖說時(shí)間很短，但其中的每一天都使我收獲很大、受益匪課程設(shè)計(jì)心得體會淺，它極大地加深了我對一些理論知識的理解，在實(shí)踐能力上也得到了提高，真正地做到了學(xué)以致用，對我來說受益非淺。這次實(shí)訓(xùn)為我提供了與眾不同的學(xué)習(xí)方法和學(xué)習(xí)體會，從書本中面對現(xiàn)實(shí)，為我將來走上社會打下了扎實(shí)的基礎(chǔ)。從實(shí)踐操作中，我總結(jié)出一些屬于自己的實(shí)踐經(jīng)驗(yàn)，社會是不會要一個(gè)一無是處的人的。作為在校網(wǎng)絡(luò)工程專業(yè)的學(xué)生，現(xiàn)在我能做的就是吸取知識，提高自身的綜合素質(zhì)，提高自己的職業(yè)技能，自己有了能力，到時(shí)候才會是“車到山前必有路”。我相信在不久的未來，會有屬于我自己的一片天空課程設(shè)計(jì)評語及成績評語

成績指導(dǎo)教師（簽名）201*年12月日Windowsserver201*服務(wù)器實(shí)訓(xùn)

附：

一、MicrosoftSQLServer201*企業(yè)版和VisualBasic6.0企業(yè)版安裝：

1、首先熟知SQLServer201*數(shù)據(jù)庫和MicrosoftVisualBasic6.0企業(yè)版

的注冊方法與技能，了解SQLServer201*的體系結(jié)構(gòu)；掌握使用SQLServer企業(yè)管理器創(chuàng)建數(shù)據(jù)庫的技能與方法；掌握使用SQLServer企業(yè)管理器創(chuàng)建基本表的技能與方法；了解SQLServer201*查詢分析器的應(yīng)用方法；熟悉SQLServer201*和VisualBasic6.0的運(yùn)行環(huán)境。2、MicrosoftSQLServer201*企業(yè)版安裝

這是安裝成功后：

Windowsserver201*服務(wù)器實(shí)訓(xùn)

3、VisualBasic6.0企業(yè)版安裝：

二、后臺數(shù)據(jù)庫配置管理：

【開始】【程序】【SQLServer】【服務(wù)器網(wǎng)絡(luò)實(shí)用工具】

【客戶端網(wǎng)絡(luò)實(shí)用工具】

Windowsserver201*服務(wù)器實(shí)訓(xùn)

【企業(yè)管理器】【sqlserver組】【新建數(shù)據(jù)庫】

【新建表】【xsxxb】

Windowsserver201*服務(wù)器實(shí)訓(xùn)

三、前臺VB配置管理：

1、2、

設(shè)置學(xué)生信息詳情數(shù)據(jù)系統(tǒng)然后關(guān)聯(lián)SQLserver201*數(shù)據(jù)庫

【connectionstring】-----【使用連接字符串】---獲取SQL地址然后生成…

寫入代碼并測試連接是否正確，｛代碼附后錄｝

Windowsserver201*服務(wù)器實(shí)訓(xùn)

學(xué)生信息系統(tǒng)是記錄學(xué)生信息的數(shù)據(jù)庫，不能隨便每個(gè)人都進(jìn)吧，呵呵，所以我又設(shè)置了一個(gè)管理登錄窗口，然后將管理登錄窗口連接指向?qū)W生信息系統(tǒng)，所以需要密碼才可以進(jìn)入查詢學(xué)生信系統(tǒng)額》。。

3、管理登錄系統(tǒng);

2、管理登錄賬戶：

登錄窗口和數(shù)據(jù)庫連接了但還要給予密碼賬戶》。。。我們?nèi)��?shù)據(jù)庫創(chuàng)建安全表吧

Windowsserver201*服務(wù)器實(shí)訓(xùn)

四、前臺VB和后臺SQLserver201*測試調(diào)配：

Windowsserver201*服務(wù)器實(shí)訓(xùn)

測試成功，實(shí)訓(xùn)完成！

Windowsserver201*服務(wù)器實(shí)訓(xùn)

附：

一、管理登錄窗口代碼：

PrivateSubCommand1_Click()DimsqlAsString

Dimrs_loginAsNewADODB.RecordsetDimconnAsNewADODB.Connection

conn.Open"Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=Stuscore;DataSource=SOLOVE007"IfTrim(Text1.Text)=""Then

MsgBox"用戶名不能為空，請重新輸入！"Text1.SetFocusElse

sql="select*fromadminwhereuserl=""&Trim(Text1.Text)&"""rs_login.Opensql,conn,adOpenKeyset,adLockPessimisticIfrs_login.EOF=TrueThen

MsgBox"沒有這個(gè)用戶,請重輸入！",vbOKOnly+vbExclamation,""Text1.Text=""Text1.SetFocusElse

UserName=Text1.Text

IfTrim(rs_login.Fields(1))=Trim(Text2.Text)ThenUnloadMe

學(xué)生信息詳情.ShowElse

MsgBox"密碼不正確,請重輸入！",vbOKOnly+vbExclamation,""Text2.SetFocusText2.Text=""EndIfEndIfEndIf

cnt=cnt+1Ifcnt=3ThenUnloadMeEndIfEndSub

PrivateSubCommand2_Click()EndEndSub

PrivateSubForm_Load()cnt=0EndSub

Windowsserver201*服務(wù)器實(shí)訓(xùn)

二、學(xué)生信息詳情系統(tǒng)：

PrivateSubCommand1_Click()DimmynumberAsString

mynumber=InputBox$("請輸入學(xué)號(4位)","學(xué)號搜索")"輸入搜索的學(xué)號

Adodc1.Recordset.MoveFirst

"將記錄移至第一條Ifmynumber""Then

mynumber="sno=""&mynumber&"""

"組合搜索字符串Adodc1.Recordset.Find(mynumber)

"尋找符合學(xué)號的記錄

IfAdodc1.Recordset.EOFThen

"沒找到，輸出提示信息MsgBox"沒有該學(xué)生！"EndIfEndIf

EndSub

PrivateSubCommand2_Click()DimiAsIntegerOnErrorGoToapperr

Adodc1.Recordset.AddNew"添加新紀(jì)錄Fori=0To5

Text1(i).Text="""清除數(shù)據(jù)窗口Next

Text1(0).SetFocus"將焦點(diǎn)設(shè)置在Text1(0)savecancelExitSub

apperr:MsgBoxErr.DescriptionEndSub

PrivateSubCommand3_Click()DimsAsString

OnErrorGoTodelerr

s=MsgBox("確定要?jiǎng)h除嗎?",vbQuestion+vbOKCancel,"確定刪除！")"刪除確認(rèn)窗口

Ifs=1Then"確定刪除一條記錄Adodc1.Recordset.Delete"刪除記錄Adodc1.Recordset.MoveNext"移至下一條記錄IfAdodc1.Recordset.RecordCount>0Then

"是否還有記錄IfAdodc1.Recordset.EOFThen

創(chuàng)建12

Windowsserver201*服務(wù)器實(shí)訓(xùn)

"是否移記錄指針到盡頭Adodc1.Recordset.MoveLast"移至最后一條記錄EndIfEndIfEndIfExitSubdelerr:

MsgBoxErr.DescriptionEndSub

PrivateSubCommand4_Click()DimsAsString

OnErrorGoToupdateerrAdodc1.Recordset.UpdateAdodc1.Refreshinitial_buttonExitSubupdateerr:

MsgBoxErr.Description

EndSub

PrivateSubCommand5_Click()OnErrorGoTocancelerr

Adodc1.Recordset.CancelUpdateinitial_buttonExitSub

cancelerr:MsgBoxErr.DescriptionEndSub

PrivateSubCommand6_Click()EndEndSub

PublicSubsavecancel()Command1.Enabled=FalseCommand2.Enabled=FalseCommand3.Enabled=FalseCommand4.Enabled=TrueCommand5.Enabled=TrueCommand6.Enabled=FalseEndSub

PublicSubinitial_button()

IfAdodc1.Recordset.RecordCount=0ThenCommand1.Enabled=FalseCommand2.Enabled=TrueCommand3.Enabled=FalseCommand4.Enabled=False

Windowsserver201*服務(wù)器實(shí)訓(xùn)

Command5.Enabled=FalseCommand6.Enabled=TrueElse

Command1.Enabled=TrueCommand2.Enabled=TrueCommand3.Enabled=TrueCommand4.Enabled=FalseCommand5.Enabled=FalseCommand6.Enabled=TrueEndIfEndSub

PrivateSubForm_Load()initial_buttonEndSub

友情提示：本文中關(guān)于《SQL實(shí)訓(xùn)報(bào)告》給出的范例僅供您參考拓展思維使用，SQL實(shí)訓(xùn)報(bào)告：該篇文章建議您自主創(chuàng)作。

來源：網(wǎng)絡(luò)整理 免責(zé)聲明：本文僅限學(xué)習(xí)分享，如產(chǎn)生版權(quán)問題，請聯(lián)系我們及時(shí)刪除。

《SQL實(shí)訓(xùn)報(bào)告》由互聯(lián)網(wǎng)用戶整理提供,轉(zhuǎn)載分享請保留原作者信息,謝謝!
鏈接地址：http://m.weilaioem.com/gongwen/625138.html

• 上一篇：SQL_Server數(shù)據(jù)庫實(shí)訓(xùn)_實(shí)訓(xùn)報(bào)告
• 下一篇：空間數(shù)據(jù)庫設(shè)計(jì)綜合實(shí)習(xí)報(bào)告封面及目錄