【文章內容簡介】 時間 是 考試地點 數(shù)字 是 “收費標準表”表的結構如表 所示。 13 表 “收費標準表”表結構 字段名稱 字段類型 允許為空 備注 編號 自動編號 否 關鍵字段 系別編號 文本 是 專業(yè)代號 文本 是 學費 數(shù)字 是 住宿費 數(shù)字 是 書費 數(shù)字 是 總計 數(shù)字 是 “收費單”表的結構如表 所示。 表 “收費單”表結構 字段名稱 字段類型 允許為空 備注 學號 數(shù)字 否 關鍵字段 系別編號 文本 是 專業(yè)代號 文本 是 學費 數(shù)字 是 住宿費 數(shù)字 是 書費 數(shù)字 是 總計 數(shù)字 是 別外還有一個關于系統(tǒng)用戶的數(shù)據(jù)庫，該數(shù)據(jù)庫中有一個“ yhxx”即“用戶信息”表。該表的表結構如表 所示。 表 “ yhxx” 表結構 字段名稱 字段類型 允許為空 備注 用戶名 文本 否 關鍵字段 密碼 文本 否 用戶類型 文本 否 14 4． 2 實現(xiàn)系統(tǒng)登陸功能模塊 對于數(shù)據(jù)庫管理系統(tǒng)，安全的重要性是不言而喻的。一個設計良好的安全機制能確保用戶的合法操作的簡單、容易，同時可以盡 量避免非法操作和意外破壞。數(shù)據(jù)庫的安全性以被訪問的數(shù)據(jù)庫的對象和訪問者為主要管理對象，用戶只有具有對某個對象的訪問權限才可以對該對象進行訪問。 4． 2． 1 實現(xiàn)用戶登陸功能 本系統(tǒng)【用戶登陸】窗體的運行結果如圖 所示。 圖 【用戶登陸】窗體 圖 【用戶注冊】窗體 在該窗本中輸入用戶名、密碼選擇用戶類型后，如果是合法的用戶則可以進入該系統(tǒng)，也可以進行新用戶的注冊以及密碼的修改。實現(xiàn)過程是在 VB 中添加如圖 所示的控件以及連接后臺 數(shù)據(jù)庫的 ADO 控件。 ADO 控件的屬性設置： Name ： ADO的名稱 Commandtype： ADO 的連接方式 adCmdText Connectionstring: Provider=。Data Source=F:\學生管理系統(tǒng) \。Persist Security Info=False Recordsource: select * from yhxx 以后各模塊中出現(xiàn)的 ADO 都采用相同的方法設置，后面將不再詳細紹介。 系統(tǒng)判斷該用戶輸 入的用戶名、密碼及用戶類型是否吻合，進而決定該用戶是否可以登陸到系統(tǒng)中。實現(xiàn)該功能的方法是【登陸】按鈕的“單擊”事件中添加如下代碼： Private Sub Command1_Click() = select * from yhxx where 用戶名 =39。 + + 39。And 密碼 15 = 39。 + + 39。and 用戶類型 =39。 + + 39。 If 0 Then Unload Me Else MsgBox 非法用戶 End If End Sub 4． 2． 2 實現(xiàn)用戶注冊功能 本系統(tǒng)中注意如果是新用戶沒有權限使用該系統(tǒng)中的任何功能，必需注冊成該系統(tǒng)的用戶才可以使用。 本例的【用戶注冊】窗體運行結果如圖 所示。 本窗體中可以添加新的用戶，輸入新的用戶名后，單擊后面的圖標，查看該用戶名是否已經(jīng)在存，如果存在，則該用戶名不能使用，如果不存在，則可以使用，輸入密 碼、確認密碼，選擇用戶類型后，單擊“提交”按鈕即添加了新的系統(tǒng)用戶。查看用戶名是否已啟用是在圖像的“單擊”事件中添加如下代碼： Private Sub Image5_Click() = select * from yhxx While Not If (用戶名 ) = Then MsgBox 該用戶名已存在，請重新輸入！ Exit Sub End If Wend MsgBox 可以啟用該用戶名 End Sub 本窗體的“提交”按鈕的功能是判斷輸兩次輸入的密碼是否相同，如果不相同，給出 16 相應的提示，如果相同，完成新用戶的增加。實現(xiàn)“提交”按鈕的功能是在“提交”按鈕的“單擊”事件中編寫如下代碼： Private Sub Command2_Click() = select * from yhxx If = Then (用戶名 ) = (密碼 ) = (用戶類型 ) = MsgBox 注冊成功 Else MsgBox 兩次密碼輸入不同！ End If Unload Me End Sub 本系統(tǒng)的“修改密碼”窗體設置與此窗體類似，在此不詳細介紹。 4． 3 實現(xiàn)學生信息維護模塊 在本系統(tǒng)中可以通過選擇主窗菜單中的各菜單項進入相應的功能模塊。 該模塊的主要功能是實現(xiàn)對學生的個人信息的管理工作，包括學生信息增加、學生信息查詢等功能，從而方便學校教務部門對學校的基本情況的快速查詢和了解。在主窗體中單擊“基礎維護 ”菜單選擇“學生信息維護”命令，可以打開“學生信息維護”窗體，該窗體的運行結果如圖 所示。 17 圖 學生信息維護模塊 該窗體中頂部工具欄上有新增、修改、刪除、保存和關閉 6 個按鈕，可以對“學生信息”進行設置，包括學生信息記錄的添加、修改、刪除、保存和搜索等功能。底部工具欄上有首記錄、上記錄、下記錄和尾記錄按鈕，可以對學生信息表中的記錄進行逐個瀏覽。將底部工具欄上的 Frame 中的學號、姓名、班級編號、性別、年級、民族、籍貫、政治面貌等文本框的 Locked 屬性設置為 True，將這幾個文本框進行鎖定，只有在 單擊“新增”或“修改”按鈕時，才將其進行解鎖，即將其 Locked 屬性設置為 False。 在該窗本中使用了一些新的控件，如 DaraGrid 控件、 ShockwaveFlash 控件、 Toolbar控件和 ImageList 控件。下面對以上各控件的屬性進行設置。 DaraGrid 控件： 將 DaraGrid 控件的 DataSource 屬性設置為： Adodc1 ShockwaveFlash 控件 : 將 ShockwaveFlash 控件的 Movie 屬性設置為： F:\學生管理系統(tǒng) \ico\ Toolbar 控件用于設置 工具欄上的新增、修改、刪除等按鈕， ImageList 控件用于設置這些按鈕上的圖標，在這里使用的都是 (*.ico)和（ *.bmp）圖標?，F(xiàn)實窗體頂部工具欄上的新增、修改、刪除、保存、關閉按鈕的功能，在窗體頂部工具欄的“單擊”事件中編寫代碼 (附在后面 )。 現(xiàn)實窗體底部工具欄上的首記錄、上記錄、下記錄和尾記錄按鈕的的功能，在窗體底部工具欄的“單擊”事件中編寫代碼 (附在后面 )。 在該模塊中輸入學號、姓名和年級信息可以查詢某學生的基本信息，如果該記錄不存在則會給出相應提示的信息，實現(xiàn)此功能是在“搜索”按鈕的“單擊”事 件中編寫如下代 18 碼： Private Sub Command6_Click() = select * from 學生信息 where 學號 =39。 + + 39。And 姓名 = 39。 + + 39。and 年級 =39。 + + 39。 If 0 Then Else MsgBox 該學生不存在或輸入錯誤！ End If End Sub 至此，“學生信息維護”功能模塊創(chuàng)建完成。 4． 4 實現(xiàn)班級信息維護模塊 該模塊的功能是實現(xiàn)對全校班級的管理工作，包括：增加班級、班級修改、班級查詢等班級信息的維護?！鞍嗉壭畔⒕S護”模塊的實現(xiàn)過程及方法與“學生信息維護”功能模塊的基本相同，在此不再詳細介紹。該模塊的運行結果如圖 所示。 圖 班級信息維護模塊 19 4． 5 實現(xiàn)課程信息維護模塊 該模塊對各個課程信息進行設置，包括對課程信息記錄的添加、修改、刪除、保存和搜索等功能。 “課程信息維護”模塊的實現(xiàn)過程及方法與“學生信息維護”功能模塊的相同，在此不再詳細介紹。該模塊的運行結果如圖 所示。 圖 4． 6 實現(xiàn)學生選課功能模塊 在主窗體中單擊“教學管理”菜單選擇“學生選課”命令，可以打開“學生選課”窗體，該窗體的運行結果如圖 所示。 圖 學生選課模塊 20 該窗體上有查詢、選課、刪除、顯示課表和關閉 5 個按鈕，可以實現(xiàn)的功能是對“學生選課”進行管理。具體操作是，首先在“學號”文本框中輸入學號并回車，系統(tǒng)自動把該生的姓名和所在班級顯示在窗體“姓名 ”和“班級編號”文本框中。系統(tǒng)顯示出對應的學生信息和該生已選擇的課程；實現(xiàn)方法是在“學號”文本框“ LostFocus”事件中添加如下代碼： Private Sub Text1_LostFocus() = select * from [學生信息 ] where 學號 =39。 + + 39。 If 0 Then = (姓名 ) = (班級編號 ) Else MsgBox no record = = End If = select 選課表 .學號 ,選課表 .課程編號 ,選課表 .課程名稱 ,選課表 .課程簡稱 ,選課表 .拼音碼 ,選課表 .本學期課程 ,選課表 .教師 ,選課表 .開課系別 ,選課表 .學分 ,選課表 .上課時間天 ,選課表 .上課時間節(jié) ,選課表 .上課地點 from [選課表 ] where 學號 =39。 + + 39。 End Sub 在“課程信息”子窗體中的文本框中輸入課程的查詢條件，查詢希望選的課程，查詢結果顯示在下面的子窗本中，在下面的窗體中選擇待選擇的課程，然后單擊“選課”按鈕，系統(tǒng)首先判斷該課程是否為“本學期課程”，然后檢查該門課程是否已經(jīng)選擇，以及該課程序號的課程所有上課時間和已選擇課程的 上課時間是否沖突，如果都沒有問題就可以完成對該課程的選課操作。單擊“查詢”按鈕，系統(tǒng)自動根據(jù)“課程拼音”、“課程編號”和“課稱名稱” 3 個文本框的查詢條件進行查詢。實現(xiàn)的方法是在“查詢”按鈕的“單擊”