【正文】 。 [8] 李曉黎 ,張巍 ,《 Visual Basic + SQL Server 數(shù)據(jù)庫應用系統(tǒng)開發(fā)與實例》 ,人民郵電出版社 。 [6] 張春葆 ,《 VB數(shù)據(jù)庫系統(tǒng)設計與開發(fā)》 ,清華大學出版社。 [4] 王漢新 ,《 Visual Basic 程序設計》 ,科學出版社 2021。 固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 28 謝 辭 固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 29 參考文獻 [1] 漢清計算機工作室 ,《 Visual Basic 數(shù)據(jù)庫開發(fā)實例 》 ,機械工業(yè)出版社 . [2] 何旭洪 ,《 Visual Basic 數(shù)據(jù)庫開發(fā)實例導航》 ,人民郵電出版社 2021。我相信通過這次設計，各個方面的能力都得到了鍛煉和提高，使我更有信心地去迎接明天，挑戰(zhàn)明天。要想減少它們之間的差距，我們必須要不斷的進行親身實踐并及時總結(jié)所有的經(jīng)驗，不論是錯誤的還是正確的，用這些經(jīng)驗來彌補和加強我們解決實際問題的能固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 27 力，形成經(jīng)驗理論，這些都是無法在大學的理論知識學習中學到的，需要我們在實際的工作中付出努力來豐富自己。當然最重要的是自己能有所收獲，每天 都在進步！這并不是拒絕和別人比較，而是對自己的激勵，讓自己量力而行，相信這會使我受益終身。在對 Visual Basic 不了解的情況下，要在短短的時間內(nèi)掌握這門語言并能熟練應用它對我來說還是很困難的。因此，想要很好地完成畢業(yè)設計，對我來說是一個巨大的挑戰(zhàn)，從最初拿到課題時的茫然到現(xiàn)在能將它完成，這其中經(jīng)歷的酸甜苦辣只有我感受真切。 與畢業(yè)設計結(jié)果相比，設計的過程更使我受益匪淺，因為畢業(yè)設計本身就是要求我們把所學的理論知識融會貫通并加以應用的過程。因為經(jīng)驗不足，偷懶思想存在，開始并沒有嚴格按照軟件工程的要求為每一步工作留下詳細的文檔資料，因而開發(fā)初期有些不知所措，一切都很茫然，浪費了很多寶貴時間。但是由于自己初步接觸 Visual Basic，對程序設計語言和設備管理過程中的細節(jié)不夠熟悉，而且軟件開發(fā)經(jīng)驗不足等原因，設計中難免會存在許多不盡人意的地方，有待進一步的提高和完善。 以上各界面的實現(xiàn)代碼見“源代碼” 附錄 。設置全局變量時最容易的 LoginSucceeded = True Else MsgBox 無效的密碼，請重試 !, , 登錄 SendKeys {Home}+{End} End If Set rsPwd = Nothing End Sub 固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 22 用戶名為空時，效果如下： 密碼為空時，效果如下： 圖 48 圖 49 用戶名不正確時，效果如下： 密碼不正確時，效果如下： 圖 410 圖 411 主界面的設計與實現(xiàn) 主窗口界面主要是完成系統(tǒng)功能模塊的劃分，按照用戶權限的不同各有不同。將代碼放在這里傳遞 39。 39。39。 Replace(strLogin, 39。不提示失敗的登錄 LoginSucceeded = False End Sub Private Sub cmdOK_Click() Dim strPwd As String Dim rsPwd As Dim strLogin As String strLogin = Trim() strPwd = Trim() If Len(strLogin) = 0 Then MsgBox 用戶名不能為空 ,請輸入用戶名 固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 21 Exit Sub End If If Len(strPwd) = 0 Then MsgBox 密碼不能為空 ,請輸入正確的密碼 Exit Sub End If Set rsPwd = (SELECT pwd FROM tblUser WHERE login=39。 標識需要的數(shù)據(jù)； 1． 數(shù)標識 需要的數(shù)據(jù)； 2． 收集被標識的字段到表中； 3． 標識主關鍵字字段； 4． 繪制一個簡單的數(shù)據(jù)圖表； 5． 規(guī)范數(shù)據(jù)； 6． 標識指定字段的信息； 數(shù)據(jù)庫表的設計 數(shù)據(jù)庫共包括五個數(shù)據(jù)表，分別為： tblDepartment 表、 tblDevice 表、 tblLend表、 tblTypeInfo 表、 tblUser 表，如下： 固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 17 圖 41 data表 1． tblDepartment 表記錄企業(yè)各部門信息，包括部門編號和部門名稱，如下： 圖 42 tblDepartment 表 固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 18 2． tblDevice 表記錄各資產(chǎn)設備信息，包括資產(chǎn)編號，資產(chǎn)名稱，資產(chǎn)類型，資產(chǎn)型號，資產(chǎn)購買價，資產(chǎn)折舊價，資產(chǎn)購買日期，資產(chǎn)借出日期，資產(chǎn)注銷日期等，具體表格如下： 圖 43 tblDevice 表 3． tblLend 表記錄各資產(chǎn)設備借入借出情況，包括資產(chǎn)編號， 借還操作，借出部門，借出日期，借出人等等，具體表格如下： 圖 44 tblLend 表 固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 19 4． tblTypeInfo 表記錄資產(chǎn)類型，包括資產(chǎn)設備類型編號和類型名稱，如下： 圖 45 tblTypeInfo 表 5． tblUser 表記錄用戶信息，包括用戶名，密碼，用戶類別，創(chuàng)建日期，具體表格如下： 圖 46 tblUser 表 登陸框 的設計與實現(xiàn) 簡單的登陸框設計能夠凸顯該系統(tǒng)的靈活方便性： 固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 20 圖 47 首頁界面圖 其設計代碼如下： Option Explicit Public LoginSucceeded As Boolean Private Sub cmdCancel_Click() 39。 數(shù)據(jù)庫 實現(xiàn) 創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細的規(guī)劃數(shù)據(jù)庫，設計必須是靈活的、有邏輯的。程序員不必擔心如何判斷事件是否已發(fā)生，只需要編寫一段代碼告訴計算機在事件發(fā)生以后應該做什么工作就可以了。 VB 的另一重要特點是事件驅(qū)動。系統(tǒng)引進了窗體和控件的機制，用于設計應用程序界面。至今以升級到了 版。因此在構建后臺數(shù)據(jù)庫時我采用了 ACESS 版數(shù)據(jù)庫系統(tǒng)軟件，用以支持固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 16 海量的數(shù)據(jù)存儲以及多功能的數(shù)據(jù) 查詢。 (2)操作系統(tǒng) :Microsoft Windows XP Personal 數(shù)據(jù)庫系統(tǒng) 運行電子商務需要處理大量的信息，而數(shù)據(jù)庫系統(tǒng)是管理大量信息的倉庫和引擎。 軟件環(huán)境 服務器端 (1)平臺軟件 平臺應該是建立易于開發(fā)、管理、擴充以及同開放標準兼容的 解決方案的基礎。因此在開發(fā)系統(tǒng)之前，根據(jù)對系統(tǒng)所采用的技術、實現(xiàn)功能的評估，在選擇開發(fā)環(huán)境時，主要考慮了以下幾 個因素 :擴展性、總體成本、功能、是否容易開發(fā)和管理。 用戶信息表用來保存不同用戶的信息，包括用戶名、密碼、用戶級別、創(chuàng)建日期等信息。 借入借出信息：用來保存設備的借入借出信息，包括分配編號、設備編號、操作、借出部門、借出日期、借出人等信息。 系統(tǒng)數(shù)據(jù)庫的概要設計 固定資產(chǎn)管理信息系統(tǒng) 的數(shù)據(jù)庫設計主要分成這幾個部分： 1．企業(yè)部門信息 (tblDepartment) 2．資產(chǎn)設備信息（ tblDevice） 3．借入借出信息 (tblLend) 4．資產(chǎn)分類信息 (tblTypeInfo) 5．用戶信息表（ tblUser） 企業(yè)部門信息：來記錄部門編號和部門名稱 。其使用權限如下： 系統(tǒng)管理員 （用戶名： admin；密碼： 111111） ? 用戶管理，系統(tǒng)管理 數(shù)據(jù)操作員 （用戶名： abc；密碼： abc） ? 設備管理，設備查詢，報表管理，系統(tǒng)管理 普通用戶 （用戶名： kangman；密碼： kangman） ? 設備查詢，報表管理，系統(tǒng)管理 固定資產(chǎn)管理信息系統(tǒng)設計與 實現(xiàn) 12 數(shù)據(jù)操作員頁面 用戶 管理 頁面 系統(tǒng)管理 頁面 設備查詢 頁面 設備管理 頁面 密碼修改 用戶管理信息 資產(chǎn)錄入管理 設備查詢信息 退出 系統(tǒng) 頁面 系統(tǒng)管理員頁面 修改管理員密碼頁面 普通用戶頁面 報表管理 頁面 報表管