【正文】 據(jù)統(tǒng)計(jì)管理 基本信息管理 系統(tǒng)用戶管理 分類(lèi)管理 部門(mén)管理 供應(yīng)商管理 領(lǐng)用管理 入庫(kù)管理 庫(kù)存管理 庫(kù)存短缺統(tǒng)計(jì) 入庫(kù)統(tǒng)計(jì) 領(lǐng)用統(tǒng)計(jì) 用戶信息管理 修改自身密碼 在本系統(tǒng)中，用戶管理模塊的功能比較簡(jiǎn)單，在系統(tǒng)初始化時(shí)，有兩個(gè)默認(rèn)的用戶。主要功能包括基本信息管 理、辦公用品管理和數(shù)據(jù)統(tǒng)計(jì)等，具體說(shuō)明如下： ? 基本信息的添加、修改、刪除和查詢。 資源上的可行性。 系統(tǒng)分析，就是在管理信息系統(tǒng)開(kāi)發(fā)的生命周期中系統(tǒng)分析階段的各項(xiàng)活動(dòng)和方法。利用 OLE技術(shù)，可以方便地建立復(fù)合式文檔 (pound document)，這種文檔由來(lái)自多個(gè)不同應(yīng)用程序的對(duì)象組成，文檔中的每個(gè)對(duì)象都與原來(lái)的應(yīng)用程序相聯(lián)系，并可執(zhí)行與原來(lái)應(yīng)用程序完全相同的操作。同時(shí)， Visual Basic還能直接編輯和訪問(wèn)其他外部數(shù)據(jù)庫(kù)，如 dBASE， FoxPro， Paradox等，這些數(shù)據(jù)庫(kù)格式都可以用 Visual Basic編輯和處理。 Visual Basic 是解釋型語(yǔ)言，在輸入代碼的同時(shí)，解釋系統(tǒng)將高級(jí)語(yǔ)言分解翻譯成計(jì)算機(jī)可以識(shí)別的機(jī)器指令，并判斷每個(gè)語(yǔ)句的語(yǔ)法錯(cuò)誤。只需要按設(shè)計(jì)要求的屏幕布局，用系統(tǒng)提供的工具，在屏幕上畫(huà)出各種“部件”，即圖形對(duì)象，并設(shè)置這些圖形對(duì)象的屬性。 作為數(shù)據(jù)庫(kù)系統(tǒng)的開(kāi)發(fā)， Visual Basic 是一個(gè)非常理想選擇。該方法大大提高了系統(tǒng)開(kāi)發(fā)效率，彌補(bǔ)了結(jié)構(gòu)化生命周期法開(kāi)發(fā)時(shí)間長(zhǎng)的缺陷。它的建立應(yīng)該服從使用單位的整體目標(biāo)和管理決策活動(dòng)的需要。例如，美國(guó) share航空預(yù)約訂票系統(tǒng)可掌握 1008 個(gè)預(yù)約點(diǎn)， 76000個(gè)座位和 27000個(gè)飛行記錄。 （ 3）數(shù)據(jù)安全，保安型高。數(shù)據(jù)庫(kù)系統(tǒng)是當(dāng)今計(jì)算機(jī)信息系統(tǒng)的核心 ,是計(jì)算機(jī)技術(shù)和應(yīng)用發(fā)展的關(guān)鍵。不僅如此，計(jì)算機(jī)還被廣泛的應(yīng)用到商業(yè)上，越來(lái)越多的人們意識(shí)到計(jì)算機(jī)給自己帶來(lái)的方便以及他所創(chuàng)造的巨大財(cái)富。因此，開(kāi)發(fā)一套符合本校具體情況的系學(xué)生成績(jī)管理軟件成為很有必 要的事情。 伴隨著計(jì)算機(jī)軟硬件技術(shù)的發(fā)展，計(jì)算機(jī)的技術(shù)和應(yīng)用獲得了突飛猛進(jìn)的發(fā)展，計(jì)算機(jī)已經(jīng)在大致如下的領(lǐng)域得到廣泛的應(yīng)用： 科學(xué)計(jì)算：如在天文學(xué)、生物學(xué)、空氣動(dòng)力學(xué)、核物理學(xué)、地質(zhì)勘探、新材料的研制和天氣預(yù)報(bào)等領(lǐng)域中。 摘要 辦公用品管理系統(tǒng)是辦公自動(dòng)化管理系統(tǒng)的重要組成部分，它可以對(duì)辦公用品的入庫(kù)和領(lǐng)用進(jìn)行規(guī)范化管理，進(jìn)而提高工作效率，避免資源的浪費(fèi)。 數(shù)據(jù)庫(kù)是一門(mén)研究數(shù)據(jù)管理的技術(shù)，始于 60年代，經(jīng)過(guò)幾十年的發(fā)展，已自成體系，成為計(jì)算機(jī)軟件的一個(gè)重要的分支。通過(guò)參與此系統(tǒng)的開(kāi)發(fā)，可以了解信息管理系統(tǒng)的需求分析、設(shè)計(jì)和實(shí)現(xiàn)的完整過(guò)程，掌握 ACCESS數(shù)據(jù)庫(kù)的基本管理方法、常用 SQL 語(yǔ)言的使用方法以及 VISUAL BASIC數(shù)據(jù)庫(kù)開(kāi)發(fā)技術(shù)，積累有效的數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)實(shí)戰(zhàn)經(jīng)驗(yàn)。系學(xué)生成績(jī)管理系統(tǒng)是一個(gè)現(xiàn)代高校管理不可缺少的一部分，它的內(nèi)容對(duì)高校實(shí)行高效化、智能化的管理非常重要，所以系學(xué)生成績(jī)管理系統(tǒng)應(yīng)該能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄?。本系統(tǒng)具有界面清晰、操作簡(jiǎn)易、存儲(chǔ)數(shù)據(jù)安全性高等特點(diǎn)，考慮到人們的一些操作習(xí)慣，提高了其的可操作性，完全能夠滿足你的需求。針對(duì)這些企業(yè)辦公用品管理存在的缺陷，我開(kāi)發(fā)了這個(gè)辦公用品管理系統(tǒng)，目的是要做到科學(xué)化、自動(dòng)化、 系統(tǒng)化、規(guī)范化，用電腦管理來(lái)替代原來(lái)以手工、簡(jiǎn)單、繁瑣的辦公用品管理，為廣大企、事業(yè)單位提高管理效益助一臂之力。以關(guān)系型為代表的三大經(jīng)典（層次、網(wǎng)狀、關(guān)系）型數(shù)據(jù)庫(kù)在傳統(tǒng)的（商務(wù)和管理的事務(wù)型）應(yīng)用領(lǐng)域獲得了極大成功。 （ 6）擴(kuò)充性和升級(jí)能力強(qiáng)。通常包括生產(chǎn)狀態(tài)報(bào)告系統(tǒng)、服務(wù)狀態(tài)報(bào)告系統(tǒng)、研究狀態(tài)報(bào)告系統(tǒng)。近 30多年來(lái)，軟件工程發(fā)展成為新科學(xué)，至今已經(jīng)成為 IT產(chǎn)業(yè)的重要支柱。因?yàn)?WINDOWS 操作系統(tǒng)是目前應(yīng)用最廣的操作系統(tǒng)，它以全新的圖形界面，簡(jiǎn)單快捷的操作方式，支持多媒體功能等特點(diǎn)而成為軟件發(fā)展的流行趨勢(shì)，選用它作為開(kāi)發(fā)平臺(tái)，易于功能的擴(kuò)展和軟件升級(jí)。在 Visual Basic環(huán)境下，利用事件驅(qū)動(dòng)的編程機(jī)制、新穎易用的可視化設(shè)計(jì)工具，使用 Windows內(nèi)部的應(yīng)用程序接口 (API)函數(shù)，以及動(dòng)態(tài)鏈接庫(kù) (DLL)、動(dòng)態(tài)數(shù)據(jù)交換 (DDE)、對(duì)象的鏈接與嵌入 (OLE)、開(kāi)放式數(shù)據(jù)訪問(wèn) (ODBC)等技術(shù)，可以高效、快速地開(kāi)發(fā)出 Windows環(huán)境下功能強(qiáng)大、圖形界面豐富的應(yīng)用軟件系統(tǒng)。在一般的面向?qū)ο蟪绦蛟O(shè)計(jì)語(yǔ)言中，對(duì)象由程序代碼和數(shù)據(jù)組成，是抽象的概念；而 Visual Basic則是應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法 (OOP)，把程序和數(shù)據(jù)封裝起來(lái)作為一個(gè)對(duì)象，并為每個(gè)對(duì)象賦予應(yīng)有的屬性，使對(duì)象成為實(shí)在的東西。一個(gè)對(duì)象可能會(huì)產(chǎn)生多個(gè)事件，每個(gè)事件都可以通過(guò)一段程序來(lái)響應(yīng)。 動(dòng)態(tài)數(shù)據(jù)交換 (DDE) 利用動(dòng)態(tài)數(shù)據(jù)交換 (Dynamic Data Exchange)技術(shù)，可以把一種應(yīng)用程序中的數(shù)據(jù)動(dòng)態(tài)地鏈接到另一種應(yīng)用程序中，使兩種完全不同的應(yīng)用程序建立起一條動(dòng)態(tài)數(shù)據(jù)鏈路。此外，通過(guò)動(dòng)態(tài)鏈接庫(kù)，還可以調(diào)用 Windows應(yīng)用程序接口 (API)函數(shù)，實(shí)現(xiàn) SDK所具有的功能 第五章 系統(tǒng)分析 系統(tǒng)規(guī)劃，應(yīng)根據(jù)組織的目標(biāo)和發(fā)展戰(zhàn)略以及管理信息系統(tǒng)建設(shè)的客觀規(guī)律，并考慮到組織面臨的內(nèi)外部環(huán)境，科學(xué)地制定管理信息系統(tǒng)的發(fā)展戰(zhàn)略和總體方案，合理安排系統(tǒng)建設(shè)的進(jìn)程；它是管理信息系統(tǒng)（ MIS）生命周期的第一個(gè)階段，是 MIS 的概念形成時(shí)期，這一階段的主要目標(biāo)，就是制定出 MIS的長(zhǎng)期發(fā)展方案，決定 MIS在整個(gè)生命周期內(nèi)的發(fā)展方向、規(guī)模和發(fā)展進(jìn)程。 可行性分析 可行性分析是系統(tǒng)分析階段的第二項(xiàng)活動(dòng)，可行性分析能使新系統(tǒng)達(dá)到 以最小的開(kāi)發(fā)成本取得最佳的經(jīng)濟(jì)效益。因此有必要對(duì)企業(yè)的設(shè)備管理方式進(jìn)行改造 ,采用高科技的計(jì)算機(jī)自動(dòng)化管理技術(shù)來(lái)進(jìn)行企業(yè) 辦公用品 的管理 .而從以上四點(diǎn)進(jìn)行分析 ,是可行的 . 今天我們使用計(jì)算機(jī)對(duì) 學(xué)生成績(jī) 信息進(jìn)行管理，具有手工管理所無(wú)法比擬的優(yōu)點(diǎn)。辦公用品信息包括領(lǐng)用信息、入庫(kù)信息和庫(kù)存信息。 用戶管理模塊的關(guān)系圖如下所示： Admin用戶 普通用戶 下面進(jìn)行系統(tǒng)流程分析，所謂系統(tǒng)流程就是用戶在使用系統(tǒng)時(shí)的工作過(guò)程?；拘畔ǚ诸?lèi)信息、部門(mén)信息和供應(yīng)商信息等。庫(kù)存信息包括辦公用品名稱、型號(hào)、當(dāng)前庫(kù)存數(shù)量、最小庫(kù)存數(shù)量等信息。 本系統(tǒng)數(shù)據(jù)庫(kù)文件為“ ” , 數(shù)據(jù)庫(kù)中 包含 8個(gè)表 ,部門(mén)信息表 Department、分類(lèi)信息表 Types、供應(yīng)商信息表 Supplier 、庫(kù)存信息表 Store 、入庫(kù)信息表 StoreIn、領(lǐng)用信息表 Draw、領(lǐng)用信息明細(xì)表 DrawList、用戶 信息表 Users 1. 部門(mén)信息表 Department 表 Department用來(lái)保存部門(mén)信息信息，結(jié)構(gòu)如下： 管理自己的用戶信息 用戶登錄 開(kāi) 始 讀取用戶類(lèi)型 成功 失敗超過(guò) 3 次 是 退出 程序 ① 管理自己的用戶信息 ② 管理普通用戶的用戶信息 失敗 用戶管理模塊 辦公用品管理模塊 基本信息管理 辦公用品管理 數(shù)據(jù)統(tǒng)計(jì)管理 普通用戶 Admin 用戶 重試 否 Department DepId DepName 1 技術(shù)中心 2 銷(xiāo)售中心 3 辦公室 4 人力資源部 2. 分類(lèi)信息表 Types 表 Types用來(lái)保存辦公用品分類(lèi)信息 Types TypeId TypeName UpperId 1 公文包 0 2 簽字筆 0 3 打印紙 0 4 A4 紙 3 5 A3 紙 3 6 帕克簽字筆 2 7 軟牛皮包 1 8 計(jì)算器 0 9 膠水 0 10 大膠水 9 11 剪刀 0 12 日歷 0 14 小規(guī)格 12 15 中規(guī)格 12 16 普通簽字筆 2 3. 供應(yīng)商信息表 Supplier 表 Supplier用來(lái)保存辦公用品的供應(yīng)商信息，結(jié)構(gòu)： Supplier SId SName Tel Address Contact Memos 1 北京七七貿(mào)易公司 3333 亮馬河 往昔 2 寧夏網(wǎng)和技術(shù)公司 55555 寧夏 王明 4. 庫(kù)存信息表 Store 表 Store用來(lái)保存辦公用品的庫(kù)存信息，結(jié)構(gòu)： Store OId OName OStyle TypeId OAmount OMin Memos 1 999 kkk 7 99 20 Store OId OName OStyle TypeId OAmount OMin Memos 2 帕克簽字筆 B1 6 9 5 3 dayinzhi A4 4 30 10 5. 入庫(kù)信息表 StoreIn 表 StoreIn用來(lái)保存辦公用品的入庫(kù)信息 StoreIn InId OId InDate SId InAmount InSum Memos Flag 1 1 202034 1 10 200 1 2 2 202044 1 8 30 30 1 3 2 202032 1 20 200 1 4 1 202037 2 80 900 1 5 1 202039 2 6 60 df 1 6 2 202037 2 1 2 1 6. 領(lǐng)用信息表 Draw 表 Draw用來(lái)保存辦公用品的領(lǐng)用信息，結(jié)構(gòu) Draw Id CreateDate DepId Flag 1 20201227 1 1 3 202023 2 1 4 202037 3 1 7. 領(lǐng)用信息明細(xì)表 DrawList 表 DrawList用來(lái)保存家庭成員信息，結(jié)構(gòu) DrawList Id DId OId OAmount 2 1 1 1 3 1 2 1 5 3 2 2 6 4 1 2 7 3 1 3 8. 用戶信息表 Users 表 Users用來(lái)保存系統(tǒng)用戶信息，結(jié)構(gòu) Users UserName UsePwd Admin 111111 Users 111111 登錄窗體和系統(tǒng)主界面設(shè)計(jì) 當(dāng)系統(tǒng)運(yùn)行時(shí)，首先打開(kāi)登錄窗體，只有有權(quán)限的用戶才能進(jìn)入系統(tǒng)。關(guān)閉登錄對(duì)話框 Unload Me End Sub 程序的運(yùn)行過(guò)程如下： ? 判斷是否輸入了用戶名和密碼，如果沒(méi)有輸入，則返回，要求用戶輸入。判斷當(dāng)前選擇按鈕值 If (0).Value = True Then 39。判斷是否選擇了一級(jí)分類(lèi) If 0 Then 39。判斷新的一級(jí)分類(lèi)名稱是否存在 If (Trim(txtName)) Then MsgBox 分類(lèi)名稱已存在 Exit Sub Else = Trim(txtName) (()) MsgBox 修改成功 LoadTypes txtName = End If End If Else 39。修改選項(xiàng)時(shí)，數(shù)據(jù)列表狀態(tài)更改 Private Sub Option1_Click(Index As Integer) If Index = 0 Then = True = False Else = False = True End If End Sub 設(shè)計(jì)部門(mén)管理窗體 部門(mén) 管理窗體名稱為 Frmdepman，窗體的布局如圖所示： 窗體中使用 datalist 控件顯示所有部門(mén)信息，使用 ADO Data 控件作為其提供數(shù)據(jù)源。% + Trim(txtName) + %39。設(shè)置一級(jí)分類(lèi) StrSearch = And = + Trim() End If If Len(Trim()) 0 Then 39。) AS 狀態(tài) , From Draw r,Department d Where = _ + StrSearch + Order By DESC Set = Adodc1 (0).Width = 0 (1).Width = 1600 (2).Width = 1400 (3).Width = 600 (4).Width = 0 End Sub Private Sub Cmd_Check_Click() If Then MsgBox 請(qǐng)選擇記錄