一、總體功能設計

學生選課系統是直接與學生進行選擇教學實驗課程有關的信息系統。系統信息的共享是通過一個統一的數據庫的存取來實現的。學生選課信息管理系統的主要功能如下。

1.用戶登錄模塊。這個系統包括用戶登錄、添加用戶、用戶密碼修改三部分。通過數據庫表登記合法用戶，在VB中訪問數據庫表來核對檢查用戶身份，通過定義不同的視圖有選擇地授予他們許可權，提高數據庫數據的安全性。

2.信息管理系統模塊。這個管理系統包括學生信息管理系統、教師信息管理系統、課程管理系統三個模塊?？梢酝瓿蓪W生信息、教師信息和課程信息的添加、修改、刪除功能。輸入學生、教師及課程的一些基本情況信息，輸入到計算機中就可以為所需要的地方讀取。

3.選課管理系統模塊。這個管理系統包括學生選課信息管理系統和教師選課信息管理系統兩個模塊，可以完成學生選課信息和教師選課信息的添加、修改、刪除功能。學院中的教師可以根據學校及教務處的安排制訂教學計劃，選擇任教課程。學生根據實驗課程及自身興趣通過下拉式列表框選擇課程，系統自動根據所選課程列出該課程的所有任課教師供學生選擇。

4.查詢系統模塊。這個系統包括學生信息查詢、教師信息查詢、學生選課信息查詢、教師選課信息查詢四個模塊，可以完成信息的查詢。學生、教師可以按照多種方式對整個選課系統中有關學生選課信息、教師選課信息的情況進行查詢。

5.打印模塊。對學生選課信息和教師選課信息的瀏覽和打印。

二、數據庫設計

學生選課系統的數據庫建立了Selectclass.sql庫文件，由6張表組成。

1.password（用戶登錄表）：用戶名、密碼、權限。

2.studentinfo（學生信息表）：學號、姓名、性別、出生日期、電話、地址、備注。

3.techerinfo（教師信息表）：教師號、教師名、職稱、電話、備注。

4.courseinfo（課程信息表）：課程號、課程名、學時、學分、備注。

5.choice（學生選課表）：學生選課編號、學號、姓名、課程號、課程名、教師編號、教師名、選課時間、備注。

6.courseteache（r教師選課表）：教師選課編號、教師號、教師名、課程號、課程名、備注。

三、系統界面設計

1.用戶登錄界面。進入系統前，需要進行身份驗證，通過此窗口輸入個人信息以驗證身份。

2.主界面是將系統提供的各種操作集中呈現于此窗口中。主界面的菜單項：系統功能模塊的調用是通過主界面上的菜單實現的。

3.學生基本信息界面。提供對學生基本信息的添加、修改、刪除功能。

4.學生選課信息界面。對學生選課信息進行管理，選擇課程后，自動選擇該課程的任課教師。

5.學生基本信息查詢界面。對學生基本信息進行瀏覽、查詢，并可按照學生學號、姓名、出生日期、地址等信息進行查詢。

四、關鍵技術

1.使用ADO連接數據庫。數據庫的動態連接可以通過對象連接也可以通過控件連接。使用ADO對象訪問SQLSever數據庫，要在程序中直接聲明或新建ADO對象，然后調用ADO對象的屬性和方法即可。引入ADO對象：選擇菜單【工程】→【引用】命令，進入界面選擇“MicrosoftActiveXData Object2.7Library”；聲明并創建ADO對象：Private my-conn as new adodb.connection，Private myrecord as new adodb.recordset，Set myconn = New ADODB.Connection Myconn.con-nection="Provider=SQLOLEDB.1；PersistSecurity；Info=False；UserID=sa；InitialCatalog=selectclas；Data Source=LX24_013"，myconn.Open myconn.connection，Set myrecord = NewADODB.Recordset。使用A控件訪問數據庫主要設置Con-nectionstring屬性，在連接資源中選擇數據資源名稱，然后選擇相應數據源名即可訪問SQLServer數據庫。單擊【工程】→【部件】選項，在彈出的列表中選中（Microsoft ADO DataControl）添加Adodc控件到工具箱中；設置Adodc控件的Con-nectionstring屬性連接到相應的數據庫資源中。

2. 使用綁定控件錄入、修改、刪除記錄。錄入

recordset.addnew fildlist，values，myrecord.AddNewmyrecord.Fields（"學號"）=Text1.Text，myrecord.Fields（"姓名"）=Text2.Text，myrecord.Fields （"性別"）=Combo1.Text，myrecord.Up-date，myrecord.Close。修改。recordset.update fildlist，value，sql = "update studentinfo set 姓名='" & Text2.Text & "'，性別='" & Combo1.Text & "'，出生日期='" & Text6.Text & " '，電話='" & Text3.Text & "'，地址='" & Text4.Text & " '，備注='"& Text4.Text & " ' where學號='" & Text1.Text & " '"，my-conn.Execute sql。刪除。del = "delete from studentinfowhere 學號='" & Text1.Text &"'"，myconn.Execute del3.使用recordset對象檢索記錄。成功的數據庫應用都使用connection對象建立連接并使用recordset對象處理返回的數據，通過“協調”兩個對象的特定功能可以開發出幾乎可以執行任何數據處理任務的數據庫應用程序。例如執行數據庫的查詢操作 ：dim rs1 as new adodb.Recordset，setrs1=new adodb.recordset，txtSql="SELECT * FROM passwordWHERE 用戶名='"&Text1.Text &"'，rs1.Open txtSql，myconn，adOpenDynamic，adLockOptimistic，adCmdText

參考文獻：
[1]四維科技，趙斯思.VisualBasic數據庫編程技術與實例[M].北京：人民郵電出版社，2004.
[2]薩師煊，王珊.數據庫系統概論[M].北京：高等教育出版社，2006.