vb學(xué)生公寓管理系統(tǒng)-論文(編輯修改稿)
2025-01-21 14:15 本頁面
【文章內(nèi)容簡介】 主要完成：用戶管理、公寓設(shè)置、數(shù)據(jù)備份、數(shù)據(jù)轉(zhuǎn)換、退出的功能。 運行圖如下 : 圖 系統(tǒng)設(shè)置運行圖 用戶管理 可以進(jìn)行管理人員的添加和修改以及刪除操作。添加人員可以分為兩類：普通用戶、管理員?？梢砸暡煌藛T而添加。管理員擁有所有權(quán)力，對整個系統(tǒng)的操作。普通用戶只有瀏覽、及一些簡單的添加操作權(quán)力。無用戶設(shè)置、公寓設(shè)置及記錄刪除等權(quán)力。 設(shè)置 分為三個主要的操作：公寓設(shè)置、寢室設(shè)置、班級設(shè)置。在這里可以添加學(xué)校所有的公寓、所有班級、每個公寓的所有寢室 ,也可以用此軟件管理一幢公寓。這樣操作起來會更簡單、操作一目了然。 這是一個數(shù)據(jù)管理軟件所必不可少的一部分，利用它可以及時的備份當(dāng)前的數(shù)據(jù)庫以及在出現(xiàn)故障后利用已保存的數(shù)據(jù)進(jìn)行恢復(fù)。 利用數(shù)據(jù)轉(zhuǎn)換將當(dāng)前數(shù)據(jù)庫中的表轉(zhuǎn)換成 Excel表格的形式，顯示更為直觀，可以進(jìn)行打印等操作。 公寓管理 主要完成：學(xué)生請假、學(xué)生違規(guī)、床位設(shè)置的功能。 運行圖如下 : 圖 公寓管理運行圖 主要是對學(xué)生請假記錄做一個添加。利用它可以把學(xué)生的基本的請假資料保存起來。 主要是對學(xué)生違規(guī)記錄做一個添加。利用它可以把學(xué)生的基本的違規(guī)資料保存起來。 通過床位設(shè)置可以簡單查看每個公寓每個寢室的床位使用情況以及床位剩余情況。還可以通過詳細(xì)查看，查看到某個公寓某個寢室住宿人員的人數(shù)，以及具體的住宿人員的名字。 衛(wèi)生檢查 主要完成：添加檢查記錄的功能。衛(wèi)生檢查可以對衛(wèi)生檢查的結(jié)果進(jìn)行記錄。這里的衛(wèi)生標(biāo)準(zhǔn)一共有五項可以填寫，在每一項里已經(jīng)基本設(shè)置了所不合標(biāo)準(zhǔn)的記錄，你可以在下拉列表框中進(jìn)行選擇即可，但是如果沒有你想輸入的記錄的話，也可以自己輸入。運行圖如下 : 圖 衛(wèi)生檢查運行圖 公寓資產(chǎn) 主要完成：添加新增物品的功能。可以對公寓資產(chǎn)的收入或其它物品的入庫進(jìn)行記錄。運行圖如下 : 圖 公寓資產(chǎn)運行圖 記錄查看與記錄刪除 主要是對學(xué)生請假、學(xué)生違規(guī)、衛(wèi)生記錄，公寓資產(chǎn)等記錄所進(jìn)行的操作，利用這兩個功能 可以對任一記錄進(jìn)行查看與刪除。運行圖如下 : 圖 圖 VB 學(xué)生公寓管理系統(tǒng) 程序設(shè)計 主程序流程圖 登錄界面 此界面是由 Photoshop制作而成。在做這個登錄面的時候想了很多，最后選擇了這種，感覺它看起來干凈，整齊。又不失其莊雅。加上本單位最有特色的建筑，會讓人一目了然。 登錄圖片顯示 圖 登錄界面 界面制作與實現(xiàn) (1) 浮動按鈕的實現(xiàn) 確定和取消兩個按鈕在鼠標(biāo)沒有放上去之前看上去只是一個普通的平面字效果，但是當(dāng)你把鼠標(biāo)放在這幾個字上面后，它會顯示凸出的效果，按下后呈現(xiàn)凹陷的效果。總體實現(xiàn)立體的感覺。原理主要是在鼠標(biāo) mousemove事件與線的顏色變化組合來實現(xiàn)。主要代碼如下： 在窗體中的鼠標(biāo)移動過程中，以及在窗體初始化的時候，要把添加的線的 .Visible 屬性設(shè)置為 False，只有在鼠標(biāo)按下的時候在改變其顏色即可。 鼠標(biāo)按下的時候設(shè)置線條的顏色如下： Private Sub Label3_MouseDown(Button As Integer, Shift As Integer, x As Single, Y As Single) = amp。H808080 = amp。H808080 = amp。HE0E0E0 = amp。HE0E0E0 End Sub 鼠標(biāo)移動到標(biāo)簽的時候設(shè)置線條的顏色如下： Private Sub Label3_MouseMove(Button As Integer, Shift As Integer, x As Single, Y As Single) = amp。HE0E0E0 = amp。HE0E0E0 = amp。H808080 = amp。H808080 = True = True = True = True End Sub (2) 用 戶類型判斷 在數(shù)據(jù)庫中建了一人 yonghu 表。在添加管理人員時有兩種默認(rèn)級別。管理員、普通用戶。管理員擁有對數(shù)據(jù)庫操作的一切權(quán)限。普通用戶只有普通的查看，數(shù)據(jù)轉(zhuǎn)換等。沒有刪除等操作功能。前用戶成功登錄后，會在主窗體的狀態(tài)欄中顯示出當(dāng)前用戶及其用戶類型。 主要代碼如下： 設(shè)置當(dāng)前控件連接的數(shù)據(jù)庫 Dim provider As String Dim datasource As String provider = provider= datasource = data source= amp。 amp。 \ With Adodc1 .Mode = adModeReadWrite .ConnectionString = provider amp。 。 amp。 datasource .CommandType = adCmdTable .RecordSource = yonghu .Refresh . End With 對用戶進(jìn)行判斷 If = Then MsgBox 請輸入用戶名 !, 48, 提示 Exit Sub End If 用戶 =39。 amp。 amp。 39。 If = False And = Trim((pass)) Then = (級別 ) = (用戶 ) Unload Me Else = = MsgBox 登錄不成功 ,請重新登錄 !, 48, 提示 End If 程序主界面 程序主界面為本軟件的顯示的核心部分。一切主要操作及顯示都通過這里完成。整個界面主要由五部分組成。菜單部分、工具欄、左側(cè)操作欄、右側(cè)顯示欄以及狀態(tài)欄。 ①界面效果圖如下： 圖 程序主界面 工具欄主要是由 coolbar制作而成。由它制做的工具欄的顯示效果會更有立體感一些。這里只列出了幾個常用的按鈕。其中的添加按鈕是用來對公寓住宿人員進(jìn)行添加，修改也是對所住宿人員進(jìn)行修改，想要進(jìn)行修改時必須顯示所有記錄時才可以進(jìn)行。在這里值得一提的是刪除 DataGrid的操作，由于不知道它的當(dāng)前數(shù)據(jù)源是哪個，所以在刪除前要確定它的數(shù)據(jù)源，也就是它所鏈接的 adodc1的數(shù)據(jù)源，或者是其它 ado 控件對它的數(shù)據(jù)源進(jìn)行重新綁定后的數(shù)據(jù)庫表，也有可能是經(jīng)過一個查詢后得到的記錄。 ②它的實現(xiàn)方法如下所示： Dim o As Adodc Set o = Select Case Case 1 1 Case 3 1 Case 5 On Error GoTo next2 Dim s As Adodc Set s = If = users Then 1 End If next2: Case 7 On Error Resume Next Dim o As Adodc Set o =
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1