本系統主要用於學校的學生成績管理。
1. 使用者身份的驗證
2. 學生基本資訊管理
3. 按班級選課
4. 學生成績的管理
本系統包括:標準模組、系統登入模組、主介面模組、系統管理模組、學生基本資訊管理模組、選課模組、成績管理模組。
1. 標準模組
定義公共變數和過程。
2. 系統登入模組
進行使用者身份的驗證。
3. 主介面模組
作為系統總介面,供使用者進行各項選擇。
4. 系統管理模組
使用者管理及系統退出。
5. 學生基本資訊管理模組
學生基本資訊的錄入和查詢。
6. 選課模組
為班級選課。
7. 成績管理模組
進行學生成績的錄入及查詢。
該資料庫由以下幾個表組成:
使用者表、學生基本資訊表、班級課程表、學生成績表。
包括使用者名稱、密碼、是否是超級使用者。
包括學號、姓名、**、位址、班級名稱、性別。
包括班級名稱、課程名稱。
包括學號、課程名稱、成績。
學生基本資訊表與班級課程表通過班級名稱字段相關聯,學生基本資訊表與學生成績表通過學號字段相關聯,班級課程表與學生成績表通過課程名稱字段相關聯。
用於定義全域性變數及過程。本系統定義了當前使用者名稱及使用者型別。
option explicit
public username as string
public usertype as boolean
進行使用者身份的驗證。特定的使用者才能登入到系統。
系統登入窗體的窗體型別為form,介面如下圖所示:
主要控制項屬性如下表所示:
● 公共定義
option explicit
dim count1 as integer
● 窗體裝載處理程式(load)
private sub form_load()
count1 = 0錯誤次數清零
end sub
● 取消按鈕(cmdcancel)處理程式(click)
private sub cmdcancel_click()
unload me系統退出
end sub
● 確定按鈕(cmdok)處理程式(click)
private sub cmdok_click()
dim s1 as string
dim password as string
on error resume next
if text1.text = "" then使用者名為空,則退出
msgbox ("使用者名稱不能為空,請重新輸入")
text1.setfocus
exit sub
end if
按輸入的使用者名稱進行查詢
s1 = "select * from 使用者表 where 使用者名稱='" & text1.text
adodc1.recordsource = s1
adodc1.refresh
if adodc1.recordset.eof = false then判斷查詢結果
username = adodc1.recordset.fields(0有該使用者名稱,即使用者名稱正確
password = adodc1.recordset.fields(1)
usertype = adodc1.recordset.fields(2)
if password = text2.text then判斷密碼是否正確
unload me密碼正確,關閉當前窗體
frmmain.show顯示主介面窗體
exit sub
else
msgbox ("密碼錯誤,請重新輸入密碼錯誤,提示
text2.setfocus
text2.text = ""
end if
else沒有該使用者名稱,即使用者名稱錯誤
msgbox "使用者名稱錯誤,請重新輸入"
text1.setfocus
text1.text = ""
text2.text = ""
end if
count1 = count1 + 1錯誤次數累計
if count1 >= 3 then
msgbox "錯誤超過3次,系統退出"
unload me
end if
end sub
作為系統總介面,供使用者進行各項選擇。
主介面模組窗體型別為mdiform,介面如下圖所示。
● 窗體變為活動窗體處理程式(mdiform-activate)
private sub mdiform_activate()
windowstate = 2窗體最大化狀態
statusbar1.panels(1).text = "使用者名稱: " & username 『在狀態列顯示使用者名稱、使用者型別
if usertype = true then
statusbar1.panels(2).text = "使用者型別: 管理員"
else
statusbar1.panels(2).text = "使用者型別: 普通使用者"
end if
if usertype = false then對普通使用者設某些選單項不可用
aa1.enabled = false
bb1.enabled = false
cc.enabled = false
dd1.enabled = false
*******1.buttons(1).enabled = false 『對普通使用者設工具欄的某些按鈕不可用
*******1.buttons(3).enabled = false
*******1.buttons(6).enabled = false
*******1.buttons(7).enabled = false
*******1.buttons(9).enabled = false
end if
end sub
● 定時器(timer1)處理程式(timer)
private sub timer1_timer()
statusbar1.panels(3).text = now在狀態列中顯示當前時間
end sub
● 工具欄(*******1)處理程式(buttonclick)
private sub *******1_buttonclick(byval button as ms***ctllib.button)
select case button.index
case 1
form11.show (1使用者管理
case 3
form21.show (1學生基本資訊維護
case 4
form22.show (1學生基本資訊查詢
case 6
form31.show (1課程新增
case 7
form32.show (1課程刪除
case 9
form41.show (1學生成績維護
case 10
form42.show (1學生成績查詢
case 12
unload me系統退出
end select
end sub
● 「使用者管理」選單項處理程式(aa1-click)
private sub aa1_click()
form11.show (1)
end sub
● 「退出」選單項處理程式(aa3-click)
private sub aa3_click()
unload me
end sub
● 「學生基本資訊維護」選單項處理程式(bb1-click)
private sub bb1_click()
form21.show (1)
end sub
● 「學生基本資訊查詢」選單項處理程式(bb2-click)
private sub bb2_click()
form22.show (1)
end sub
● 「課程新增」選單項處理程式(cc1-click)
private sub cc1_click()
form31.show (1)
end sub
● 「課程刪除」選單項處理程式(cc2-click)
資料庫課程設計學生成績管理
sql資料庫技術 課程設計 一 題目 學生成績管理 二 因為我做的是學生成績管理,所以資料庫中至少有個乙個表是來儲存學生的各課成績的。有了學生成績,得知道這個成績是哪個學生的,所以此表中也得有學生姓名,但是學生姓名肯定有重複的 所以得必須有個標誌來惟一標識乙個學生,所以得給每個學生乙個編號 學號 但...
學生成績管理系統資料庫課程設計
軟體課程設計2 報告 專業 電腦科學與技術 設計題目 學生成績管理系統 2014年4月 目錄1 需求分析 1 1.1 行業現狀 1 1.2 可行性分析 2 1.3 系統執行環境 3 1.4 系統功能模組圖 4 2 系統設計 5 2.1 系統流程圖 5 2.2 資料流圖 6 2.2.1 頂層資料流圖 ...
資料庫課程設計學生成績管理系統
課程設計報告 2012年1月3日 目錄一概述1 1.1目的與要求1 1.2設計環境1 二需求分析1 2.1 系統功能要求設計1 2.2 系統模組設計1 2.3 資料字典2 三概念模型設計4 四邏輯和物理結構設計4 4.1由系統e r圖轉化而得到的關係模式 5 4.2 確定關係模型的訪問方法5 4.3...