java課程設計---學生信息管理系統(tǒng)

1、<p><b>　　學號：</b></p><p><b>　　姓名：</b></p><p><b>　　班級：</b></p><p><b>　　完成日期：</b></p><p><b>　　目 錄</b><

2、/p><p><b>　　1 緒 論6</b></p><p>　　1.1學生信息管理系統(tǒng)開發(fā)背景6</p><p>　　1.2學生信息管理系統(tǒng)的設計目標6</p><p>　　2系統(tǒng)環(huán)境開發(fā)工具7</p><p>　　2.1 Visual Studio2005簡介7</p>

3、<p>　　2.2 SQL SERVER 2000簡介7</p><p>　　2.3系統(tǒng)運行環(huán)境7</p><p><b>　　3需求分析8</b></p><p><b>　　3.1功能需求8</b></p><p>　　3.2系統(tǒng)模塊劃分9</p><p&

4、gt;　　4數據庫的實現11</p><p>　　4.1數據庫系統(tǒng)設計及范式分析11</p><p>　　4.1.1數據庫系統(tǒng)設計12</p><p>　　4.1.2數據庫設計范式分析12</p><p>　　4.2 SQL語言介紹13</p><p>　　4.2.1 SQL基礎13</p>

5、<p>　　4.2.2 SQL語句15</p><p>　　4.3定義系統(tǒng)表的結構15</p><p>　　4.4數據庫的實現15</p><p>　　5系統(tǒng)具體的實現18</p><p>　　5.1登錄窗口18</p><p>　　5.2學生信息系統(tǒng)主窗口19</p><p&

6、gt;　　5.3學籍管理窗口20</p><p>　　5.3.1學籍添加20</p><p>　　5.3.2學籍修改20</p><p>　　5.3.3學籍查詢20</p><p>　　5.4課程查詢窗口21</p><p>　　5.5課程修改窗口22</p><p>　　5.6添加

7、課程窗口24</p><p>　　5.7成績管理窗口25</p><p><b>　　5.8報表27</b></p><p><b>　　6結束語29</b></p><p><b>　　參考文獻30</b></p><p><b>

8、　　致 謝31</b></p><p><b>　　1 緒 論</b></p><p><b>　　系統(tǒng)開發(fā)背景</b></p><p>　　學生信息管理系統(tǒng)（Student Information Management System）,以下簡稱SIMS，是針對學校人事處的大量業(yè)務處理工作而開發(fā)的管理軟件，是

9、典型的管理信息系統(tǒng)（Management Information System）。它是一個教育單位不可缺少的部分,它的內容對于學校的決策者和管理者來說都至關重要,它能夠為用戶提供充足的信息和快捷的查詢手段。能有效的幫助學校和老師掌握學生的情況，為學生提供成績跟課程方面的查詢。在傳統(tǒng)模式下利用人工進行學生信息管理，存在著較多的缺點，如：效率底，保密性差，時間一長將產生大量的文件和數據，更不便于查找，更新，維護等。諸如這些情況，令學校管理者

10、對學生的信息管理帶來了很大困難，嚴重影響了教育工作者的工作效率。隨著科學技術的不斷提高,計算機科學日漸成熟, 使用日趨成熟的計算機技術來代替?zhèn)鹘y(tǒng)的人工模式，來實現學生信息的現代化管理，其強大的功能已為人們深刻認識,它已進入人類社會的各個領域并發(fā)揮著越來越重要的作用。作為計算機應用的一部分,使用計算機對學生信息進行管理,具有著手工管理所無法比擬的優(yōu)點.例如:檢索迅速、查找方便、易修改、可靠性</p><p><

11、;b>　　設計目標</b></p><p>　　建立一個統(tǒng)一的在校學生信息管理庫，讓各部門使用同一套信息數據，各部門根據各自的權限對同一套信息數據進行更新維護，這樣便可以通過共享數據信息，減少許多無謂的重復工作，這樣既提高了計算機軟、硬件的使用效率，同時也提高了統(tǒng)計信息的準確性、真實性，而且還能大大方便我們對學生信息的管理，提高我們的管理質量。</p><p>　　在系統(tǒng)

12、啟動后，普通用戶可以在客戶端根據自己的需要進行查詢，而管理員能在服務器端根據提供的信息進行修改，更新等操作。管理學生的基本信息，成績，所修課程的詳細情況。</p><p>　　2 環(huán)境系統(tǒng)開發(fā)工具</p><p>　　2.1 Visual Studio 2005簡介</p><p>　　Visual Studio 是微軟公司推出的開發(fā)環(huán)境，是目前最流行的 Wind

13、ows 平臺應用程序開發(fā)環(huán)境。它是語言，集成開發(fā)環(huán)境，構建以數據為中心的應用程序，構建用戶界面，構建web應用程序和部署應用程序。</p><p>　　2.2 SQL SERVER 2000簡介</p><p>　　系統(tǒng)的服務器采用的是Microsoft SQL SERVER 2000，這是一個最新開發(fā)的大型的關系數據庫管理系統(tǒng)（DBMS），具有非常強大的關系數據庫創(chuàng)建，開發(fā)，設計及管理

14、功能。2.3 系統(tǒng)運行環(huán)境</p><p><b>　　軟件：</b></p><p>　　操作系統(tǒng)：Windows 2000/2003/XP</p><p>　　數據庫：SQL SERVER 2000</p><p><b>　　硬件：</b></p><p>　　CPU

15、：PIV 500</p><p><b>　　內存：最少256M</b></p><p><b>　　硬盤：10G以上</b></p><p><b>　　3 需求分析</b></p><p><b>　　3．1功能需求</b></p>&l

16、t;p>　　學生信息管理系統(tǒng)主要功能：學籍信息管理，班級信息管理，課程信息管理，成績信息管理，用戶信息管理。具體系統(tǒng)功能需求描述如下： </p><p><b>　　1.學籍信息管理</b></p><p>　　每年的大量新生入學，老生畢業(yè)都需要處理大量的學生信息。通過這一模塊，可以實現學生基本情況的添加、刪除、更新。還能查詢各個學生的情況，姓名、家

17、庭電話、家庭住址、學號等各個消息。</p><p><b>　　2.班級信息管理</b></p><p>　　實現班級的添加、刪除、更新。查詢班級的所在系別，輔導員等。</p><p><b>　　3.課程信息管理</b></p><p>　　每個學期都會增加一些新的科目，通過本模塊可以輕松的添加以

18、及更新課程?？梢愿鶕W期條件或者班級條件的選擇，也可根據課程名課程號的輸入，可以看到數據集中顯示符合條件的課程數據信息，而且可以根據教工的修改要求進行數據的添加、刪除、修改的操作。</p><p>　　該項管理對課程的屬性進行了具體化的分類，比如可以分辨是考試科還是考察課，而且根據條件的選擇大大得提高了對各學期課程數據的記錄操作，很大得幫助了教工們工作效率的提高。</p><p><

19、b>　　4.成績信息管理</b></p><p>　　本模塊實現了成績的輸入、刪除、更新。還能查詢到平均成績以及單科最高最低成績以及個人成績。把成績統(tǒng)計這個繁瑣的工作簡單化，為學生成績的管理方面提高工作效率。</p><p><b>　　5.用戶信息管理</b></p><p>　　因為本系統(tǒng)是供多人一起使用的，必須對某一些人

20、進行限制。于是設置了管理員，非管理員只能進行查詢操作，不能進行更改。</p><p><b>　　3.2 模塊劃分</b></p><p>　　圖1-1系統(tǒng)功能模塊圖</p><p><b>　　登陸窗口</b></p><p>　　賬戶密碼：輸入正確的賬戶密碼才可以進入主窗口。</p>

21、<p><b>　　學籍管理</b></p><p>　　添加學生信息：根據程序所提供的信息填寫所需的信息，對數據庫中的信息進行添加。</p><p>　　修改學生信息：用戶可以對數據庫中的信息進行修改。</p><p>　　刪除學生信息：用戶可以對數據進行刪除操作。</p><p><b>　　

22、成績管理</b></p><p>　　學生成績查詢：根據學號查詢該生的成績.</p><p>　　學生成績添加：根據程序所提供的信息填寫所需的信息，對數據庫中的信息進行添加</p><p>　　學生成績修改：根據學號來修改數據庫中的信息。</p><p>　　學生成績刪除：根據學號來刪除數據庫中不需要的信息.</p>

23、<p><b>　　課程管理</b></p><p>　　課程查詢：可以按照課程號或者課程名來查詢所需的信息。</p><p>　　添加課程：根據程序所提供的信息填寫所需的信息，對數據庫中的信息進行添加。</p><p>　　修改課程：根據課程號或者課程名來修改數據庫中的信息。</p><p>　　刪除課程：

24、根據課程號或者課程名來刪除數據庫中的信息。</p><p><b>　　報表</b></p><p>　　報表：可以方便管理員制作出各種需要的表單。</p><p><b>　　4 數據庫設計</b></p><p>　　一個成功的信息管理系統(tǒng)，是建立在許多條件之上的，而數據庫是其中一個非常重要的條

25、件和關鍵技術。信息管理系統(tǒng)所涉及的數據庫設計分五個步驟：數據庫需求分析、概念設計、邏輯設計、物理設計與加載測試。數據庫需求分析的任務是將業(yè)務管理單證流化為數據流，劃分主題之間的邊界，繪制出DFD圖，并完成相應的數據字典。概念設計的任務是從DFD出發(fā)，繪制出本主題的實體－關系圖，并列出各個實體與關系的綱要表。邏輯設計的任務是從E-R圖與對應的綱要表出發(fā)，確定各個實體及關系的表名屬性物理設計的任務是確定所有屬性的類型、寬度與取值范圍，設計出

26、基本表的主鍵，將所有的表名與字段名英文化（現在很多軟件能支持中文字段，如MS SQL Server，我就是用的中文字段名），實現物理建庫，完成數據庫物理設計字典。加載測試工作貫穿于程序測試工作的全過程，整個錄入、修改、查詢、處理工作均可視為對數據庫的加載測試工作。</p><p>　　要設計出一個好的信息管理系統(tǒng)數據庫，除滿足系統(tǒng)所要求的功能外，還必須遵守下列原則：</p><p>　　基

27、本表的個數越少越好。</p><p>　　主鍵的個數越少越好。鍵是表間連接的工具，主鍵越少，表間的連接就 越簡單。</p><p>　　字段的個數越少越好。</p><p>　　所有基本表的設計均應盡量符合第三范式。</p><p>　　數據庫的設計中，如何處理多對多的關系和如何設計主鍵，是兩個有著較大難度、需要重點考慮的問題。下面我們

28、著重從SQL應用、數據庫設計范式和查詢優(yōu)化等方面來分析本課題的系統(tǒng)關鍵技術和實現難點并加以解決。</p><p>　　4.1數據庫系統(tǒng)設計及范式分析</p><p>　　信息系統(tǒng)的主要任務是通過大量的數據獲得管理所需要的信息，這就必須存儲和管理大量的數據。因此建立一個良好的數據組織結構和數據庫，使整個系統(tǒng)都可以迅速、方便、準確地調用和管理所需的數據，是衡量信息系統(tǒng)開發(fā)工作好壞的主要指標之一

29、。</p><p>　　4.1.1數據庫系統(tǒng)設計</p><p>　　數據庫設計主要是進行數據庫的邏輯設計，即將數據按一定的分類、分組系統(tǒng)和邏輯層次組織起來，是面向用戶的。數據庫設計時需要綜合企業(yè)各個部門的存檔數據和數據需求，分析各個數據之間的關系，按照DBMS提供的功能和描述工具，設計出規(guī)模適當、正確反映數據關系、數據冗余少、存取效率高、能滿足多種查詢要求的數據模型。</p>

30、<p>　　為了更好地組織數據和設計出實際應用數據庫，應該注意如下問題：</p><p>　　規(guī)范化地重組數據結構：對數據進行規(guī)范化表達，這在后面將會具體討論。</p><p>　　關系數據結構的建立：在進行了數據基本結構的規(guī)范化重組后，還必須建立整體數據的關系結構。這一步設計完成后數據庫和數據結構設計工作基本完成，只待系統(tǒng)實現時將數據分析和數據字典的內容代入到所設計的數據整

31、體關系結構中，一個規(guī)范化數據庫系統(tǒng)結構就建立起來了。 </p><p>　　建立關系數據結構涉及三方面內容：確定關聯的關鍵指標項并建立關聯表；確定單一的父系記錄結構；建立整個數據庫的關系結構。 </p><p>　　確定數據資源的安全保密屬性：</p><p>　　一般DBMS都提供給我們自己定義數據安全保密性的功能。系統(tǒng)所提供的安全保密功能一般有8個等級(0-7級

32、)，4種不同方式(只讀、只寫、刪除、修改)，而且允許用戶利用這8個等級的4種方式對每一個表自由地進行定義。 </p><p>　　4.1.2數據庫設計范式分析</p><p>　　建立起一個良好的數據指標體系，是建立數據結構和數據庫的最重要的一環(huán)。一個良好的數據指標體系是建立DB的必要條件，但不是充分條件。我們完全可以認為所建指標體系中的一個指標類就是關系數據庫中的一個基本表，而這個指標類

33、下面的一個個具體指標就是這個基本表中的一個字段。但如果直接按照這種方式建庫顯然還不能算最佳。對于指標體系中數據的結構在建庫前還必須進行規(guī)范化的重新組織。 </p><p>　　數據組織的規(guī)范化形式 </p><p>　　在數據的規(guī)范化表達中，一般將一組相互關聯的數據稱為一個關系(relation)，而在這個關系下的每個數據指標項則被稱為數據元素(data element)，這種關系落實到具

34、體數據庫上就是基本表，而數據元素就是基本表中的一個字段(field)。規(guī)范化表達還規(guī)定在每一個基本表中必須定義一個數據元素為關鍵字(key)，它可以唯一地標識出該表中其它相關的數據元素 </p><p>　　在對表的形式進行了規(guī)范化定義后，數據結構還有五種規(guī)范化定義，定名為規(guī)范化模式，稱為范式。在這五種范式中，一般只用前三種，對于常用系統(tǒng)就足夠了。而且這五種范式是“向上兼容”的，即滿足第五范式的數據結構自動滿足一

35、、二、三、四范式，滿足第四范式的數據結構自動滿足第一、二、三范式，……，依此類推。</p><p>　　4.2SQL語言介紹</p><p>　　4.2.1SQL基礎</p><p>　　SQL(Structured Query Language，結構查詢語言)是一個功能強大的數據庫語言。SQL通常使用于數據庫的通訊。ANSI（美國國家標準學會）聲稱，SQL是關系數

36、據庫管理系統(tǒng)的標準語言。SQL語句通常用于完成一些數據庫的操作任務，比如在數據庫中更新數據，或者從數據庫中檢索數據。使用SQL的常見關系數據庫管理系統(tǒng)有：Oracle、 Sybase、 Microsoft SQL Server、 Access、 Ingres等等。雖然絕大多數的數據庫系統(tǒng)使用SQL，但是它們同樣有它們自立另外的專有擴展功能用于它們的系統(tǒng)。但是，標準的SQL命令，比如"Select"、 "In

37、sert"、 "Update"、 "Delete"、 "Create"和 "Drop"常常被用于完成絕大多數數據庫的操作。MS SQL Server 就是用的Transact- SQL。</p><p>　　SQL語言有著非常突出的優(yōu)點，主要是：</p><p><b>　　非過程化語言&l

38、t;/b></p><p><b>　　統(tǒng)一的語言</b></p><p>　　是所有關系數據庫的公共語言</p><p>　　非過程化語言：SQL是一個非過程化的語言，因為它一次處理一個記錄，對數據提供自動導航。SQL允許用戶在高層的數據結構上工作，而不對單個記錄進行操作，可操作記錄集，所有SQL 語句接受集合作為輸入，返回集合作為輸出

39、。SQL的集合特性允許一條SQL語句的結果作為另一條SQL語句的輸入。</p><p>　　SQL不要求用戶指定對數據的存放方法， 這種特性使用戶更易集中精力于要得到的結果；所有SQL語句使用查詢優(yōu)化器，它是RDBMS的一部分，由它決定對指定數據存取的最快速度的手段，查詢優(yōu)化器知道存在什么索引，在哪兒使用索引合適，而用戶則從不需要知道表是否有索引、有什么類型的索引。</p><p>　　統(tǒng)

40、一的語言：SQL可用于所有用戶的DB活動模型，包括系統(tǒng)管理員、數據庫管理員、 應用程序員、決策支持系統(tǒng)人員及許多其它類型的終端用戶。</p><p>　　SQL為許多任務提供了命令，其中包括：</p><p><b>　　查詢數據</b></p><p>　　在表中插入、修改和刪除記錄</p><p>　　建立、修改和刪

41、除數據對象</p><p>　　控制對數據和數據對象的存取</p><p>　　保證數據庫一致性和完整性</p><p>　　以前的數據庫管理系統(tǒng)為上述各類操作提供單獨的語言，而SQL 將全部任務統(tǒng)一在一種語言中。</p><p>　　所有關系數據庫的公共語言：由于所有主要的關系數據庫管理系統(tǒng)都支持SQL語言，用戶可將使用SQL的技能從一個R

42、DBMS(關系數據庫管理系統(tǒng))轉到另一個，所有用SQL編寫的程序都是可以移植的。</p><p>　　4.2.2SQL語句</p><p>　　SQL功能強大，是一種完備的數據處理語言，不僅用于數據庫查詢，而且用于數據庫中的數據修改和更新，概括起來，它可以分成以下幾組：</p><p>　　DML（Data Manipulation Language，數據操作語言）

43、：用于檢索或者修改數據； </p><p>　　DDL（Data Definition Language，數據定義語言）： 用于定義數據的結構，比如 創(chuàng)建、修改或者刪除數據庫對象； </p><p>　　DCL（Data Control Language，數據控制語言）：用于定義數據庫用戶的權限。</p><p>　　DML組可以細分為以下的幾個語句：</p&

44、gt;<p>　　SELECT：用于檢索數據；</p><p>　　INSERT：用于增加數據到數據庫；</p><p>　　UPDATE：用于從數據庫中修改現存的數據；</p><p>　　DELETE：用于從數據庫中刪除數據。</p><p>　　DDL語句可以用于創(chuàng)建用戶和重建數據庫對象。下面是DDL命令：</p&g

45、t;<p>　　CREATE TABLE，ALTER TABLE，DROP TABLE，CREATE INDEX，DROP INDEX</p><p>　　4.3定義系統(tǒng)表的結構</p><p><b>　　定義賬戶表</b></p><p><b>　　表4.1</b></p><p&g

46、t;<b>　　定義學籍表</b></p><p><b>　　表4.2</b></p><p><b>　　定義成績表</b></p><p><b>　　表4.3</b></p><p><b>　　定義課程表</b></p

47、><p><b>　　4.4數據庫的實現</b></p><p>　　前面的需求分析和概念結構設計以后，得到數據庫的邏輯結構。就可以在SQL Server 2000數據庫系統(tǒng)中實現該邏輯結構，利用SQL Server 2000數據庫系統(tǒng)中SQL查詢分析器實現的。</p><p>　　(1)創(chuàng)建系統(tǒng)用戶表格user_info</p>&

48、lt;p>　　CREATE TABLE [dbo].[user_Info] (</p><p>　　[user_ID] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p>　　[user_PWD] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p&g

49、t;　　[user_Des] [char] (10) COLLATE Chinese_PRC_CI_AS NULL</p><p>　　) ON [PRIMARY]</p><p><b>　　GO</b></p><p>　　(2) 創(chuàng)建學生基本信息表格student_info</p><p>　　CREATE TAB

50、LE [dbo].[student_Info] (</p><p>　　[student_ID] [int] NOT NULL ,</p><p>　　[student_Name] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[student_Sex] [char] (2) COLLATE Chine

51、se_PRC_CI_AS NULL ,</p><p>　　[born_Date] [datetime] NULL ,</p><p>　　[class_NO] [int] NULL ,</p><p>　　[tele_Number] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　

52、　[ru_Date] [datetime] NULL ,</p><p>　　[address] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[comment] [varchar] (200) COLLATE Chinese_PRC_CI_AS NULL</p><p>　　) ON [PRIM

53、ARY]</p><p><b>　　GO</b></p><p>　　(3) 創(chuàng)建班級信息表格class-info</p><p>　　CREATE TABLE [dbo].[class_Info] (</p><p>　　[class_No] [int] NOT NULL ,</p><p>

54、　　[grade] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[director] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[classroom_No] [char] (10) COLLATE Chinese_PRC_CI_AS NULL</p&g

55、t;<p>　　) ON [PRIMARY]</p><p><b>　　GO</b></p><p>　　(4) 創(chuàng)建課程基本信息表格course-info</p><p>　　CREATE TABLE [dbo].[course_Info] (</p><p>　　[course_No] [int] N

56、OT NULL ,</p><p>　　[course_Name] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[course_Type] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[course_Des] [char] (50) C

57、OLLATE Chinese_PRC_CI_AS NULL</p><p>　　) ON [PRIMARY]</p><p><b>　　GO</b></p><p>　　(5)創(chuàng)建年級課程設置信息表gradecourse-info</p><p>　　CREATE TABLE [dbo].[gradecourse_In

58、fo] (</p><p>　　[grade] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[course_Name] [char] (10) COLLATE Chinese_PRC_CI_AS NULL</p><p>　　) ON [PRIMARY]</p><p><

59、;b>　　GO</b></p><p>　　(6) 創(chuàng)建學生成績信息表result-info</p><p>　　CREATE TABLE [dbo].[result_Info] (</p><p>　　[exam_No] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><

60、;p>　　[student_ID] [int] NOT NULL ,</p><p>　　[student_Name] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p>　　[class_No] [int] NULL ,</p><p>　　[course_Name] [char] (10) COLLAT

61、E Chinese_PRC_CI_AS NULL ,</p><p>　　[result] [float] NULL</p><p>　　) ON [PRIMARY]5 系統(tǒng)具體的實現</p><p><b>　　5.1 登錄系統(tǒng)</b></p><p>　　本界面的主要功能是為了對系統(tǒng)進行安全性管理，本系統(tǒng)的用戶名和密

62、碼保存在SQL Server表中，本系統(tǒng)根據不同的用戶而設置了不同的權限，可以用admin、admin為用戶名和密碼來登陸本系統(tǒng)。</p><p>　　主要功能：輸入用戶名和密碼實現系統(tǒng)的登陸。</p><p><b>　　部分代碼如下：</b></p><p>　　Dim sread As SqlDataReader</p>&

63、lt;p><b>　　Try</b></p><p>　　SqlConnection1.Open()</p><p>　　sread = SqlCommand1.ExecuteReader()</p><p>　　If sread.Read Then</p><p>　　If Trim(TextBox1.Text)

64、 = Trim(sread.Item(0)) And Trim(TextBox2.Text) = Trim(sread.Item(1)) Then</p><p><b>　　Me.Hide()</b></p><p>　　form2.Show()</p><p>　　TextBox2.Text = ""</p>

65、<p><b>　　Else</b></p><p>　　MsgBox("密碼錯誤！")</p><p>　　TextBox2.Text = ""</p><p>　　TextBox2.Focus()</p><p><b>　　End If</b&g

66、t;</p><p><b>　　Else</b></p><p>　　MsgBox("帳號錯誤！")</p><p>　　TextBox1.Text = ""</p><p>　　TextBox1.Focus()</p><p><b>　　En

67、d If</b></p><p>　　Catch ex As Exception</p><p>　　MsgBox(ex.Message)</p><p><b>　　Finally</b></p><p>　　SqlConnection1.Close()</p><p><b&

68、gt;　　End Try</b></p><p>　　5.2學生信息管理主窗口</p><p>　　主要功能：這是系統(tǒng)的主窗口，可以實現各種用戶想要實現的操作。</p><p><b>　　部分代碼如下：</b></p><p>　　Private Sub 添加課程ToolStripMenuItem_Clic

69、k(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 添加課程ToolStripMenuItem.Click</p><p>　　Dim frm4 As New Form4</p><p>　　Form4.Show()</p><p><b>　　End Sub</

70、b></p><p>　　Private Sub 查詢ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 查詢ToolStripMenuItem.Click</p><p>　　Dim frm3 As New Form3</p><p

71、>　　Form3.Show()</p><p><b>　　End Sub</b></p><p>　　Private Sub 修改課程ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 修改課程ToolStripMenuItem.

72、Click</p><p>　　Dim frm6 As New Form6</p><p>　　Form6.Show()</p><p><b>　　End Sub</b></p><p>　　Private Sub 課程查詢ToolStripMenuItem_Click(ByVal sender As System.O

73、bject, ByVal e As System.EventArgs) Handles 課程查詢ToolStripMenuItem.Click</p><p>　　Dim frm7 As New Form7</p><p>　　Form7.Show()</p><p><b>　　End Sub</b></p><p>

74、　　5.3 學籍管理窗口</p><p>　　主要功能：學籍管理界面，可以實現學生學籍的添加，刪除和查詢等操作。</p><p><b>　　部分代碼如下：</b></p><p>　　Dim strsql As String</p><p><b>　　Try</b></p><

75、;p><b>　　'打開連接</b></p><p>　　SCon.Open()</p><p>　　'如果表中已有此學號，退出過程</p><p>　　'將用戶的輸入組織成SQL語言字符串，注意&和單引號的使用</p><p>　　'對于字符型字段要加單引號</p&g

76、t;<p>　　strsql = "Delete 學生表 " & _</p><p>　　"Where 學號 =" & TextBox1.Text.Trim</p><p>　　'為CommandText設置查詢字符串</p><p>　　SCom.CommandText = strsq

77、l</p><p>　　'將sCom對象和sCon對象相關聯</p><p>　　SCom.Connection = SCon</p><p><b>　　'執(zhí)行操作查詢</b></p><p>　　SCom.ExecuteNonQuery()</p><p>　　MsgBox(&

78、quot;刪除成功?。?！")</p><p>　　Catch ex As Exception</p><p>　　MsgBox(ex.Message)</p><p><b>　　Finally</b></p><p><b>　　'關閉連接()</b></p>&l

79、t;p>　　SCon.Close()</p><p><b>　　End Try</b></p><p>　　TextBox1.Text = ""</p><p>　　ComboBox1.Text = ""</p><p><b>　　End Sub</b&g

80、t;</p><p>　　5.4 課程查詢窗口</p><p>　　主要功能：本窗口可以通過班級號和學期對課程情況進行查詢。</p><p><b>　　部分代碼如下：</b></p><p>　　If TextBox1.Text = "" Or ComboBox1.Text = "&quo

81、t; Then</p><p>　　MsgBox("查詢條件不能為空")</p><p><b>　　Else</b></p><p>　　queryCourseInfo()</p><p><b>　　End If</b></p><p><b&g

82、t;　　End Sub</b></p><p>　　Sub queryCourseInfo()</p><p>　　Dim str As String</p><p>　　Dim ds As New DataSet</p><p>　　Dim da As SqlClient.SqlDataAdapter</p>&l

83、t;p>　　str = "Data Source=(local);Initial Catalog=學生管理;Integrated Security=True"</p><p>　　Dim con As New SqlClient.SqlConnection(str)</p><p>　　con.Open()</p><p>　　Dim sq

84、l As String = "select * from 課程表 where 課程號=" & TextBox1.Text.ToString().Trim()</p><p>　　da = New SqlClient.SqlDataAdapter(sql, con)</p><p>　　da.Fill(ds)</p><p>　　DataG

85、rid1.DataSource = ds.Tables(0)</p><p>　　5.5 課程修改窗口</p><p>　　主要功能：通過課程號可以對課程的具體信息進行修改和刪除等操作。</p><p><b>　　部分代碼如下：</b></p><p>　　If TextBox1.Text = ""

86、 Then</p><p>　　MsgBox("課程號不能為空")</p><p><b>　　Else</b></p><p>　　changCourseInfo()</p><p>　　MsgBox("添加成功！！")</p><p><b>

87、　　clear()</b></p><p><b>　　End If</b></p><p><b>　　End Sub</b></p><p><b>　　b</b></p><p>　　Sub changCourseInfo()</p><p

88、>　　Dim str As String</p><p>　　str = "Data Source=(local);Initial Catalog=學生管理;Integrated Security=True"</p><p>　　Dim scon As New SqlClient.SqlConnection(str)</p><p>　　s

89、con.Open()</p><p>　　Dim sql As String = "select * from 課程表 where 課程號='" & TextBox1.Text.ToString().Trim() & "' "</p><p>　　Dim sql2 As String = "update 課程

90、表 set 課程名='" & TextBox2.Text.ToString().Trim() & "',course_Type='" & ComboBox1.Text.ToString.Trim() & "',course_Des='" & TextBox3.Text.ToString.Trim() &

91、; "' where course_No='" & TextBox1.Text.ToString().Trim() & "'"</p><p>　　Dim cmd As New SqlClient.SqlCommand(sql, scon)</p><p>　　Dim cmd2 As New SqlClien

92、t.SqlCommand(sql2, scon)</p><p>　　Dim reader As SqlClient.SqlDataReader</p><p>　　reader = cmd.ExecuteReader</p><p>　　5.6 添加課程窗口</p><p>　　主要功能：通過填寫課程信息實現課程的添加。</p>

93、<p><b>　　部分代碼如下：</b></p><p>　　If TextBox1.Text = "" Then</p><p>　　MsgBox("班級代號不能為空！")</p><p><b>　　Else</b></p><p>　　s

94、ingleYanzheng()</p><p><b>　　End If</b></p><p><b>　　End Sub</b></p><p>　　Sub clear()</p><p>　　TextBox1.Text = ""</p><p>　　

95、ComboBox1.Text = ""</p><p>　　TextBox3.Text = ""</p><p>　　ComboBox1.Text = ""</p><p><b>　　End Sub</b></p><p><b>　　5.7 成績管

96、理</b></p><p>　　主要功能：可以通過學號，姓名等關鍵字對學生成績信息進行查詢，添加和刪除等操作。</p><p><b>　　部分代碼如下：</b></p><p>　　Dim strsql As String</p><p><b>　　Try</b></p>

97、<p><b>　　'打開連接</b></p><p>　　SCon.Open()</p><p>　　'如果表中已有此學號，退出過程</p><p>　　'將用戶的輸入組織成SQL語言字符串，注意&和單引號的使用</p><p>　　'對于字符型字段要加單引號

98、 </p><p>　　strsql = "Insert Into 成績表" & _</p><p>　　"(學號,姓名,班級,多媒體,Web,[C++],數據庫)" & _</p><p>　　" values ('" & TextBox1.Text.

99、Trim & "','" & TextBox2.Text.Trim & "','" & TextBox3.Text.Trim & "','" & _</p><p>　　TextBox4.Text.Trim & "','&qu

100、ot; & TextBox5.Text.Trim & " ','" & TextBox6.Text.Trim & " ', '" & TextBox7.Text.Trim & " ')"</p><p>　　'為CommandText設置查詢字符串</p

101、><p>　　SCom.CommandText = strsql</p><p>　　'將sCom對象和sCon對象相關聯</p><p>　　SCom.Connection = SCon</p><p><b>　　'執(zhí)行操作查詢</b></p><p>　　SCom.Execute

102、NonQuery()</p><p>　　MsgBox("添加成功?。?！")</p><p>　　Catch ex As Exception</p><p>　　MsgBox(ex.Message)</p><p><b>　　Finally</b></p><p><b

103、>　　'關閉連接()</b></p><p>　　SCon.Close()</p><p><b>　　End Try</b></p><p><b>　　End Sub</b></p><p><b>　　5.8 報表</b></p>