【導(dǎo)讀】購買設(shè)計QQ：382540551全套包括:開題報告,論文,源程序,源代碼,隨著電子計算機(jī)和通信技術(shù)的發(fā)展，人類已經(jīng)逐漸地進(jìn)入信息化社會。信息和材料、能源一。樣成為一種社會的基本生產(chǎn)資料，在人類的社會生產(chǎn)活動中發(fā)揮著重要的作用?？矗梢蕴岣吖ぷ餍?；對外來看，獲得競爭優(yōu)勢。管理信息系統(tǒng)的開發(fā)方法有生命周期法、原型法和面向?qū)ο蟮拈_發(fā)方法等。開始；原型法是20世紀(jì)80年代發(fā)展起來的，旨在改變生命周期法的缺點(diǎn)。以對象為基礎(chǔ)，對象是分析問題和解決問題的核心?；谝陨先N方法的特點(diǎn)和各自的優(yōu)缺點(diǎn)，的，而系統(tǒng)實(shí)現(xiàn)等步驟則采用了原型法和面對對象的方法。對于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全。而對于后者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。本系統(tǒng)主要完成對會員管理、會員查詢、社團(tuán)查詢、會費(fèi)查詢四個方面。由于系統(tǒng)數(shù)據(jù)的組成對存儲安全性要求較高，因此系統(tǒng)的開發(fā)工具選擇了。出適用于資料管理系統(tǒng)。

　　

【正文】 28 頁 用戶界面的實(shí)現(xiàn) (1) 歡迎使用窗體： 在運(yùn)行本窗體時 ,會在窗體中顯示出 :作者姓名 、 當(dāng)前系統(tǒng)的時間信息。當(dāng)管理員點(diǎn)擊“進(jìn)入”按鈕時，就會出現(xiàn)“登錄”窗體。 運(yùn)行狀態(tài)圖： [圖 3] (2) 登錄窗體： 當(dāng)用戶點(diǎn)擊歡迎窗體中的“進(jìn)入”按鈕時，就會自動進(jìn)入本窗體。 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 29 頁 [圖 4] 在本窗體中需要用戶填寫用戶登錄名、用戶 口令 在這個窗體中登錄的用戶會進(jìn)入整個系統(tǒng)中，添加、修改、刪除的功能，當(dāng)用戶 3次登錄都失敗時系統(tǒng)會自動關(guān)閉。 (3)主界面具體實(shí)現(xiàn)見下圖 [圖 5] (4)會員管理界面 可以對會員進(jìn)添加記錄，修改，保存，刷新，刪除，退出。 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 30 頁 [圖 6] (5)會員查詢界面 可以對會員進(jìn)行編號，姓名，班級的查詢。 [圖 7] (6)社團(tuán)和會費(fèi)查詢界面 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 31 頁 對社團(tuán)部和會費(fèi)進(jìn)行查詢，并附帶時間的顯示。 [圖 8] (7)管理員設(shè)置界面 可以對登陸的用戶進(jìn)行添加，修改，查詢的設(shè)置。 [圖 9] (8)社團(tuán)設(shè)置界面 用來新增加社團(tuán)記錄進(jìn)行保存和刪除的功能 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 32 頁 [圖 10] 系統(tǒng)有關(guān) 主要為便用軟件用戶介紹此系統(tǒng)的一些個基本信息以及開發(fā)背景！ 系統(tǒng)幫助 主要提供給用記一些個使作些軟件的基本操作方法。 系統(tǒng)退出 設(shè)計體會 經(jīng)過一個多月的設(shè)計和開發(fā)，大中專學(xué)生信息管理系統(tǒng)基本開發(fā)完畢。其功能基本符合用戶需求，能夠 實(shí)現(xiàn)學(xué)生基本信息的錄入、更新、刪除、基本功能，從而實(shí)現(xiàn)信息的管理。 對于數(shù)據(jù)的一致性的問題也通過程序進(jìn)行了有效的解決。但是由于畢業(yè)設(shè)計時間較短，所以該系統(tǒng)還有許多不盡如人意的地方，比如聯(lián)機(jī)文檔比較少，用戶界面不夠美觀，出錯處理不夠等多方面問題。購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 33 頁 這些都有待進(jìn)一步改善。 致謝在本次畢業(yè)設(shè)計中，我從指導(dǎo)老師 身上學(xué)到了很多東西。老師認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我收益匪淺。他無論在理論上還是在實(shí)踐中，都給與我很大的幫助，使我得到不少的提高這對于我以后的工作和學(xué)習(xí)都有一種巨大的幫助，感謝他耐心的輔導(dǎo)。另外，在系統(tǒng)開發(fā)過程中助手同學(xué)也給于我很大的幫助，幫助解決了不少的難點(diǎn)，使得系統(tǒng)能及時開發(fā)完成，還有同組的同學(xué)同樣給與我不少幫助，這里一并表示感謝。 參考文獻(xiàn) [1] Visual Basic 使用指南 作者 ： Bob Reselman , Richard Peasley , Wayne Pruchniak. 出版社：電子工業(yè)出版社 [2] Visual Basic+Access 數(shù)據(jù)庫應(yīng)用系統(tǒng)開發(fā)與實(shí)例 作者：啟明工作室 出版社：人民郵電出版社 [3] Visual Basic 中文版控件大全 作者 ： Microsoft 出版社 ； 電子工業(yè)出版社 程序源代碼 7． 1登陸界面的代碼： Private Sub Command1_Click() If Trim() = Trim() And Trim() = Trim() Then 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 34 頁 Unload Me Else For X = 1 To 1 If = True Then MsgBox 一切重頭開始 , 16, 會好起來的： = = = 1 Else If Trim() = Trim() And Trim() = Trim() Then 39。 39。 = Unload Me Else X = X 1 End If End If 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 35 頁 Next X End If = 小薇 End Sub Private Sub Command2_Click() 39。MsgBox 你可真聰明，這樣也能進(jìn)入系統(tǒng)？？？佩服 , 16, 我 服 你： 39。 Unload Me 39。End End Sub Private Sub Form_Load () = 小薇 End Sub 會員管理代碼 Private Sub Command1_Click() = True 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 36 頁 = True = True = True = True = True = True = True = True = True = True If = True Then If = True And = True Then MsgBox 您的數(shù)據(jù)庫中沒有記錄！ , 16, 出錯： Else If = 修改記錄 Then = 修改完畢 = False = False = False 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 37 頁 = False = 8220 = 300 = True = 修改記錄： Else If = Then MsgBox 姓名不能為空！ , 16, 出錯： Else For X = 11 To 13 If Len(Trim()) 200 Then MsgBox 太長 , 16, 出錯： Exit Sub End If Next X = 修改記錄 = True = True = True = True = 5728 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 38 頁 = 600 = 1500 = False = 數(shù)據(jù)輸入： End If End If End If End If End Sub Private Sub Command2_Click() If = True Then MsgBox 刷新成功！ , 16, 恭喜： Else End If MsgBox 刷新成功！ , 16, 恭喜： End Sub Private Sub Command5_Click() 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 39 頁 = True = True = True = True = True = True = True = True = True = True = True If = Or = Then MsgBox 編號或姓名不能為空！ , 16, 出錯： = = 男 Else 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 40 頁 MsgBox 開始添加信息！ , 64, 恭喜！ = False = False = False End If End Sub Private Sub Command6_Click() If = True And = True Then MsgBox 您的數(shù)據(jù)庫中沒有信息可以刪除！ , 16, 出錯！ Else MsgBox 您確定要刪除這條信息？ , 32, 出錯！ If = False Then Else MsgBox 您的數(shù)據(jù)庫中沒有信息可以刪除！ , 16, 出錯！ End If 購買設(shè)計 ： 382540551 全套包括 :開題報告 ,論文 ,源程序 ,源代碼 ,答辯 PPT,萬余套設(shè)計 ,歡迎咨詢選購 ,價格最低質(zhì)量最 好 共 70 頁 第 41 頁 End If End Sub Private Sub Command7_Click() If = Or = Then MsgBox 編號或姓名不能為空！ , 16,