【導(dǎo)讀】息系統(tǒng)的實(shí)施在技術(shù)上已逐步成熟。管理信息系統(tǒng)是一個(gè)不斷。通過分析某一健身中心的管理的不足，創(chuàng)建了一套。行之有效的計(jì)算機(jī)管理健身中心會(huì)員的方案。界面友好，操作簡(jiǎn)單，比較實(shí)用。管理信息系統(tǒng)、會(huì)員管理、VisualBasic應(yīng)用。

　　

【正文】 7 .ColAlignment(i) = 0 Next i .FillStyle = flexFillSingle .Col = 0 .Row = 0 .RowSel = 1 .ColSel = .Cols 1 .CellAlignment = 4 .Row = 1 End With End Sub Public Sub classshowdata() Dim j As Integer Dim i As Integer Dim mrc1 As Set mrc1 = ExecuteSQL(Trim(txtsql)) If = False Then With MSF1 .Rows = 1 Do While Not .Rows = .Rows + 1 For i = 1 To .TextMatrix(.Rows 1, i) = (i 1) Next i Loop End With Else If classfind = True Then zzz = MsgBox(對(duì)不起，沒有此會(huì)員的檔案記錄！ , vbOKOnly, 查詢 ) (0) (0).SetFocus End If End If End Sub Private Sub cmddel_Click() qxstr = Executeqx(2) If qxstr = readonly Then ss = MsgBox(對(duì)不起，你是只讀用戶不能刪除記錄，請(qǐng)與管理 員聯(lián)系！ , vbInformation + vbOKOnly, 警告 ) Exit Sub End If Dim mrc As Dim msgtext As String Dim intcount As Integer If Trim((, 1)) = Then sssss = MsgBox(你還沒有選擇記錄！ , vbOKOnly + vbExclamation, 警告 ) Exit Sub End If If MsgBox( 確 定 要 刪 除 會(huì) 員 為 amp。 Trim((, 2)) amp。 的記錄嗎？ amp。 Chr(13) amp。 Chr(10) amp。 繼續(xù)會(huì)導(dǎo)致該數(shù)據(jù)丟失，繼 續(xù)嗎？ , vbOKCancel + vbExclamation, 警告) = vbOK Then txtsql = delete * from xj where 班級(jí) =39。 amp。 Trim((, 2)) amp。 39。 Set mrc = ExecuteSQL(txtsql) txtsql = delete * from jf where 學(xué)號(hào) in (select from xj where 班級(jí) =39。 amp。 Trim((, 2)) amp。 39。) Set mrc = ExecuteSQL(txtsql) 39。刪除在交費(fèi)表中的所有該卡種的記錄 txtsql = delete * from cj where 卡號(hào) in (select from xj where 卡種 =39。 amp。 Trim((, 2)) amp。 39。) Set mrc = ExecuteSQL(txtsql) 39。刪除在成績(jī)表中的所有該班級(jí)的記錄 txtsql = delete * from class where 班級(jí) =39。 amp。 Trim((, 2)) amp。 39。 Set mrc = ExecuteSQL(txtsql) 39。刪除該班級(jí)的記錄 End If zxh = MsgBox(記錄成功刪除！ , vbOKOnly, 查詢 ) txtsql = select* from class classshowtitle classshowdata Call Form_Activate End Sub Private Sub cmdfind_Click() End Sub Private Sub cmdmodi_Click() If Trim((, 1)) = Then sssss = MsgBox(你還沒有選擇記錄！ , vbOKOnly + vbExclamation, 警告 ) Exit Sub Else qxstr = Executeqx(2) If qxstr = readonly Then ss = MsgBox(對(duì)不起，你是只讀用戶不能修改記錄，請(qǐng)與管理員聯(lián)系！ , vbInformation + vbOKOnly, 警告 ) Exit Sub End If classmodi = True 0 Call Form_Activate End If End Sub Private Sub cmdprint_Click() If Trim(printstr) = Then sssss = MsgBox(沒有當(dāng)前記錄！ , vbOKOnly + vbExclamation, 警告 ) Exit Sub End If If = adStateOpen Then End If printstr If = True Then sssss = MsgBox(沒有當(dāng)前記錄！ , vbOKOnly + vbExclamation, 警告 ) Exit Sub End If 1 End Sub Private Sub cmdprintall_Click() If = adStateOpen Then End If (select * from class) If = True Then sssss = MsgBox(沒有當(dāng)前記錄！ , vbOKOnly + vbExclamation, 警告 ) Exit Sub End If 1 End Sub 會(huì)員繳費(fèi)管理 第五章 系統(tǒng)運(yùn)行及評(píng)價(jià) 系統(tǒng)的運(yùn)行 一個(gè)新的信息系統(tǒng)建立起來以后，只有與企業(yè)的要求完全相符，與實(shí)際情況完全協(xié)調(diào)，才能充分發(fā)揮其作用，達(dá)到設(shè)計(jì)的最終目標(biāo)。而這一切只有在實(shí)際運(yùn)行過系統(tǒng)一段時(shí)間后才能得出結(jié)論。一個(gè) 系統(tǒng)即便設(shè)計(jì)階段做得再好，運(yùn)行起來效果不滿意，也無法體現(xiàn)新系統(tǒng)的優(yōu)勢(shì)。 當(dāng)然新建立的系統(tǒng)在設(shè)計(jì)階段必然會(huì)有一些沒有體現(xiàn)出來的缺陷與不足，而且隨著企業(yè)對(duì)系統(tǒng)要求的不斷改變，系統(tǒng)同樣會(huì)顯露出與現(xiàn)實(shí)的不適應(yīng)性，這些都是系統(tǒng)在運(yùn)行中所要解決的問題。 本系統(tǒng)還未經(jīng)受過長(zhǎng)時(shí)間的實(shí)際操作，在設(shè)計(jì)上還有一定的不足，希望經(jīng)過一定時(shí)間的運(yùn)行能使本系統(tǒng)的功能得到進(jìn)一步的改善，以使其能適應(yīng)不斷變化的外部環(huán)境。 在系統(tǒng)運(yùn)行中還應(yīng)注意對(duì)系統(tǒng)的維護(hù)，系統(tǒng)維護(hù)主要是對(duì)系統(tǒng)數(shù)據(jù)及運(yùn)行情況進(jìn)行維護(hù)。 數(shù)據(jù)維護(hù)主要是對(duì)數(shù)據(jù)的備份，存儲(chǔ)及統(tǒng)計(jì)，這 樣既保證了數(shù)據(jù)的安全又是數(shù)據(jù)更有條理性，方便相關(guān)人員使用。 運(yùn)行維護(hù)主要是保護(hù)系統(tǒng)的硬件運(yùn)行環(huán)境，避免一些不當(dāng)?shù)牟僮鳎乐雇饨缛绮《镜犬惓Ｇ闆r的干擾。對(duì)系統(tǒng)還應(yīng)定期進(jìn)行檢測(cè)。 運(yùn)用以上方法可使系統(tǒng)更安全、使用時(shí)間更長(zhǎng)，從而更有利于系統(tǒng)的實(shí)際使用效果。 系統(tǒng)的評(píng)價(jià) 系統(tǒng)運(yùn)行一段時(shí)間后就應(yīng)得出系統(tǒng)的評(píng)價(jià)，以指導(dǎo)系統(tǒng)的進(jìn)一步改進(jìn)。系統(tǒng)評(píng)價(jià)是指系統(tǒng)在正式運(yùn)行一段時(shí)間之后，對(duì)它在功能上、技術(shù)上和經(jīng)濟(jì)上所進(jìn)行的審核評(píng)價(jià)。進(jìn)行系統(tǒng)評(píng)價(jià)的目的是檢查系統(tǒng)是否達(dá)到預(yù)期的效果，了解系統(tǒng)的不足與優(yōu)勢(shì)，以為日后的進(jìn)一步改進(jìn)提 出意見。 系統(tǒng)評(píng)價(jià)包括系統(tǒng)性能評(píng)價(jià)、系統(tǒng)效益評(píng)價(jià)和系統(tǒng)管理評(píng)價(jià)。 就系統(tǒng)性能評(píng)價(jià)而言，本系統(tǒng)的功能體現(xiàn)了健身中心管理的基本工作，從根本上改善了管理人員的日常工作環(huán)境，提高了數(shù)據(jù)的安全性與可用性。更有利于各項(xiàng)工作的開展。 就系統(tǒng)效益評(píng)價(jià)而言，本系統(tǒng)的運(yùn)行提高了工作人員的工作效率，體現(xiàn)了數(shù)據(jù)的系統(tǒng)化管理優(yōu)勢(shì)、提高了數(shù)據(jù)處理的能力，使得健身中心會(huì)員管理更具系統(tǒng)性。這些都使得中心的效益有了很大的提升。 就系統(tǒng)管理評(píng)價(jià)而言，由于本系統(tǒng)，管理人員對(duì)健身中心會(huì)員的整體情況有了更深入地了解，其管理工作也就更具針對(duì)性與預(yù)見性 。這使健身中心日常管理工作更科學(xué)、更有效。 第六章 結(jié)束語 本系統(tǒng)是根據(jù)健身中心內(nèi)日常工作特性為基礎(chǔ)設(shè)計(jì)的，系統(tǒng)功能集會(huì)員卡管理，會(huì)員檔案管理，會(huì)員費(fèi)用管理和系統(tǒng)管理為一體，體現(xiàn)了一個(gè)健身中心內(nèi)日常工作的基本組成部分。本系統(tǒng)還建有完善的數(shù)據(jù)統(tǒng)計(jì)功能，以模塊的形式提供給系統(tǒng)從作者，形成統(tǒng)計(jì)表，供相關(guān)人員使用。 一個(gè)新系統(tǒng)的開發(fā)并不是只建立在系統(tǒng)程序設(shè)計(jì)上，而更重要的是要體現(xiàn)在一個(gè)系統(tǒng)開發(fā)過程中管理上的系統(tǒng)性。利用新系統(tǒng)代替舊系統(tǒng)是需要過程的，在這個(gè)過程中還需不斷完善系統(tǒng)，使系統(tǒng)更適應(yīng)現(xiàn)實(shí)情況。 在本系統(tǒng)的 開發(fā)過程中，由于本人是初次開發(fā)軟件，在知識(shí)、經(jīng)驗(yàn)方面都存在著不足。另外，在整個(gè)開發(fā)的過程中，時(shí)間也比較倉促。因此，該系統(tǒng)必然會(huì)存在一些缺陷和不足。因?yàn)閷?duì)學(xué)生管理的整個(gè)流程不夠熟悉，在需求分析時(shí)未能做到完全滿足用戶的需求。雖然網(wǎng)絡(luò)在學(xué)生管理系統(tǒng)中的應(yīng)用不是很多，但是未來的發(fā)展方向，在本次開發(fā)過程由于硬件的限制，未能實(shí)現(xiàn)網(wǎng)絡(luò)功能，因此在以后的系統(tǒng)更新過程中可能會(huì)造成一些不必要的數(shù)據(jù)損失。 盡管本管理系統(tǒng)存在著很多不足，但其功能全面、易于日后程序更新、數(shù)據(jù)庫管理容易、界面友好、操作方便、效率高、安全性好等優(yōu)點(diǎn)是本 管理系統(tǒng)所必需的。通過開發(fā)這個(gè)系統(tǒng)，我掌握了的項(xiàng)本過程，了解了的基本知識(shí)鞏固了我對(duì)Visual Basic 的學(xué)習(xí)，但在這次畢業(yè)設(shè)計(jì)中的最大收獲并不是掌握這幾門開發(fā)工具的應(yīng)用，而是學(xué)會(huì)了設(shè)計(jì)系統(tǒng)的思維方法，以及與同學(xué)們之間相互幫助的精神。 通過這次畢業(yè)設(shè)計(jì)體現(xiàn)了一次程序開發(fā)的完整過程。整個(gè)過程使四 年來所學(xué)到的知識(shí)得到了充分的運(yùn)用。雖然本系統(tǒng)設(shè)計(jì)的還很簡(jiǎn)單，報(bào)告制作的也很不完善與成熟。但所經(jīng)歷的這次過程才是目的。有了這次經(jīng)驗(yàn)，使我更有信心將所學(xué)到的知識(shí)運(yùn)用到實(shí)踐中去、更有信心迎接今后的挑戰(zhàn)。 致 謝 在論文即將完成之際，回顧緊張但又充實(shí)的學(xué)習(xí)班和開發(fā)過程，本人在此向所有關(guān)心我的及幫助我的老師和同學(xué)們致以最真誠的感謝。 在本次畢業(yè)設(shè)計(jì)中，我從指導(dǎo)老 師 XXX 老師， 身上學(xué)到了很多東西。他 認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我收益匪淺。他無論在理論上還是在實(shí)踐中，都給與我很大的幫助，使我得到 很大 的提高 ， 這對(duì)于我以 后 的工作和學(xué)習(xí)都有一種巨大的幫助， 在此 感謝他耐心的輔導(dǎo)。 在撰寫論文階段， XXX 老師幾次審閱我們的論文，提出了許多寶貴意見，沒有她的指導(dǎo)，我們就不能較好 的完成課題設(shè)計(jì)的任務(wù)。 另外， 我還要感謝在這幾年來對(duì)我有所教導(dǎo)的老師，他們孜孜不倦的教誨不但讓我學(xué)到了很多知識(shí)，而且讓我掌握了學(xué)習(xí) 的方法，更教會(huì)了我做人處事的道理，在此表示感謝。同時(shí)，在 系統(tǒng)開發(fā)過程中還有同組的同學(xué) 也 給 了 我不少幫助，這里一并表示感謝。 參考文獻(xiàn) [1] 周佩德 .《數(shù)據(jù)庫原理及應(yīng)用》 .電子工業(yè)出版社 [2] 劉炳文等， VISU