1、興盛藥房管理系統興盛藥房管理系統摘 要近年來，我國對醫藥的改革力度不斷加大，藥品流通逐漸放開，各種類型的藥房也隨之應運而生。為了避免傳統的人工管理方式給藥房管理者及購藥者帶來的不便，進一步提高藥房的管理水平、工作效率，降低藥房的運營成本，提升經濟效益，利用先進的信息化技術和藥品管理理念開發一個醫藥管理系統是非常必要的。興盛藥房管理系統的設計與開發就是運用了信息化的技術對藥房進行的科學化管理。本系統采用 visual basic 6.0 與 microsoft sql server 2000 數據庫管理系統進行開發。通過調查研究，本系統實現了如下功能：系統管理，藥品信息管理，藥房庫存管理，查詢管

2、理，報表管理等。實現了對藥房管理的信息化，使得對藥房信息的更新、修改、維護等工作變得更方便、快捷，在提高經濟效益的同時也提高了工作效率。關鍵詞：藥房管理；visual basic 6.0；microsoft sql server 2000興盛藥房管理系統the prosperity pharmacy management systemabstractin recent years, the medicine in china has continuously increased the intensity of the reform, opening up gradually flow of

3、drugs, and variable types of pharmacies also will come into being. in order to avoid the traditional approach to the management of managers and pharmacies who filled the inconvenience, improving the management of pharmacies and work efficiency, reducing pharmacy operating costs, thus its very necess

4、ary to make use of advanced information technology and medicine management concept to develop a perfect books rental management system. the design and development of the prosperity pharmacy management system is the use of information technology to pharmacies for the scientific management, which usin

5、g visual basic 6.0 and microsoft sql server 2000 database management system. through the investigation and study, the system has the following functions: the system management, the drug information management, the pharmacy inventory management, the query management, the report management and so on.

6、through this system, the pharmacy management realized information, which making the renewal, revision, maintenance more convenient and quickly, enhancing efficiency of the pharmacy information management.key words: pharmacy management; visual basic 6.0; microsoft sql server 2000興盛藥房管理系統目 錄1 前 言 .11.

7、1 課題的背景及意義 .11.2 功能需求與分析 .11.2.1 功能需求 .11.2.2 系統功能分析 .21.3 可行性分析 .32 開發環境及介紹 .42.1 開發環境簡介 .42.2 visual basic 語言簡介.42.3 sql server 2000 數據庫簡介 .42.4 ado 控件.53 系統總體設計 .63.1 設計規劃 .63.2 系統功能模塊 .73.2.1 系統用戶管理 .83.2.2 藥品信息管理 .83.2.3 庫存信息管理 .83.2.4 前臺銷售管理 .83.2.5 購買結算管理 .93.2.6 客戶取藥管理 .93.2.7 藥房高級管理 .93.3 系

8、統數據庫設計 .93.3.1 數據庫概要設計 .93.3.2 數據庫表邏輯設計 .114 系統詳細設計 .144.1 系統登錄窗體 .144.2 系統主窗體 .164.3 藥品管理窗體.174.4 購藥管理窗體.184.5 結算管理窗體 .234.6 取藥管理窗體.264.7 庫存管理窗體 .284.8 退出系統窗體 .305 結論 .31參考文獻 .32致 謝 .33興盛藥房管理系統第 1 頁 共 33 頁1 前 言1.1 課題的背景及意義如今，醫藥行業商品種類繁多，客戶數量多，造成業務量很大。如果使用手工管理方式進行各項業務勞動使得醫藥管理人員的工作量十分龐大，而且效率比較低下，同時會使財

9、務及管理部門所需的各種經營數據及經營分析報表無法及時得到。手工管理方式的弊端畢現無遺。隨著信息時代的來臨，利用計算機應用于醫院的日常管理為醫院的現代化帶來了從未有過的動力和機遇，為醫療衛生領域的飛速發展提供了無限潛力。采用計算機管理信息系統已成為醫院管理科學化和現代化的重要標志，給醫院帶來了明顯的經濟效益和社會效益。本系統就考慮到了這一狀況，設定了系統管理員來進行統一且獨立的用戶管理。取藥結算員、藥品信息管理員、統計信息管理可以使用非用戶管理功能，分別管理藥品的庫存、銷售、信息統計，達到管理上的一致和協調1。1.2 功能需求與分析1.2.1 功能需求普通藥房包括的主要業務是藥品信息管理和銷售管

10、理，以及簡單的庫存管理。藥品信息管理主要是記錄藥品的基本資料，添加新藥品的資料，并且進行藥品類別的管理，能夠進行藥品信息的添加，刪除，能夠進行藥品信息的查詢，能夠進行添加、刪除藥品數量的管理，更改庫存藥品數量。 銷售管理主要有銷售和查詢藥品兩部分，前臺銷售員進行藥品的銷售。銷售管理子系統是整個計算機管理信息系統的核心。并有以下具體需求:（1）由于操作人員的計算機知識水平有限，因此要求系統具有良好的人機界面。（2）系統的使用對象較多，要求有鎖定系統的功能。即有較好的權限管理。（3）方便的數據查詢功能。如果某些藥品的編碼不對而知道它的名稱時，可以按名稱興盛藥房管理系統第 2 頁 共 33 頁查詢出

11、此藥品，并銷售，可以選擇查詢的內容和查詢的方法，支持多條件查詢。（4）在客戶購物車結算中根據輸入的基礎數據自動計算金額，盡量減少人工干預。（5）對客戶的往來賬目進行有效管理，絕不存在假賬、漏賬、錯賬等情況。（6）通過計算機，能夠直接“透視”倉庫存儲情況。（7）藥品按類別和名稱進行管理。（8）必須記錄藥品的基本信息，比如數量和廠家等。（9）需要記錄客戶購買的信息。（10）在采購信息中需要記錄采購的數量和單價等。（11）藥品銷售信息單中要包含登記藥品銷售數量、單價等信息。（12）需要對進貨、銷售、庫存等操作生成相應的報表。（13）采購、銷售信息都可以進行添加、修改、刪除、統計等操作。（14）當進行

12、進貨、銷售操作后，能相應更新庫存。1.2.2 系統功能分析本系統中的興盛管理系統主要具有以下功能：（1）系統用戶管理：興盛藥房的使用人員涉及前臺銷售員、收銀員、取藥員、采購員以及系統高級管理員，系統用戶管理完成對各類使用人員系統使用帳戶的添加、修改、刪除和查詢。（2）藥品信息管理：管理藥品的基本信息，包括添加、修改、刪除和查詢。（3）庫存信息管理：管理藥品的入庫，庫存量修改與查詢，制訂庫存報表。（4）前臺銷售管理：管理客戶購物車的創建、添加、修改和查詢，以及根據用戶要求查詢特定藥品信息。（5）購買結算管理：根據客戶購物車結算購藥費用，并可對購物車進行修改。（6）取藥管理：客戶結算之后，取藥人員

13、根據客戶購物車從庫房為用戶取藥，并完成購物車的注銷操作。（7）制訂采購計劃：采購人員根據藥品庫存量和藥品銷售情況制訂采購計劃。（8）銷售報表管理：根據每月藥品的銷售情況產生藥品銷售報表，藥房高級管理人員可以根據報表調整銷售策略。興盛藥房管理系統第 3 頁 共 33 頁1.3 可行性分析（1）技術可行性最近 30 年來，管理信息系統技術得到了充分的發展與完善，使得開發本系統在技術可行性成為可能，利用 vb 開發工具，使得本系統不存在技術上的障礙。該系統的軟件研發階段，由本人協助該藥房提出需求、進行系統設計與開發，擬采用成熟的數據庫技術與軟件開發技術，具有技術可行性2。（2）經濟可行性現今，計算機

14、的價格比較低廉，性能卻有著長足的進步，它已經被應用于許多領域。系統各功能由本人來實現，節省許多人力物力資源。時間上，開發時間短，而且使用 vb 語言編寫，容易上手并且容易維護，效率高，經濟上完全可行。（3）運營可行性在本系統的運營階段，使用系統的工作人員，除了需要具備在 microsoft windows平臺上使用個人電腦的知識，并不需要特別的技術能力。并且在項目投產前，還會安排對操作系統的人員進行必要的培訓。在藥房信息化建設及業務拓展到適當規模后，由藥房專業技術人員擔任此項工作十分容易。在具體實施過程中，藥房同意建立這樣的運營管理機制：由藥房管理層一名高級管理人員領導，興盛部與業務部具體負責

15、本項目的運營；同時，采購部負責對系統運營過程中的計算機耗材的供應。因此本系統營運方面可行。 綜上所述，實施本系統，已具備技術可行、經濟可行、運營可行的條件，所以藥房決策層同意開發和使用本系統。興盛藥房管理系統第 4 頁 共 33 頁2 開發環境及介紹2.1 開發環境簡介該系統采用和 microsoft sql servers 2000 作為開發工具。開發該系統對軟硬件環境的一些要求：（1） 硬件環境：pentium 586 型號以上計算機內存 128m 以上（2） 軟件環境：操作系統：windows xp 編程語言：visual basic 6.0數據庫開發：microsoft sql ser

16、vers 20002.2 visual basic 語言簡介visual basic（vb）是一種由微軟公司開發的包含協助開發環境的事件驅動編程語言。它源自于 basic 編程語言。vb 擁有圖形用戶界面（gui）和快速應用程序開發（rad）系統，可以輕易的使用 dao、rdo、ado 連接數據庫，或者輕松的創建activex 控件。程序員可以輕松的使用 vb 提供的組件快速建立一個應用程序3。vb 使用可以簡單建立應用程序的 gui 系統，但是又可以開發相當復雜的程序。vb 的程序是一種基于窗體的可視化組件安排的聯合，并且增加代碼來指定組件的屬性和方法。因為默認的屬性和方法已經有一部分定義在

17、了控件內，所以程序員不用寫多少代碼就可以完成一個簡單的程序4。2.3 sql server 2000 數據庫簡介sql server 2000 中文版是微軟公司最新開發的大型關系數據庫管理系統，具有非常強大的關系數據庫創建、開發、設計及管理功能。與前一個版本相比，sql 興盛藥房管理系統第 5 頁 共 33 頁server 2000 徹底脫離了 sybase，它將數據庫連接到 internet，并通過 web 瀏覽器顯示數據操作，具有客戶機/服務器結構，并與微軟公司其它產品及第三方產品具有良好的兼容性，能方便地實現無縫操作。此外，sql server 2000 還提供了對分布式事務處理的支持，

18、并具有對開發工具的良好支持，能為大型數據庫項目提供優秀的企業級解決方案5。2.4 ado 控件ado 是為 ms 的強大的數據訪問接口 ole db 設計的，是一個便于使用的應用程序層。 ole db 為任何數據源都提供了高性能的訪問，包括：關系型數據庫、非關系型數據庫、電子郵件、文件系統、文本和圖形以及自定義業務對象等。ado 2.0 實際上是基于 msado15.dll 這個動態鏈接庫的，這個庫文件的名字雖然和 ado 1.5 的一樣，但是它實現了更新的接口7。 ado 2.0 里的新技術有：異步操作和事件模型；數據集的持續性層次化的數據傳輸。ado 特點概述，用 ado 訪問數據元的特點

19、可概括如下： 1. 易于使用，可以說這是 ado 最重要的特點之一。 2. ado 是高層數據庫訪問技術，相對與 odbc 來說，具有面向對象的特點。 3. 在 ado 對象結構中，對象與對象之間的層次結構不適非常明顯，這會給編寫數庫程序帶來更多的便利。比如，在應用程序中如果要使用記錄集對象，不一定要先建立連接、會話對象，如果需要就可以直接構造記錄集對象。總是，已經沒有必要去關心對象的構造層次和構造順序了。 4. 可以訪問多種數據源。和 ole db 一樣，使應用程序具有很好的通用性和靈活性。訪問數據源效率高6。 5. 方便的 web 應用。ado 可以以 activex 控件的形式出現，這就

20、大大方便了web 應用程序的編制7。 6. 技術編程接口豐富。 ado 支持 visual c+、visual basic、vbs、js 等8。興盛藥房管理系統第 6 頁 共 33 頁3 系統總體設計3.1 設計規劃運行該系統，進入系統登錄狀態，在系統登錄過程中需要對用戶名及密碼所代表的用戶身份信息進行驗證，直到驗證通過，進入系統主界面。否則將一直處在系統的登錄狀態。進入系統主界面后，用戶可根據需求進行相應的模塊功能處理。圖圖 3-1 興盛藥房系統流程圖興盛藥房系統流程圖興盛藥房管理系統第 7 頁 共 33 頁3.2 系統功能模塊興盛藥房管理系統功能模塊圖：系統用戶添加系統用戶刪除修改用戶口令

21、查詢用戶口令藥品信息添加藥品信息編輯藥品信息查詢藥品入庫庫存信息修改制訂庫存報表客戶購物車創建購物車項目編輯購物車項目查詢購物車項目編輯藥品結算與收費客戶購物車注銷制訂采購計劃制訂銷售報表系統用戶管理藥品信息管理庫存信息管理前臺銷售管理購買結算管理客戶取藥管理藥房高級管理興盛藥房管理系統圖圖 3-2 興盛藥房系統功能模塊興盛藥房系統功能模塊興盛藥房管理系統第 8 頁 共 33 頁興盛藥房管理系統總的來說包括：系統用戶管理；藥品信息管理；庫存信息管理；前臺銷售管理；購買結算管理；客戶取藥管理；藥房高級管理。3.2.1 系統用戶管理（1）系統用戶添加：添加系統用戶（通過設置管理權限來區分高級管理員

22、和普通管理員），實現對該系統的管理與維護。（2）系統用戶刪除：取消該用戶對系統的任何操作。（3）修改用戶口令：實現對用戶口令的修改操作。（4）查詢用戶口令：實現用戶該登錄口令的查詢操作。3.2.2 藥品信息管理（1）藥品信息添加：為該系統添加藥品信息，方便用戶的查詢，也便于管理員對藥品信息的管理。（2）藥品信息查詢：獲得豐富的藥品信息，便于用戶的查詢，提高用戶對該藥品信息的了解，提高其對該藥品的購買率。（3）藥品信息編輯：實現管理員對藥品信息的修改操作。3.2.3 庫存信息管理（1）藥品入庫：將藥品信息存放到數據庫中，便于對其信息的保存，實現對其藥品信息做統計工作。（2）庫存信息修改：實現對庫

23、存中的藥品各類信息進行修改操作。（3）制訂庫存報表：將庫存信息形成報表，并進行打印，便于閱覽。3.2.4 前臺銷售管理（1）客戶購物車創建：客戶創建購物車，用于存放其購買的藥品。（2）購物車項目編輯：該功能實現將用戶購買的藥品存放到購物車當中。便于對藥品金額的計算工作。（3）購物車項目追加：該功能是將用戶所購買的藥品添加到購物車的具體操作。興盛藥房管理系統第 9 頁 共 33 頁3.2.5 購買結算管理（1）購物車項目編輯：該功能將確定用戶所購買的藥品，便于以后的藥品計算工作。（2）藥品結算與消費：藥品結算的具體操作，并對藥品的結算金額進行付費操作。3.2.6 客戶取藥管理客戶將取得的藥品存放

24、于購物車，便于以后的結算工作，同時可取消購物車，放棄對該藥品的購買。3.2.7 藥房高級管理（1）制訂采購計劃：用戶通過該窗體實現對藥品的采購計劃進行制訂，便于以后的采購工作。（2）制訂銷售報表：將藥品的銷售信息形成報表，進行打印，便于管理員與用戶對銷售情況及購買情況進行閱覽。3.3 系統數據庫設計3.3.1 數據庫概要設計（1）系統用戶表（編號，口令，權限）（2）庫存數據表（編號，庫存，下限）（3）藥品信息表（編號，名稱，售價，進價，種類，廠家）（4）藥品銷售表（編號，日期，藥編號，數量）（5）購物車記錄表（編號，客戶名，日期，結算）（6）購物車數據表（編號，數量）下圖是各個實體的 e-r

25、模型圖：興盛藥房管理系統第 10 頁 共 33 頁系統用戶口令編號權限圖圖 3-3 系統用戶實體圖系統用戶實體圖藥品名稱編號售價進價廠家種類圖圖 3-4 藥品信息實體圖藥品信息實體圖銷售藥品數量編號藥編號日期圖圖 3-5 藥品銷售實體圖藥品銷售實體圖購物車客戶名編號結算日期圖圖 3-6 購物車記錄實體圖購物車記錄實體圖興盛藥房管理系統第 11 頁 共 33 頁庫存藥品庫存編號下限圖圖 3-7 庫存數據實體圖庫存數據實體圖購物車編號數量圖圖 3-8 購物車數據實體圖購物車數據實體圖藥品信息表和藥品銷售表的 e/r 圖： 圖圖 3-9 系統關系系統關系 e-r 圖圖3.3.2 數據庫邏輯設計“興盛

26、藥房管理系統”數據庫中的各個數據表名稱和結構如下：（1） 系統用戶數據表。系統用戶數據表用于保存系統用戶的帳戶信息，包括編號、口令和權限代碼，數據表命名為“系統用戶”，表結構如表 3-1 所示。系統用戶興盛藥房管理系統第 12 頁 共 33 頁編號形式如 00000、00001，用戶權限使用 0、1、2、3、4 分別代表系統管理員、銷售員、收銀員、取藥員和采購員。編號字段作為主關鍵字，添加 00000、00001 作為默認的系統管理員。表表 3-1 系統用戶數據表結構系統用戶數據表結構列名數據類型長度允許空編號nchar5主鍵口令nchar6否權限nchar1否（2） 藥品信息數據表。藥品信息

27、數據表用于保存每種藥的基本信息，包括編號、名稱、售價、進價、種類和廠家，數據表命名為“藥品信息”，表結構如表 3-2 所示。編號形式如 z00001、zc0001，該字段作為主關鍵字。表表 3-2 藥品信息數據表藥品信息數據表列名數據類型長度允許空編號nchar5主鍵名稱varchar50否售價smallmoney4否進價smallmoney4否種類varchar10否廠家varchar50允許空（3） 銷售數據表。藥品銷售數據表用于保存每種藥的銷售記錄數據，包括銷售記錄編號、日期、藥編號，命名為“藥房銷售”，表結構如表 3-3 所示。“編號”用于唯一標識一種藥的單筆銷售記錄，形式如 0308

28、1700001、03081700002，該字段作為關鍵字。在客戶結算取藥之后，其購物車數據表和購物車記錄將被刪除，購買數據則被保存到藥品銷售表中。表表 3-3 藥品銷售數據表藥品銷售數據表列名數據類型長度允許空編號nchar11主鍵日期smalldatetime4否藥編號nchar6否數量tinyint1否（4） 購物車記錄表。購物車記錄表用于保存客戶購物車記錄，包括購物車編號、客戶名、日期和結算，數據表命名為“購物車記錄”表結構如表 3-5 所示。每個客戶興盛藥房管理系統第 13 頁 共 33 頁的購物車啟示使用一個惟一的編號來標識，形式如 03081700001、03081700002，“

29、編號”字段作為主關鍵字。結算字段用于標識客戶是否已執行過結算操作，默認值設置為 0。表表 3-4 購物車記錄表購物車記錄表（5）庫存數據表。庫存數據表用于保存每種藥的庫存信息，包括庫存編號、庫存量和庫存下限，數據表命名為“庫存數據”，表結構如表 3-4 所示。每種藥的庫存編號與藥品信息表中的藥品編號一致，該字段作為主關鍵字。表表 3-5 庫存數據表庫存數據表列名數據類型長度允許空編號nchar6主鍵庫存smallint2否下限smallint2否（6） 購物車數據表。每個客戶有自己的購物車數據表，表于保存客戶選購藥品的編號、數量。光臨藥房購藥的顧客是動態的，所以數據庫中客戶購物車數據表的數量也

30、是動態的，對于每一個打算購買的顧客，首先在客戶購物車記錄表中添加一個記錄，并分配一個惟一的編號來標識，然后使用該編號來命名為客戶創建購物車數據表，表結構如表 3-6 所示。表表 3-6 購物車數據表購物車數據表列名數據類型長度允許空編號nchar10主鍵客戶名varchar15否日期smalldateint4否結算bit1否列名數據類型長度允許空編號nchar6主鍵數量smallmoney4否興盛藥房管理系統第 14 頁 共 33 頁4 系統詳細設計4.1 系統登錄窗體將 systemlogon 窗體設置為工程啟動對象，按鍵運行工程，首先顯示用戶登陸窗體如圖 4-1 所示。以默認的系統管理員身

31、份登陸（編號 00000，口令 222222）。圖圖 4-1 用戶登錄窗體用戶登錄窗體檢驗用戶身份的代碼如下：private sub cmdok_click() 靜態常量 intlogtimes 用于保存用戶請求驗證的次數 static intlogtimes as integer intlogtimes = intlogtimes + 1 /保存登錄次數 if intlogtimes maxlogtimes then 超過允許的登錄次數，顯示提示信息 msgbox 你已經超過允許的登錄驗證次數！ & vbcr _ & 應用程序將結束！, vbcritical, 登錄驗證 en

32、d 結束應用程序 else drug_store.rssysusers.open /打開紀錄集 with drug_store.rssysusers /檢驗用戶名和口令的合法性 if .recordcount 0 then興盛藥房管理系統第 15 頁 共 33 頁 .movefirst .find 編號= & trim(txtlog(0) & if .eof then msgbox 編號： & trim(txtlog(0) _ & 不是系統用戶編號，請修改編號重試！, vbcritical, 登錄驗證 txtlog(0).setfocus txtlog(0).s

33、elstart = 0 txtlog(0).sellength = len(txtlog(0) elseif .fields(口令) trim(txtlog(1) then msgbox 口令錯誤，請重新輸入口令！, vbcritical, 登錄驗證 txtlog(1).setfocus txtlog(1) = else currentusernumber = .fields(編號) currentuserpassword = .fields(口令) currentuserstatus = .fields(權限) msgbox 歡迎使用興盛藥房管理系統！, vbinformation, 登錄成

34、功 unload me systemmain.show end if end if end with drug_store.rssysusers.close /關閉紀錄集 end ifend sub興盛藥房管理系統第 16 頁 共 33 頁4.2 系統主窗體系統管理員“00000”登錄系統主窗體，如圖 4-2 所示，應為該管理員的權限設置為高級管理員，所以可進行特殊的操作系統管理。以及藥品管理和購銷管理，它們同時也為普通用戶提供操作。圖圖 4-2 系統主窗體系統主窗體該管理員，選擇“系統管理”“用戶管理”菜單命令，打開“系統用戶管理”窗體，如圖 4-3 所示，在該窗體中將自己的系統管理權限設置

35、成“0”級，該窗體只對系統管理員是可見的；普通用戶登錄時，可選擇“系統管理”“修改口令”菜單命令，打開“修改登陸口令”窗體，如圖 4-4 所示。圖圖 4-3 用戶管理窗體用戶管理窗體興盛藥房管理系統第 17 頁 共 33 頁圖圖 4-4 修改口令窗體修改口令窗體4.3 藥品管理窗體選擇“藥品管理”“數據管理”菜單命令，打開“藥品管理”窗體，在該窗體中可完成藥品基本信息的添加、修改、刪除、保存、關閉操作。如可以下拉單的形式對藥品種類進行添加修改。編號為“00000”的系統管理員對編號為“000001”的藥品種類進行修改，由原先的“中成藥”修改成“中藥”，如圖 4-5。該系統管理員將藥品編號為“z

36、c0001”的藥品信息從藥品信息表中刪除，單擊“是（y）”按鈕，可完成此操作，如圖 4-6 所示。圖圖 4-5 藥品管理窗體藥品管理窗體-藥品修改藥品修改興盛藥房管理系統第 18 頁 共 33 頁圖圖 4-6 藥品管理窗體藥品管理窗體-藥品刪除藥品刪除4.4 購藥管理窗體選擇“購銷管理”“前臺銷售”“創建購物車”菜單命令，打開“創建購物車”窗體，輸入客戶姓名后單擊確定按鈕可為客戶創建購物車，單擊“刷新”按鈕，可得到下一個未使用的購物車編號。客戶“張揚”創建了編號為“t03080500001”的購物車，如圖 4-7 所示。該購物車創建成功，方便了客戶“張揚”之后對藥品的購買操作。興盛藥房管理系統

37、第 19 頁 共 33 頁圖圖 4-7 創建購物車窗體創建購物車窗體選擇“購銷管理”“制訂采購計劃”菜單命令，打開“制訂采購計劃”窗體，通過該窗體制定采購計劃。客戶“張揚”將藥品編號為“000001”名稱“潤潔滴眼液”采購量為“50”的采購計劃添加到“制訂采購計劃”窗體中，如圖 4-8 所示。此后可連接打印機進行打印，方便了對采購計劃的閱覽，對所要采購的藥品信息做到心中有數。客戶“張揚”在購買藥品窗體-1 的藥品列表中，如圖 4-9 所示，單擊藥品名稱為“潤潔滴眼液”該行，將其數量設置成“50”，單擊“打開”按鈕，此采購信息將被顯示在客戶選購項目列表中。“張揚”的購買信息已被添加到已創建的“t

38、03080500001”購物車中，如圖如圖 4-10 所示。興盛藥房管理系統第 20 頁 共 33 頁圖圖 4-8 制訂采購計劃窗體制訂采購計劃窗體圖圖 4-9 購買藥品窗體購買藥品窗體-1興盛藥房管理系統第 21 頁 共 33 頁圖圖 4-10 購買藥品窗體購買藥品窗體-2藥品購買的實現代碼如下：private sub cmdadd_click() if trim(txtnum) = then msgbox 請輸入選購藥品編號！, vbcritical, 藥品購買 txtnum = txtnum.setfocus elseif trim(txtsum) = then msgbox 請輸入選購

39、藥品數量！, vbcritical, 藥品購買 txtsum = txtsum.setfocus else 驗證庫存數量 with drug_store.rsstockdata if .state = adstateclosed then .open if .recordcount = 0 then興盛藥房管理系統第 22 頁 共 33 頁 msgbox 目前庫存沒有任何藥品,請采購 !, vbokonly + vbinformation, 信息 exit sub end if .movefirst .find 編號= & trim(txtnum.text) & if .rec

40、ordcount = 0 then msgbox 查無該類型藥品 !, vbokonly + vbinformation, 信息 exit sub end if if .fields(庫存) 0 then .movefirst .find 編號= & txtnum & if .eof then .addnew .fields(編號) = txtnum .fields(數量) = txtsum else .fields(數量) = .fields(數量) + val(txtsum) end if else興盛藥房管理系統第 23 頁 共 33 頁 .addnew .fields(

41、編號) = txtnum .fields(數量) = txtsum end if .update end with end ifend sub4.5 結算管理窗體選擇“購銷管理”“結算管理”菜單命令，客戶“張揚”對在購物車編“t03082500001”中所買的是“50”個“潤潔滴眼液”藥品的合計金額進行結算，如圖 4-11 所示。圖圖 4-11 購藥結算窗體購藥結算窗體系統管理員“00000”選擇“購銷管理”“制訂銷售報表”菜單命令，將顯示所有銷售數據表，如圖 4-12 所示。單擊“查看報表”按鈕，顯示興盛藥房管理系統藥品銷售信息報表，如圖 4-13 所示。單擊“選擇篩選月份”下拉菜單，將顯示

42、具體月份的報表數據。興盛藥房管理系統第 24 頁 共 33 頁選擇“2007 年 05 月”，單擊“查看報表”，該“報表數據”的窗體如圖 4-14 所示，再單擊“查看報表”按鈕，顯示“2007 年 05 月”興盛藥房管理系統藥品銷售信息報表，如圖 4-15所示。圖圖 4-12 制訂銷售報表窗體制訂銷售報表窗體-1興盛藥房管理系統第 25 頁 共 33 頁圖圖 4-13 制訂銷售報表窗體制訂銷售報表窗體-2圖圖 4-14 制訂銷售報表窗體制訂銷售報表窗體-3興盛藥房管理系統第 26 頁 共 33 頁圖圖 4-15 制訂銷售報表窗體制訂銷售報表窗體-44.6 取藥管理窗體客戶“張揚”選擇“購銷管理

43、”“取藥管理”菜單命令，獲取購物車編號為“t03080500001”，已經結算為“已結算”的藥品，如圖 4-16 所示。此后，該客戶將“t03080500001”購物車進行注銷，如圖 4-17 所示，該購物車注銷成功。興盛藥房管理系統第 27 頁 共 33 頁圖圖 4-16 取藥管理窗體取藥管理窗體-1圖圖 4-17 取藥管理窗體取藥管理窗體-2興盛藥房管理系統第 28 頁 共 33 頁4.7 庫存管理窗體系統管理員“00000”選擇“藥品管理”“庫存管理”菜單，選中顯示所有庫存數據單選框，顯示該系統的所有庫存數據，如圖 4-18 所示。此后，該系統管理員將名稱為“雙氧水”，編號“xz0003”，庫存“1000”的藥品數據信息進行入庫操作，窗體如圖4-19 所示，數據保存到庫存數據表中。然后，去除顯示所有庫存數據單選框的選中狀態，通過前進或后退鍵查看庫存數據記錄，確信“雙氧水”藥品已入庫，記錄總個數已由 9 變成 10，如圖 4-20 所示。圖圖 4-18 庫存管理窗體庫存管理窗體-1興盛藥房管理系統第 29 頁 共 33 頁圖圖 4-19 庫存管理窗體庫存管理窗體-2興盛藥房管理系