影院售票管理系統(tǒng)

1、【精品文檔】如有侵權(quán)，請聯(lián)系網(wǎng)站刪除，僅供學習與交流影院售票管理系統(tǒng).精品文檔.軟 件 工 程 課 程 設(shè) 計 題 目： 影院售票管理系統(tǒng) 姓 名： 張小磊 饒強 郭威威 夏彬彬 學 號： 專 業(yè)： 計算機科學與技術(shù)1班 指導老師： 完成時間： 2011.05 信 息 工 程 學 院 計算機 系摘要本文以影院售票系統(tǒng)的設(shè)計與開發(fā)為主題，運用vb和SQL server編寫的程序， 此系統(tǒng)是一個簡單的影院售票系統(tǒng)， 其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應(yīng)用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的數(shù)據(jù)庫。而對于后者則要求應(yīng)用程序功能完備，操作簡便，容易熟練掌

2、握等特點，用戶界面直觀,便于使用維護。關(guān)鍵字：影院，售票Abstract：In this paper, cinema ticketing system design and development of the theme, using vb and SQL server programs written, this theater system is a simple ticketing system, which mainly includes the establishment of database and front-end application maintenance and d

3、evelopment of the two.Request for the establishment of data consistency and integrity, data security database.For the latter applications require fully functional, simple, easy to master and so on, the user interface intuitive and easy to use and maintenance.Keyword: cinema, Ticketing目錄第一章 緒論4系統(tǒng)的開發(fā)背

4、景4現(xiàn)有系統(tǒng)存在問題的分析4系統(tǒng)開發(fā)的必要性5系統(tǒng)開發(fā)目標與意義5第二章 應(yīng)用技術(shù)理論6VB簡介6數(shù)據(jù)庫開發(fā)工具6第三章 需求分析7可行性分析7功能描述8數(shù)據(jù)字典8系統(tǒng)功能圖12對性能的規(guī)定13數(shù)據(jù)管理能力要求13故障處理要求14第四章 主要界面及功能14影院售票管理系統(tǒng)14小賣部管理18查詢統(tǒng)計20第五章 詳細設(shè)計23結(jié)構(gòu)程序設(shè)計23人機界面設(shè)計24第六章 功能實現(xiàn)26售票系統(tǒng)26小賣部系統(tǒng)32總結(jié)39參考文獻39第一章 緒論系統(tǒng)的開發(fā)背景當今時代是飛速發(fā)展的信息時代，在各行各業(yè)中離不開信息處理，這正是計算機被廣泛應(yīng)用于信息管理系統(tǒng)的環(huán)境。計算機的最大好處在于利用它能夠進行信息管理。使用計算

5、機進行信息控制，不僅提高了工作效率，而且大大的提高了其安全性。尤其對于復雜的信息管理，計算機能夠充分發(fā)揮它的優(yōu)越性。管理信息系統(tǒng)是進行信息的采集、存儲、加工、維護和使用的系統(tǒng)，它是隨著管理科學和技術(shù)科學的發(fā)展而形成的。影院售票管理系統(tǒng)是一個經(jīng)濟社會不可缺少的部分，它的內(nèi)容對于企業(yè)管理的決策者和管理者來說都至關(guān)重要,所以影院售票管理系統(tǒng)應(yīng)該能夠為用戶提供充足的信息和快捷的查詢手段，對用戶來說可以輕松的查閱自己消費信息等。但是一直以來人們都是靠傳統(tǒng)人工的方式管理影院售票，這種管理方式存在著許多缺點,如:效率低、保密性差,另外時間一長,將產(chǎn)生大量的文件和數(shù)據(jù),這對于查找、更新和維護都帶來了不少的困難

6、。隨著科學技術(shù)的不斷提高,計算機科學日漸成熟,其強大的功能已為人們深刻認識,它已進入人類社會的各個領(lǐng)域并發(fā)揮著越來越重要的作用。作為計算機應(yīng)用的一部分,使用計算機對影院售票管理進行管理,有著手工管理所無法比擬的優(yōu)點.例如:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些優(yōu)點能夠極大地提高影院售票管理的效率,也是企業(yè)的科學化、正規(guī)化管理,與世界接軌的重要條件。因此，開發(fā)這樣的一套影院售票管理系統(tǒng)成為很有必要的事情。影院售票管理系統(tǒng)提供了強大的管理功能，方便系統(tǒng)用戶使用?，F(xiàn)有系統(tǒng)存在問題的分析在完成了針對“影院售票系統(tǒng)”軟件市場的前期調(diào)查，同時與多位軟件使用者進行了全面深入

7、地探討和分析的基礎(chǔ)上，我們提出了“影院售票系統(tǒng)”軟件需求規(guī)格說明書。它全面細致的用戶需求分析，明確所要開發(fā)的軟件應(yīng)具有的功能、性能與界面，使系統(tǒng)分析人員及軟件開發(fā)人員能清楚地了解用戶的需求。 隨著時代的進步，在電影院中用人力售票越來越不能滿足人們的需求，不但花費了大量勞動力，而且浪費時間。再現(xiàn)如今社會，時間就是金錢，所以為了節(jié)省時間，我們開發(fā)了“影院售票管理系統(tǒng)”。系統(tǒng)開發(fā)的必要性在21世紀的科技時代，科學技術(shù)突飛猛進，計算機已經(jīng)不僅是在科技上應(yīng)用，而且在生活中也是同樣得到了廣泛在應(yīng)用。隨著時間的變化，影院規(guī)模的擴大，有關(guān)售票管理工作和所涉及到的數(shù)據(jù)量越來越大越來越多，大多數(shù)影院不得不靠增加人

8、力、物力、財力來進行售票管理。但是人工售票管理具有效率低、查找麻煩、可靠性不高、保密性低等因素。因此開發(fā)出一個適用于相當規(guī)模的影院售票管理系統(tǒng)是必要的。開發(fā)一個影院售票管理系統(tǒng)，采用計算機對影院售票進行管理，進一步提高了影院的效益和現(xiàn)代化水平。為廣大影院提高工作效率，實現(xiàn)影院售票工作流程的系統(tǒng)化、規(guī)范化和自動化。現(xiàn)在我國的很多影院的管理水平普遍都不是很高，有的還停留在全用紙介質(zhì)基礎(chǔ)上，這種管理方式已不能適應(yīng)時代的發(fā)展，社會的需求，因為它浪費了大量的人力物力，也存在著許多不足的因素。在今天信息時代這種傳統(tǒng)的管理方法必然會被計算機為基礎(chǔ)的信息管理系統(tǒng)所代替。一個高效的影院售票管理系統(tǒng)可以存儲很多影

9、院售票檔案，不需要大量的人力，只需要幾名專門錄入員即可操作系統(tǒng)，節(jié)省大量人力，可以迅速查到所需信息、高效、安全。系統(tǒng)開發(fā)目標與意義系統(tǒng)開發(fā)目標為了使系統(tǒng)在影院的管理中發(fā)揮更大的作用，實現(xiàn)工作過程的計算機化，提高工作效率和工作質(zhì)量，現(xiàn)提出如下的系統(tǒng)開發(fā)目標：1.系統(tǒng)應(yīng)具有實用性、可靠性和適用性，同時注意到先進性。2.對各個數(shù)據(jù)庫進行動態(tài)管理，防止混亂。3.能夠按照用戶選擇的不同的條件進行簡單查詢和復合查詢。4.能夠?qū)Σ樵兘Y(jié)果進行分類匯總，實現(xiàn)報表打印。5.注意數(shù)據(jù)的安全性，具有數(shù)據(jù)備份和恢復的功能。6.方便用戶的操作，盡量減少用戶的操作。意義影院售票管理是影院管理中異常重要的一個環(huán)節(jié)。計算機化是

10、整個影院管理中的重要一部分，能否實現(xiàn)這一步關(guān)系到影院售票整體效率的高低，介于它的重要性，影院售票管理系統(tǒng)的開發(fā)與應(yīng)用就逐漸提入議程，并占著越來越重要的份量。運用影院售票管理系統(tǒng)可以減輕影院售票管理人員的工作量，縮小開支，提高工作效率與準確率，能夠合理安排時間，能夠盡快的知道自己的影院信息。從大的方向說，就是為了加速我國四化建設(shè)的發(fā)展，實現(xiàn)全部的自動化，使我國發(fā)展成為通訊網(wǎng)絡(luò)化，決策科學化，辦公自動化的國家。在現(xiàn)代，高科技的飛躍發(fā)展，人們工作習慣的改變，特別是電腦的大量普及，人們生活節(jié)奏越來越快，怎樣提高工作效率是人們首先考慮的問題。影院售票管理系統(tǒng)是一個非常繁瑣與復雜的一項工作，一個原因就是工

11、作量大，不好管。第二章 應(yīng)用技術(shù)理論VB簡介VB是Visual Basic的簡稱，是由美國微軟公司于1991年開發(fā)的一種可視化的、 面向?qū)ο蠛筒捎檬录?qū)動方式的結(jié)構(gòu)化高級程序設(shè)計語言，可用于開發(fā) Windows 環(huán)境下的各類應(yīng)用程序。它簡單易學、效率高，且功能強大可以與 Windows 專業(yè)開發(fā)工具SDK相媲美。在Visual Basic環(huán)境下，利用事件驅(qū)動的編程機制、新穎易用的可視化設(shè)計工具，使用Windows內(nèi)部的廣泛應(yīng)用程序接口（API）函數(shù)，動態(tài)鏈接庫（DLL）、對象的鏈接與嵌入（OLE）、開放式數(shù)據(jù)連接（ODBC）等技術(shù)，可以高效、快速地開發(fā)Windows環(huán)境下功能強大、圖形界面豐富

12、的應(yīng)用軟件系統(tǒng)。數(shù)據(jù)庫開發(fā)工具SQL Server 是一個關(guān)系數(shù)據(jù)庫管理系統(tǒng)。它最初是由Microsoft Sybase 和Ashton-Tate三家公司共同開發(fā)的，于1988 年推出了第一個OS/2 版本。在Windows NT 推出后，Microsoft與Sybase 在SQL Server 的開發(fā)上就分道揚鑣了，Microsoft 將SQL Server 移植到Windows NT系統(tǒng)上，專注于開發(fā)推廣SQL Server 的Windows NT 版本。Sybase 則較專注于SQL Server在UNIX操作系統(tǒng)上的應(yīng)SQL Server安裝界面用。第三章 需求分析可行性分析可行性研究

13、的目的是用最小的代價在盡可能的時間內(nèi)確定問題是否能夠解決?？紤]到系統(tǒng)開發(fā)時間、資源等因素，在實際開發(fā)該計算機系統(tǒng)時，常常要為資源不足和交付日期難以完成而苦惱，因而需要慎重地盡可能早地估價研制課題的可行性。可行性研究包括：經(jīng)濟可行性、技術(shù)可行性、操作可行性、不同的方案等等。經(jīng)濟上可行性：現(xiàn)在，計算機的價格已經(jīng)十分低廉，性能卻有了長足的進步。而本系統(tǒng)的開發(fā)，為學校的工作效率帶來了一個質(zhì)的飛躍，為此主要表現(xiàn)有以下幾個方面：第一， 本系統(tǒng)的運行可以代替人工進行許多繁雜的勞動；第二， 本系統(tǒng)的運行可以節(jié)省許多資源；第三， 本系統(tǒng)的運行可以大大的提高學校的工作效率；第四， 本系統(tǒng)可以使敏感文檔更加安全，等

14、等。所以，本系統(tǒng)在經(jīng)濟上是可行的。技術(shù)上可行性：本系統(tǒng)的開發(fā)利用Microsoft SQL Server2000作為本系統(tǒng)的數(shù)據(jù)庫，它是一個支持多用戶的新型數(shù)據(jù)庫，適用于大中規(guī)模的數(shù)據(jù)量需求。學校校園網(wǎng)的建設(shè)也為新系統(tǒng)服務(wù)器/客戶端的結(jié)構(gòu)提供了硬件的支持。使用作為系統(tǒng)開發(fā)的開發(fā)環(huán)境，它提供完善的指令控制語句、類與對象的支持及豐富的數(shù)據(jù)類型，給開發(fā)高性能系統(tǒng)提供的保障為開發(fā)滿足客戶要求的系統(tǒng)，保證了代碼的模塊化要求，而代碼模塊化的提高，非常有利于以后對新系統(tǒng)的擴展與修改。綜上所述，本系統(tǒng)的設(shè)計與開發(fā)在技術(shù)上和硬件設(shè)備上的條件都是滿足的，因此，它在技術(shù)上是可行的。出走做可行性：本系統(tǒng)為一個小型的影

15、院售票管理系統(tǒng)，所耗費的資源非常的小，影院的電腦無論是硬件還是軟件都能夠滿足條件，界面設(shè)計時充分考慮管理人員的習慣，使得操作簡單；數(shù)據(jù)錄入迅速、規(guī)范、可靠；統(tǒng)計準確；制表靈活；適應(yīng)力強；容易擴充，因此，本系統(tǒng)在操作上是可行的。功能描述售票員：1.辦理會員及查詢、刪除、修改會員信息2.查找即將上映的影片信息和放映廳號3.查詢已賣票數(shù)和剩余票數(shù)和其對應(yīng)的座位4.售票小賣部管理員：1.增添、刪除、修改商品信息2.管理商品入庫 3.銷售商品數(shù)據(jù)字典、數(shù)據(jù)項售票系統(tǒng)數(shù)據(jù)項會員信息表，如表3.1所示，是描述會員的信息。會員卡號會員姓名性別聯(lián)系方式折扣率卡內(nèi)金額買票消費001張明男0.85100002張敏女

16、0.7120【表3.1】影票信息表，如表3.2所示，是描述影票的詳細信息。電影名稱上映日期上映時間放映廳票類票價戀愛通告2011.06.0118:00:00*Vip30關(guān)云長2011.06.0718:00:00*Vip30【表3.2】小賣部系統(tǒng)數(shù)據(jù)項商品信息表，如表3.3所示：商品編號商品名稱進價銷售價單位庫存量001康師傅方便面24袋100002爆米花24袋150【表3.3】、數(shù)據(jù)結(jié)構(gòu)售票系統(tǒng)數(shù)據(jù)結(jié)構(gòu)數(shù)據(jù)結(jié)構(gòu)名含義說明組成會員信息說明會員的有關(guān)信息會員卡號、會員姓名、省份證號、聯(lián)系方式、折扣率、初期金額、卡內(nèi)金額、充值總額、小賣部消費、買票消費影票信息說明影票的有關(guān)信息票類、票價、影院名稱、

17、圖示、電影名稱、放映廳、上映時間、狀態(tài)、上映日期小賣部系統(tǒng)數(shù)據(jù)結(jié)構(gòu)數(shù)據(jù)結(jié)構(gòu)名含義說明組成商品信息說明商品的有關(guān)信息商品編號、商品名稱、進價、銷售價、單位、入庫單號、入庫日期、數(shù)量、經(jīng)辦人、期初庫存、E-R圖 實體描述【會員】如圖3-1所示：會員小賣部消費會員卡號會員姓名身份證號聯(lián)系方式折扣率卡內(nèi)余額充值總額買票消費期初金額備注【圖3-1】【商品】如圖3-2所示：商品進價銷售價商品名稱單位期初庫存商品編號備注【圖3-2】【影票】如圖3-3所示：影票票類放映廳上映日期上映時間影片名稱票價【圖3-3】會員、商品等實體的E-R，如圖3-4所示：售票員銷售員買賣買影票會員賣商品1N1N1N1N【圖3-4

18、】系統(tǒng)功能圖進入界面：1. 售票員2. 銷售員系統(tǒng)選擇：啟動售票系統(tǒng)1顯示上映影片信息2.顯示播放廳及票價1. 添加、修改、刪除影片2. 設(shè)置播放廳及票價3. 清空無用數(shù)據(jù)是否會員顯示會員信息是否充值是否買票是否辦會員修改會員信息YNYN 售票管理系統(tǒng)功能圖，如圖3-5所示：【圖3-5】進入界面：1. 售票員2. 銷售員系統(tǒng)選擇：小賣部系統(tǒng)1.顯示商品信息2.顯示庫存明細是否購買更改庫存及會員信息會員1.添加、刪除、修改、查詢商品信息2.商品入庫3.商品盈利查詢YN 小賣部管理系統(tǒng)功能圖，如圖3-6所示：【圖3-6】對性能的規(guī)定 精度整型和double型 時間特性要求本軟件的規(guī)模不大，一般的機

19、器都能跑的起來，對電腦的性能要求很不高，一般pc機都可以順暢運行，能夠滿足絕大多數(shù)公司電腦配置的需求。數(shù)據(jù)管理能力要求 考慮到一個電影院它的規(guī)模是固定的，總體座位框架是不變的，座位的操作就采用二維數(shù)組來操作，然后將其操作結(jié)果存儲在某場電影的座位文件中。某場電影的信息就采用鏈表來處理，因為鏈表操作便于對其進行增、刪、改、查詢，可以將所有電影的信息存儲在一個電影信息文件中。故障處理要求 我們的這個系統(tǒng)它是采用實時更新文件的方法，電腦斷電或死機等，不會丟失當前的操作信息，可以解決電腦斷電后系統(tǒng)丟失已完成的操作問題，避免了客戶因意外事件丟失數(shù)據(jù)。第四章 主要界面及功能影院售票管理系統(tǒng)1.1選擇影院售票

20、管理系統(tǒng)，如圖4-1：【圖4-1】1.2節(jié)目設(shè)置，如圖4-2，在此節(jié)點設(shè)置放映節(jié)目的信息，方便創(chuàng)建場次時調(diào)用；其中導演、片類、語種、產(chǎn)地等字段值具有記憶功能，只需錄入一次，下次再使用時直接在下拉列表中選擇即可?！緢D4-2】1.3票價設(shè)置，如圖4-3，記錄不同票類的票價，方便售票時調(diào)用?！緢D4-3】功能操作說明：   在面板中點擊“票價設(shè)置”按鈕或雙擊表格界面打開錄入窗口。增加:點擊錄入窗口最下方工具欄的"增加"或者"+"按鈕，即可新增一條記錄，然后輸入票價，完成后點""號保存。   修改:點擊錄

21、入窗口工具欄上的""可以編輯一條現(xiàn)有的記錄，修改完點""保存。   刪除:點擊記錄移動按鈕,移動到要刪除的記錄上，單擊"-"按鈕，即可刪除當前記錄。狀態(tài)圖示設(shè)置（注：座位平面圖的圖示默認為只讀的，如果不適合可以調(diào)整的）1.4會員信息處理，如圖4-4:【圖4-4】功能操作說明：     在面板中點擊“會員信息”按鈕或雙擊表格界面打開錄入窗口。     增加:點擊錄入窗口最下方工具欄的"增加"或者"+"

22、;按鈕，即可新增一條記錄，然后輸入會員信息，完成后點""號保存。     修改:點擊錄入窗口工具欄上的""可以編輯一條現(xiàn)有的記錄，修改完點""保存。     刪除:點擊記錄移動按鈕,移動到要刪除的記錄上，單擊"-"按鈕，即可刪除當前記錄。 1.5會員充值，如圖4-5，其中充值單號系統(tǒng)自動生成，通過會員卡號調(diào)用會員信息中的數(shù)據(jù)；充后總額=充前總額+充值金額，系統(tǒng)自動計算；經(jīng)辦人默認填寫當前系統(tǒng)登錄者的名稱?！緢D4-5】在面板中點擊“會員充

23、值”按鈕，即可打開錄入窗口對會員充值進行增加、修改或刪除操作。  1.6設(shè)置影片上映，如下圖4-6：【圖4-6】在上圖中選擇對應(yīng)的上映日期、上映時間，然后點確定，進入如下窗口，如圖4-7?！緢D4-7】在上圖中選擇需要的座位（綠色底的表示未售、紅色底的表示已售、黃色底表示訂票），然后在右面操作，通過票類調(diào)用票價設(shè)置中的數(shù)據(jù)；也可以會員卡消費，默認是打折的，勾選掉是否打折，就是按票價從會員卡中扣除；將售票狀態(tài)改為已售，然后點對號保存，座位平面圖的顏色由綠色更新為紅色。 小賣部管理2.1選擇小賣部管理系統(tǒng)，如圖4-8：【圖4-8】2.2添加商品信息如圖4-9，其中商品編號不允許重復或者為空

24、；其它字段值根據(jù)實際情況填寫?！緢D4-9】功能操作說明：      在面板中點擊“商品信息”按鈕或雙擊表格界面打開錄入窗口。      增加:點擊錄入窗口最下方工具欄的"增加"或者"+"按鈕，即可新增一條記錄，然后輸入商品信息，完成后點""號保存。      修改:點擊錄入窗口工具欄上的""可以編輯一條現(xiàn)有的記錄，修改完點""保存。 &#

25、160;    刪除:點擊記錄移動按鈕,移動到要刪除的記錄上，單擊"-"按鈕，即可刪除當前記錄。2.3商品入庫，如圖4-10其中入庫單號系統(tǒng)自動生成，入庫日期默認填寫當前機器時間，也可手工錄入；經(jīng)辦人默認填寫當前系統(tǒng)登錄者的名稱。從表中通過商品編號調(diào)用商品信息中的數(shù)據(jù)；手工錄入數(shù)量；小計=數(shù)量*單價，系統(tǒng)自動算。 【圖4-10】在面板中點擊“商品入庫”按鈕，即可打開錄入窗口對商品入庫進行增加、修改或刪除操作。2.4商品銷售，如圖4-11，其中銷售單號系統(tǒng)自動生成，銷售日期默認填寫當前機器時間，也可手工錄入；經(jīng)辦人默認填寫當前系統(tǒng)登錄者的名稱。從

26、表中通過商品編號調(diào)用商品信息中的數(shù)據(jù)；手工錄入數(shù)量；小計=數(shù)量*單價，系統(tǒng)自動計算?！緢D4-11】在面板中點擊“商品銷售”按鈕，即可打開錄入窗口對商品銷售信息進行增加、修改或刪除操作。  2.5庫存明細，如圖4-12，查看各商品的期初庫存、累計入庫、累計銷售及庫存數(shù)量，庫存數(shù)量=期初庫存+累計入庫-累計銷售，系統(tǒng)自動計算。【圖4-12】  商品入庫期間查詢，查看期間內(nèi)入庫商品的信息；統(tǒng)計各種商品的入庫數(shù)量及總額；并統(tǒng)計所有入庫總額。查詢統(tǒng)計3.1選擇查詢統(tǒng)計，如圖4-13：【圖4-13】3.2會員消費明細查看，如圖4-14：【圖4-14】根據(jù)需要填寫會員卡號，就可

27、以看到會員在小賣部的詳細消費，如圖4-15。  查詢出來的信息不允許用戶自行更改、添加和刪除。  【圖4-15】3.3按日期查詢統(tǒng)計售票數(shù)，查看期間內(nèi)售票信息，并統(tǒng)計各票類的售票數(shù)和售票金額，最后統(tǒng)計下所有售票數(shù)和售票金額，如圖4-16，輸入日期?！緢D4-16】根據(jù)需要設(shè)置開始日期和截止日期，系統(tǒng)默認開始日期和截止日期為當前日期。單擊確定，看以看下面窗口，如圖6-17：  【圖6-17】雙擊系統(tǒng)左邊樹形列表中的“按日期查詢統(tǒng)計售票數(shù)”可打開此報表，若想打印此報表可在打開的報表頁面中單擊“打印”按鈕即可打印此報表。本報表打印所有在開始日期和截止日期之間的售票信息，系

28、統(tǒng)并自動統(tǒng)計售票數(shù)量和售票總額。按場次查詢統(tǒng)計售票數(shù)，查看某場次售票信息，并統(tǒng)計各票類的售票數(shù)和售票金額，最后統(tǒng)計下該場次總的售票數(shù)和售票金額。第五章 詳細設(shè)計結(jié)構(gòu)程序設(shè)計 結(jié)構(gòu)程序設(shè)計的定義為：“結(jié)構(gòu)程序設(shè)計是盡可能少用GO TO 語句的程序設(shè)計方法。最好僅在檢測出錯誤的時候才使用GO TO語句，而且應(yīng)該總是使用前向GO TO語句?！?本系統(tǒng)包括三個模塊：售票管理、小賣部管理和查詢統(tǒng)計。它們的結(jié)構(gòu)分布如下：1、售票管理（如圖5.1）圖5.12、小賣部管理（如圖5.2）圖5.23、查詢統(tǒng)計（如圖5.3）圖5.3人機界面設(shè)計1、系統(tǒng)響應(yīng)時間 系統(tǒng)響應(yīng)時間的兩個重要屬性：長度和易變性。據(jù)了解，一般

29、來說，如果系統(tǒng)的響應(yīng)時間過長，用戶就會感到很沮喪。但是，一旦響應(yīng)時間過短，這會迫使用戶加快操作節(jié)奏，從而很可能發(fā)生錯誤。本系統(tǒng)經(jīng)過多數(shù)人測試以后，發(fā)現(xiàn)響應(yīng)時間值在一個合理的范圍之類，即用戶可以接受。2、用戶幫助設(shè)施 幾乎所有的交互式系統(tǒng)的每個用戶都需要幫助，當遇到復雜的問題的時候，甚至需要查看用戶手冊才能尋求答案得以解決。本系統(tǒng)提供了聯(lián)機幫助設(shè)施，這使得用戶無須離開用戶界面就能解決自己想解決的問題。具體的幫助設(shè)施設(shè)計如下： （1）在用戶與系統(tǒng)交互期間，在任何時候，用戶都能獲得關(guān)于系統(tǒng)任何功能的幫助信息，因為本系統(tǒng)為用戶提供了兩種選擇：提供部分功能的幫助信息和提供全部功能的幫助信息。（在界面的右

30、邊幫助欄）（2）用戶可以以下三種方式請求幫助：幫助菜單，特殊功能鍵和HELP命令。（3）本系統(tǒng)在主屏幕界面右邊的固定位置會有幫助提示（4）用戶可以選擇屏幕上的返回按鈕返回到正常的交互界面上（5）本系統(tǒng)采用以下幾中結(jié)構(gòu)來組織幫助信息：平面結(jié)構(gòu)（幫助信息通過關(guān)鍵字訪問）、信息的層次結(jié)構(gòu)（通過該結(jié)構(gòu)，用戶可以查詢到更詳細的信息，例如主界面菜單欄下的下拉子菜單選項）和超文本鏈接3、出錯信息處理 出錯信息和警告信息，是用戶在使用系統(tǒng)時出現(xiàn)的“壞消息”。在用戶正常的操作剛才中，如果發(fā)現(xiàn)系統(tǒng)提示錯誤信息，首先不要慌張，先看看錯誤信息是怎么描述的（一般說來，這些信息都是用戶可以看的懂的），一般的問題，通過重啟

31、系統(tǒng)一般都能解決，如果遇到棘手的，用戶可以采用聯(lián)機幫助或者直接撥打客服電話以尋求解決。第六章 功能實現(xiàn)售票系統(tǒng) 1.1進入系統(tǒng)界面，用戶名默認為admi，如圖6-1: 【圖6-1】代碼：Private Sub Command1_Click()If Text1 = "" Or Text2 = "" ThenMsgBox "不能為空,請重新輸入", , "提示"x = x + 1Else If Text1.Text = "admi" And Text2.Text = "1234"

32、 Then Form1.Hide Form2.Show Else MsgBox "輸入錯誤，請重新輸入", 48, "提示" x = x + 1 End IfEnd IfIf x = 3 ThenMsgBox "強制退出", 16, "提示"EndEnd IfEnd SubPrivate Sub Command2_Click()EndEnd Sub1.2系統(tǒng)選擇界面，通過該界面admi可以選擇是進入售票管理系統(tǒng)，還是進入小賣部管理系，統(tǒng)如圖6-2: 【圖6-2】代碼：Private Sub Command1_Cli

33、ck()Form3.ShowForm2.HideEnd SubPrivate Sub Command2_Click()form5.ShowForm2.HideEnd Sub1.3該界面是對會員信息管理，如圖6-3：【圖6-3】代碼：Private Sub Command1_Click()Form4.ShowForm3.HideEnd SubPrivate Sub Command2_Click()會員信息查詢.ShowForm3.HideEnd SubPrivate Sub Command3_Click()Form2.ShowForm3.HideEnd Sub1.4該界面是對會員信息添加、刪除、

34、修改界面，如圖6-4：【圖6-4】代碼:會員添加 Dim con As New ADODB.ConnectionDim rs As New ADODB.RecordsetPrivate Sub Command1_Click()con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=H:張小磊售票管理.MDB;Persist Security Info=False" str1 = "select * from 會員信息" If con.State = 0 Then con.O

35、pen End Ifrs.Open str1, con, 1, 3rs.AddNewDataShowrs.Update '在datagrid中顯示數(shù)據(jù)Adodc1.CommandType = adCmdTextcon.CloseEnd SubPrivate Sub DataShow() rs("會員卡號") = Text1.Text rs("會員姓名") = Text2.Text rs("身份證號") = Text3.Text rs("折扣率") = Text4.Text rs("聯(lián)系方式&quo

36、t;) = Text5.Text rs("卡內(nèi)金額") = Text6.Text If rs("會員卡號") = "" Then MsgBox "會員卡號不能為空", 64, "提示" Else MsgBox "添加成功！", 64, "提示"End IfEnd Sub會員修改：Private Sub Command2_Click()Dim con As New ADODB.Connection Dim rs As New ADODB.Recordset

37、Dim str1 As String c = MsgBox("確定要修改該記錄嗎？", vbOKCancel, "提示信息") If c = vbOK Then '如果確認修改的話進行修改操作 If Text1.Text = "" Then MsgBox "會員卡號不能為空值!", 48, "修改信息提示" Else '連接所要修改的數(shù)據(jù)庫 con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=H:張小磊售票管理.

38、MDB;Persist Security Info=False" '開始修改數(shù)據(jù)庫 con.Execute ("update 會員信息 set 會員卡號='" & Text1.Text & " ',會員姓名='" & Text2.Text & " ',身份證號='" & Text3.Text & "',折扣率='" & Text4.Text & " ',聯(lián)系方式

39、='" & Text5.Text & " ', 卡內(nèi)金額='" & Text6.Text & " ' ") MsgBox "信息修改成功", 64, "修改信息提示" rs.CursorLocation = adUseClient End If End IfEnd SubPrivate Sub DataSave() rs("會員卡號") = Text1.Text rs("會員姓名") = Text2.T

40、ext rs("身份證號") = Text3.Text rs("折扣率") = Text4.Text rs("聯(lián)系方式") = Text5.Text rs("卡內(nèi)金額") = Text6.Text If rs("會員卡號") = "" Then MsgBox "會員卡號不能為空", 64, "提示" Else MsgBox "添加成功！", 64, "提示"End If會員刪除：Private S

41、ub Command3_Click()Dim con As New ADODB.Connection Dim rs As New ADODB.Recordset Dim str1 As Stringcon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=H:張小磊售票管理.MDB;Persist Security Info=False" con.CursorLocation = adUseClient str1 = "select * from 會員信息 where 會員卡號 = &

42、#39;" & Text1.Text & " '" If con.State = 0 Then con.Open End If 'rs.Open str1, 1, 3 rs.Open str1, con, adOpenKeyset, adLockOptimistic If rs.EOF = False Then c = MsgBox("您確認要刪除該記錄嗎？", vbOKCancel, "刪除提示信息") If c = vbOK Then rs.delete Adodc1.Recordset.

43、Update 'rs.CursorLocation = adUseClient MsgBox "刪除成功！"End If Else MsgBox "當前數(shù)據(jù)庫中沒有可刪除的數(shù)據(jù)記錄", vbOKOnly, "提示信息" End If con.CloseEnd SubPrivate Sub Command4_Click()Form3.ShowForm4.HideEnd Sub1.5該界面是對會員信息纖細查詢界面，如圖6-5：【圖6-5】代碼：Private Sub Command1_Click()Set DataGrid1.Da

44、taSource = Adodc1End SubPrivate Sub Command2_Click()Form3.Show會員信息查詢.HideEnd Sub小賣部系統(tǒng) 2.1 admi選擇小賣部管理系統(tǒng)，如圖6-6：【圖6-6】代碼：Private Sub Command1_Click()Form3.ShowForm2.HideEnd SubPrivate Sub Command2_Click()form5.ShowForm2.HideEnd Sub2.2 小賣部信息處理界面，如圖6-7【圖6-7】代碼：Private Sub add_Click()form7.ShowEnd SubPri

45、vate Sub back_Click()Form9.ShowUnload MeEnd SubPrivate Sub count_Click()form6.ShowEnd SubPrivate Sub delete_Click()form8.ShowEnd Sub2.3該界面是商品添加界面，如圖6-8:【圖6-8】代碼：Private Sub Command1_Click()str1 = "select * from CD where CD_NO ='" & Text1.Text & "'"If rs.State = 1

46、Thenrs.CloseEnd Ifrs.Open str1, conn, 1, 3If Text1.Text = "" Then MsgBox "請輸入菜單編號!", 64, "提示" Exit SubEnd IfIf Text2.Text = "" Then MsgBox "請輸入菜單名稱!", 64, "提示" Exit SubEnd IfIf Text3.Text = "" Then MsgBox "請輸入菜單種類!", 64,

47、 "提示" Exit SubEnd IfIf Text4.Text = "" Then MsgBox "請輸入菜單單價!", 64, "提示" Exit SubEnd IfIf rs.EOF Thenconn.Execute ("insert into CD values('" & Text1.Text & "','" & Text2.Text & "','" & Text3.

48、Text & "','" & Text4.Text & "','" & Text5.Text & "')")MsgBox "新添加菜單成功！", 64, "信息"End IfEnd SubPrivate Sub Command2_Click()Text1.Text = ""Text2.Text = ""Text3.Text = ""Text4.Text =

49、""Text5.Text = ""Text6.Text = ""End SubPrivate Sub Command3_Click()form5.ShowUnload MeEnd Sub2.4該界面是商品查詢界面，如圖6-9：【圖6-9】Dim conn As New ADODB.ConnectionDim rs As New ADODB.RecordsetDim rs1 As New ADODB.RecordsetPrivate Sub Check1_Click(Index As Integer)If Check1(Index).V

50、alue = 0 Or IsBusy ThenExit SubDim i As IntegerIsBusy = TrueFor i = 0 To Check1.UBoundIf i <> Index Then Check1(i).Value = 0NextIsBusy = FalseEnd IfEnd SubPrivate Sub Command1_Click()If Check1(0).Value Then If Trim(Text5.Text) = "" Then MsgBox "菜單編號不能為空！", 48, "警告"

51、; Else str1 = "select * from CD where CD_NO like '" & Text5.Text & "%'" End IfEnd IfIf Check1(1).Value Then If Trim(Text5.Text) = "" Then MsgBox "菜單名字不能為空！", 48, "警告" Else str1 = "select * from CD where CD_NAME like '" &

52、amp; Text5.Text & "%'" End If End If If Check1(2).Value Then If Trim(Text5.Text) = "" Then MsgBox "請輸入菜單價格", 48, "警告" Else str1 = "select * from CD where CD_PRICE like '" & Text5.Text & "%'" End If End Ifrs.Open &quo

53、t;DC", conn, 2, 3rs.AddNewrs.Fields("DC_NUM") = Text1.Textrs.Fields("DC_DESK") = Combo2.Textrs.Fields("DC_COUNT") = Text4.TextIf Check1(0).Value Then rs1.Open str1, conn, 1, 3 rs.Fields("CD_NO") = Text5.Text rs.Fields("CD_NAME") = rs1("CD_N

54、AME") rs.Fields("CD_PRICE") = rs1("CD_PRICE")End IfIf Check1(1).Value Then rs1.Open str1, conn, 1, 3 rs.Fields("CD_NAME") = Text5.Text rs.Fields("CD_NO") = rs1("CD_NO") rs.Fields("CD_PRICE") = rs1("CD_PRICE")End Ifrs.Update Adodc1.RecordSource = str1 Set DataGrid1.DataSource = Adodc1 Adodc1.CommandType = adCmdText A