【正文】 會員繳費管理 該模塊的主要功能是實現(xiàn)對健身中心會 員的會費繳納的管理工作，包括會員會費瀏覽、會員會費查詢等功能。同時， Visual Basic 還能直接編輯和訪問其他外部數(shù)據(jù)庫，如 dBASE，F(xiàn)oxPro， Paradox 等，這些數(shù)據(jù)庫格式都可以用 Visual Basic 編輯和處理。只需要按設計要求的屏幕布局，用系統(tǒng)提供的工具，在屏幕上畫出各種“部件”，即圖形對象，并設置這些圖形對象的屬性。 系統(tǒng)及需求分析 系統(tǒng)需求 通過調查 ,要求系統(tǒng)需要有以下功能 : ⑴ 由于操作人員的計算機知識普遍較差 ,要求有良好的人機界面 。 本文介紹了在 Visual 環(huán)境下采用“自上而下地總體規(guī)劃，自下而上地應用開發(fā)”的策略開發(fā)一個管理信息系統(tǒng)的過程。制定工作計劃，研究投資策略，都離不開對信息的充分利用。在 Visual Basic 環(huán)境下，利用事件驅動的編程機制、新穎易用的可視化設計工具，使用 Windows 內部的應用程序接口 (API)函數(shù)，以 及動態(tài)鏈接庫 (DLL)、動態(tài)數(shù)據(jù) 交換 (DDE)、對象的鏈接與嵌入 (OLE)、開放式數(shù)據(jù)訪問 (ODBC)等技術，可以高效、快速地開發(fā)出 Windows 環(huán)境下功能強大、圖形界面豐富的應用軟件系統(tǒng)。一個對象可能會產生多個事件，每個事件都可以通過一段程序來響應。此 外，通過動態(tài)鏈接庫，還可以調用 Windows 應用程序接口(API)函數(shù)，實現(xiàn) SDK 所具有的功能。 3． 2 數(shù)據(jù)庫設計 數(shù)據(jù)庫采用了 Microsoft 推出的 Access 數(shù)據(jù)庫，這是微軟集成到 Office 中的一個桌面數(shù) 據(jù)庫，能 夠快速方便的和 Office 的其他套件綜合使用。 Trim() amp。 Set mrc = ExecuteSQL(txtsql) If = False Then MsgBox 已存在該用戶！ , vbExclamation + vbOKOnly, 警告 Text1(0).SetFocus Text1(0).SelStart = 0 Text1(0).SelLength = Len(Text1(0).Text) Exit Sub End If txtsql = select * from use Set mrc = ExecuteSQL(txtsql) (0) = Trim(Text1(0).Text) (1) = Trim(Text1(1).Text) For i = 0 To 2 If Option1(i).Value = True Then Select Case i Case 0 (admin) = y Case 1 (readonly) = y Case 2 For j = 0 To 3 If Check1(j).Value = 1 Then Select Case j Case 0 (qx1) = y Case 1 (qx2) = y Case 2 (qx3) = y Case 3 (qx4) = y End Select End If Next j End Select End If Next i MsgBox 用戶添加成功！ , vbExclamation + vbOKOnly, 警告 Text1(0).Text = Text1(1).Text = Text1(2).Text = End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() Option1(2).Value = True End Sub Private Sub Form_Resize() Text1(0).SetFocus End Sub Private Sub Option1_Click(Index As Integer) If Index 2 Then For i = 0 To 3 Check1(i).Enabled = False Next i Else For i = 0 To 3 Check1(i).Enabled = True Next i End If End Sub 4． 4 會員檔案管理模塊： 因為本系統(tǒng)中有些功能模塊具有相似之處，因此在本文只用此模塊進行一個簡單的說明。刪除在交費表中的所有該卡種的記錄 txtsql = delete * from cj where 卡號 in (select from xj where 卡種 =39。 數(shù)據(jù)維護主要是對數(shù)據(jù)的備份，存儲及統(tǒng)計，這 樣既保證了數(shù)據(jù)的安全又是數(shù)據(jù)更有條理性，方便相關人員使用。 一個新系統(tǒng)的開發(fā)并不是只建立在系統(tǒng)程序設計上，而更重要的是要體現(xiàn)在一個系統(tǒng)開發(fā)過程中管理上的系統(tǒng)性。他 認真負責的工作態(tài)度，嚴謹?shù)闹螌W精神和深厚的理論水平都使我收益匪淺。但所經歷的這次過程才是目的。 就系統(tǒng)管理評價而言，由于本系統(tǒng)，管理人員對健身中心會員的整體情況有了更深入地了解，其管理工作也就更具針對性與預見性 。一個 系統(tǒng)即便設計階段做得再好，運行起來效果不滿意，也無法體現(xiàn)新系統(tǒng)的優(yōu)勢。 amp。 Private Sub Command1_Click() If Trim(Text1(0).Text) = Then MsgBox 用戶名不能為空！ , vbExclamation + vbOKOnly, 警告 Text1(0).SetFocus Exit Sub End If If Trim(Text1(1).Text) = Then MsgBox 密碼不能為空！ , vbExclamation + vbOKOnly, 警告 Text1(1).SetFocus Exit Sub End If If Trim(Text1(2).Text) = Then MsgBox 確認密碼不能為空 ！ , vbExclamation + vbOKOnly, 警告 Text1(2).SetFocus Exit Sub End If If Trim(Text1(1).Text) Trim(Text1(2).Text) Then MsgBox 確認密碼不正確！ , vbExclamation + vbOKOnly, 警告 Text1(2).SetFocus Exit Sub End If Dim aa As Integer aa = 0 If Option1(2).Value = True Then For i = 0 To 3 If Check1(i).Value = 1 Then aa = 1 Exit For End If Next i If aa = 0 Then MsgBox 普通用戶至少要有一項權限！ , vbExclamation + vbOKOnly, 警告 Exit Sub End If End If Dim mrc As txtsql = select * from use where username=39。 Trim() amp。這幾個實體不是一個統(tǒng)一體。 OLE 技術是 Microsoft 公司對象技術的戰(zhàn)略，它把多個應用程序合為一體，將每個應用程序看做是一個對象進行鏈接和 嵌入，是一種應用程序一體化的技術。 Visual Basic 語句簡單易懂，其編輯器支持彩色代碼，可自動進行語法錯誤檢查，同時具有功能強大且使用靈活的調試器和編譯器。在技術難度方面，由于有指導老師的指導和相關參考文獻，特別是網上資料，特別是參考其它程序的功能，因此完全可以實現(xiàn)。如在查找情報資料、處理銀行帳目、倉庫管理、科研生產等方面，無不需要利用大量的信息資源。 健身中心會員管理系統(tǒng) （畢業(yè)設計） Summary With more and more widespread and profound application of information technology in management, the implement of management information system has bee mature in technology step by step. Managing information system is a new subject. Enterprise needs existence and development, so enterprise activities should be anized efficiently and anically, which means tightening up the enterprise management and strengthening effective management of any resource (staff, finance, property, etc.) internal the enterprise, and also establishing a management information system fitting in with its own characteristics. This article introduces the detailed process of exploring a management information system under the environment of visual FoxPro, utilizing “TopBottom” overall plan and a strategy according to “BottomTop” application and exploitation. That is to establish a set of effective scheme for student management by puter, through analyzing disadvantages of student management by human resources. This article emphasizes on three sections. The system analysis section of student management information includes feasible analysis, management function analysis. The system design section mainly focuses on system function design and data base design and data number design. And the system realization section has provided several major function , together with the main windows and programs. This economical and pragmatic system has explicit interface, with simple operation. [Ke ywords] ： MIS、 me mbe r manage me nt、 visual basic application 健身中心會員管理系統(tǒng) （畢業(yè)設計） 摘 要 ................................................... 1 Summary ................................................ II 第一 章 系統(tǒng)概述 .......................................... 5 系統(tǒng)及需求分析 ...............................................................................