【導(dǎo)讀】生存與發(fā)展的必要條件。藥店管理系統(tǒng)可以對(duì)藥店的實(shí)物及帳目進(jìn)行精確快速的。經(jīng)營(yíng)者快速掌握藥店的經(jīng)營(yíng)狀況，從而做出正確的決策。系統(tǒng)采用ADO技術(shù)來(lái)實(shí)現(xiàn)C/S. 客戶端和數(shù)據(jù)庫(kù)的連接。系統(tǒng)主要包括系統(tǒng)管理、系統(tǒng)信息維護(hù)、藥品銷售、藥。庫(kù)、信息查詢統(tǒng)計(jì)、報(bào)表打印等基本功能。

　　

【正文】 系統(tǒng)統(tǒng)計(jì)查詢功能如 圖 所示 。 圖 統(tǒng)計(jì)查詢子模塊圖 模塊設(shè)計(jì) 這一節(jié)將對(duì)功能模塊圖中的部分模塊的功能作概要的描述 。 系統(tǒng)管理模塊 權(quán)限管理如圖 所示 。 圖 本科生畢業(yè)設(shè)計(jì)（論文） 28 藥店信息管理系統(tǒng)主要實(shí)現(xiàn)的是系統(tǒng)的管理功能 ,分為用戶管理 ,權(quán)限管理 ,密碼管理 ,系統(tǒng)設(shè)置和藥品信 息管理維護(hù)以及報(bào)表的產(chǎn)生 .用戶管理能對(duì)本系統(tǒng)的所有用戶的信息進(jìn)行管理 ,添加用戶 ,修改用戶信息 ,注銷用戶等 .權(quán)限管理中 ,管理員能夠設(shè)置訪問(wèn)本系統(tǒng)的所有用戶的權(quán)限 ,設(shè)置用戶能夠進(jìn)行什么操作 ,不能夠進(jìn)行什么操作 ,例如 :系統(tǒng)中管理員的權(quán)限為最高 ,所有操作均可以 ,而采購(gòu)員的權(quán)限只可以進(jìn)行采購(gòu)管理和對(duì)自己的信息 ,密碼進(jìn)行修改 .密碼管理中 ,用戶只能對(duì)自己的密碼進(jìn)行設(shè)置與修改 .系統(tǒng)設(shè)置只能系統(tǒng)管理員操作 ,進(jìn)行設(shè)置系統(tǒng)中庫(kù)存的上下限 ,藥品有效期提示的時(shí)間 ,違禁藥品的添加 .管理模塊流程圖如 圖 所示 。 圖 流程圖 用戶編輯這一模塊主要是面向系統(tǒng)管理員的應(yīng)用模塊，也是系統(tǒng)較為關(guān)鍵的模塊部分，它包括用戶管理：主要來(lái)實(shí)現(xiàn)對(duì)系統(tǒng)用戶的添加，刪除，修改等操作。 用戶編輯 如圖 所示 。 本科生畢業(yè)設(shè)計(jì)（論文） 29 圖 確定按扭代碼： Private Sub Command1_Click() Select Case Case 管理員 = 0001 Case 醫(yī)生 = 0006 Case 售藥員 = 0003 Case 保管員 = 0005 Case 采購(gòu)員 = 0004 Case 領(lǐng)導(dǎo) = 0002 End Select answer = MsgBox(您確信要修改此記錄嗎？ , vbYesNo, 提示 ) If answer = vbYes Then 39。 本科生畢業(yè)設(shè)計(jì)（論文） 30 (職工代碼 ) = Text1(0).Text (職工類別代碼 ) = (職工姓名 ) = Text1(2).Text (職工性別 ) = (職工出生日期 ) = (職工家庭住址 ) = Text1(4).Text (職工聯(lián)系電話 ) = Text1(5).Text (密碼 ) = Text1(6).Text MsgBox 修改記錄成功！ , 48, 提示 Else Text1(0).SetFocus SendKeys {Home}+{End} End If End Sub 權(quán)限管理：主要來(lái)實(shí)現(xiàn)對(duì)系統(tǒng)用戶的權(quán)限的管理，修改，以保證系統(tǒng)正常安全的工作。密碼修改 ：主要實(shí)現(xiàn)用戶本身對(duì)自己密碼的修改操作。 系統(tǒng)設(shè)置如圖 所示 。 圖 本科生畢業(yè)設(shè)計(jì)（論文） 31 系統(tǒng)設(shè)置：主要實(shí)現(xiàn)對(duì)系統(tǒng)庫(kù)存藥品上下限，藥品有效期，國(guó)家禁賣藥品等功能的設(shè)置。使管理員能很方便，快捷的對(duì)系統(tǒng)進(jìn)行修改。 閱讀報(bào)表：主要是面向藥店領(lǐng)導(dǎo)的模塊，方便藥店領(lǐng)導(dǎo)了解藥店的運(yùn)營(yíng)狀況。 信息維護(hù)：這一模塊主要是對(duì)系統(tǒng)基本信息的維護(hù)。它包括藥品信息維護(hù)：主要維護(hù)的是藥品的基本信息，對(duì)系統(tǒng)藥品的添加，刪除，修改。 藥品信息 如圖 。 圖 藥品分類維護(hù)：主要對(duì)藥品的分類進(jìn)行維 護(hù)，藥品分類按國(guó)家標(biāo)準(zhǔn)進(jìn)行，主要分為抗生素類，抗病毒類等 12類藥品。生產(chǎn)廠家信息維護(hù)：主要維護(hù)的是藥品的生產(chǎn)廠家的一些基本信息。數(shù)據(jù)字典維護(hù)：此功能主要是對(duì)系統(tǒng)本身的數(shù)據(jù)字典進(jìn)行維護(hù)，分為系統(tǒng)用戶，藥品單位，生產(chǎn)廠家，藥品分類，藥品批號(hào)五種。 藥品分類如圖 。 圖 本科生畢業(yè)設(shè)計(jì)（論文） 32 零售模塊 此模塊也是系統(tǒng)較為關(guān)鍵的模塊，面向藥店的銷售人員，它主要分為藥品銷售和醫(yī)生審核處方兩個(gè)部分。藥品銷售還可以分為非處方藥銷售，處 方藥銷售和顧客退藥三部分。非處方藥銷售：售藥人員將藥品條形碼（藥品編碼模擬 ）掃入計(jì)算機(jī)即可實(shí)現(xiàn)出售。處方藥銷售：首先需要藥店醫(yī)生審核該處方藥是否可以出售，如可以出售，輸入處方單號(hào)即可銷售。顧客退藥：如果該藥品可以退，需輸入購(gòu)買該藥品的小票號(hào)碼和藥品編碼即可。 采購(gòu)模塊 此模塊面向的是藥店采購(gòu)人員，首先在采購(gòu)之前，系統(tǒng)根據(jù)系統(tǒng)庫(kù)存上下限自動(dòng)生成采購(gòu)單，然后采購(gòu)員根據(jù)此采購(gòu)單進(jìn)行采購(gòu)。 藥品采購(gòu) 如圖 所示 。 圖 藥品采購(gòu)圖 入庫(kù)模塊 此模塊面向的是藥店的保管員，它分為藥品入庫(kù)和庫(kù)存盤點(diǎn)兩部分。藥品入庫(kù)：首先保管員根據(jù)采購(gòu)員發(fā)過(guò)來(lái)的采購(gòu)單自動(dòng)生成入庫(kù)單，經(jīng)過(guò)核查后進(jìn)行 入庫(kù)操作，登記到數(shù)據(jù)庫(kù)。庫(kù)存盤點(diǎn)：為了確保庫(kù)存藥品的安全，保管員要每月進(jìn)行一次盤點(diǎn)操作，主要對(duì)藥店庫(kù)存藥品進(jìn)行盤查核對(duì)，如果有出入，要報(bào)請(qǐng)領(lǐng)導(dǎo) 本科生畢業(yè)設(shè)計(jì)（論文） 33 處理。 統(tǒng)藥品入庫(kù)如圖 所示 。 圖 統(tǒng)計(jì)查詢模塊 此模塊主要由信息統(tǒng)計(jì)和信息查詢兩部分構(gòu)成。信息統(tǒng)計(jì)：完成了藥品信息的統(tǒng)計(jì)和藥品銷售信息的統(tǒng)計(jì)，以及各個(gè)時(shí)間段藥品銷售情況分析。信息查詢：完成了藥品信息，銷售信息，采購(gòu)信息，入庫(kù)信息的查詢?？梢愿鶕?jù)藥品的各種屬性進(jìn)行各種查詢。 信息統(tǒng)計(jì) 如圖 所 示 。 圖 信息統(tǒng)計(jì)圖 本科生畢業(yè)設(shè)計(jì)（論文） 34 確定 按扭代碼： Private Sub Command1_Click() Select Case Case 單一藥品 If = Then MsgBox 請(qǐng)輸入藥品編碼！ , 48, 提示 SendKeys {Home}+{End} Else Call danyitongji End If = Case 類藥品 If = Then MsgBox 請(qǐng)輸入藥品類 別！ , 48, 提示 SendKeys {Home}+{End} Else Call leitongji End If = Case 全部藥品 Call quanbutongji = End Select End Sub 2,查詢模塊 在此模塊中，用戶可以查詢藥店內(nèi)的所有藥品的信息 ,藥店近期的銷售 ,采購(gòu) ,入庫(kù)信息 .進(jìn)入模塊后 ,用戶可以選擇查詢意向 ,選擇什么就在對(duì)應(yīng)的位置添入查詢信息 ,每一類查詢都設(shè)置了很多的 方式 .也就是說(shuō)查詢關(guān)鍵字是什么 ,例如 ,藥品信息查詢可以按照藥品編碼 ,藥品名稱 ,藥品單位等 13種方式查詢 .還設(shè)有一個(gè)顯示信息的功能 ,也就是說(shuō)能夠控制您的查詢結(jié)果需要顯示的信息 ,相關(guān)的信息顯示出來(lái) ,不相關(guān)的信息就沒(méi)有必要顯示出來(lái) ,在此功能中 ,只要用戶選擇了什么 ,查詢結(jié)果就能夠顯 本科生畢業(yè)設(shè)計(jì)（論文） 35 示出什么 .在模塊的菜單中還可以進(jìn)行分類查詢 (針對(duì)藥品信息 )和顯示全部信息功能。 信息查詢?nèi)鐖D 所示 。 圖 信息查詢圖 銷售查詢確定按扭代碼： Private Sub Command1_Click() Dim a As Integer Dim b As String Dim i As Integer Dim j As Integer = True = True = True = False = False = False = False = False = False = False = False Select Case Case 售藥員代碼 本科生畢業(yè)設(shè)計(jì)（論文） 36 If = Then MsgBox 請(qǐng)輸入您要查詢的關(guān)鍵字！ , 48, 提示 Else = (售藥員代碼 like 39。 amp。 amp。 *39。) If = True Or = True Then MsgBox 沒(méi)有您想要查找的售藥員！ , 48, 提示 SendKeys {Home}+{End} End If a = For i = 1 To a = i b = (小票號(hào)碼 ) = (小票號(hào)碼 =39。 amp。 b amp。 39。) Next End If Case 藥品編碼 If = Then MsgBox 請(qǐng)輸入您要 查詢的關(guān)鍵字！ , 48, 提示 Else = (藥品編碼 like 39。 amp。 amp。 *39。) If = True Or = True Then MsgBox 沒(méi)有您想要查找的藥品！ , 48, 提示 SendKeys {Home}+{End} End If a = For i = 1 To a = i b = (小票號(hào)碼 ) = (小票號(hào)碼 =39。 amp。 b amp。 39。) Next End If Case 藥品售出日期 本科生畢業(yè)設(shè)計(jì)（論文） 37 = (藥品售出日期 = 39。 amp。 DTPicker1(1).Value amp。 39。) If = True Or = True Then MsgBox 沒(méi)有您想要查找的信息！ , 48, 提示 DTPicker1(1).SetFocus DTPicker1(1).Value = Date SendKeys {Home}+{End} End If a = For i = 1 To a = i b = (小票號(hào)碼 ) = (小票號(hào)碼 =39。 amp。 b amp。 39。) Next Case 小票號(hào)碼 If = Then MsgBox 請(qǐng)輸入您要查詢的關(guān)鍵字！ , 48, 提示 Else = (小票號(hào)碼 like 39。 amp。 amp。 *39。) If = True Or = True Then MsgBox 沒(méi)有您想要查找的信息！ , 48, 提示 SendKeys {Home}+{End} End If a = For i = 1 To a = i b = (小票號(hào)碼 ) = (小票號(hào)碼 =39。 amp。 b amp。 39。) Next End If Case 藥品優(yōu)惠額度 If = Then MsgBox 請(qǐng)輸入您要查詢的關(guān)鍵字！ , 48, 提示 Else 本科生畢業(yè)設(shè)計(jì)（論文） 38 = (藥品優(yōu)惠額度 like 39。 amp。 amp。 *39。) If = True Or = True Then MsgBox 沒(méi)有您想要查找的信息！ , 48, 提示 SendKeys {Home}+{End} End If a = For i = 1 To a = i b = (小票號(hào)碼 ) = (小票號(hào)碼 =39。 amp。 b amp。 39。) Next End If End Select End Sub 查詢模塊流程 圖如下所示 。 圖 查詢結(jié)構(gòu)流程圖 本科生畢業(yè)設(shè)計(jì)（論文） 39 第 6章 測(cè)試與調(diào)試 什么是軟件測(cè)試 為了保證軟件的質(zhì)量和可靠性，應(yīng)力求在分析、設(shè)計(jì)等各個(gè)開(kāi)發(fā)階段結(jié)束前，對(duì)軟件進(jìn)行技術(shù)評(píng)審。但由于人們能力的局限性，審查不能發(fā)現(xiàn)所有的錯(cuò)誤。這些錯(cuò)誤和缺陷如果遺留到軟件交付投入運(yùn)行時(shí)，終將匯暴露出來(lái)。但到那時(shí)，不僅改正這些錯(cuò)誤的代價(jià)更高，而且往往造成惡劣的后果。 軟件測(cè)試就是在軟件那投入運(yùn)行之前，對(duì)軟件需求分析、設(shè)計(jì)規(guī)格說(shuō)明和編碼的最終復(fù)審，是軟件質(zhì)量保證的關(guān)鍵步驟。如果需要給軟件測(cè)試下個(gè)定義，可以這樣講：軟件測(cè)試是為了發(fā)現(xiàn)錯(cuò)誤而 執(zhí)行程序的過(guò)程?；蛘哒f(shuō)，軟件測(cè)試是根據(jù)軟件開(kāi)發(fā)階段的規(guī)格說(shuō)明和程序的內(nèi)部結(jié)構(gòu)而精心設(shè)計(jì)一批用例（即輸入數(shù)據(jù)及其與其的結(jié)果）并利用這些測(cè)試用例去運(yùn)行程序，以發(fā)現(xiàn)程序錯(cuò)誤的過(guò)程。 因?yàn)椴豢赡苓M(jìn)行窮盡測(cè)試，所以測(cè)試不可能發(fā)現(xiàn)程序中的所有錯(cuò)誤，也就是說(shuō)，通過(guò)測(cè)試并不能說(shuō)明程序是正確的。但是，我們的目的是要通過(guò)測(cè)試保證軟件的可靠性，因此，必須仔細(xì)設(shè)計(jì)測(cè)試方案，力爭(zhēng)用盡可能少的方式發(fā)現(xiàn)盡可能多的錯(cuò)誤。本軟件在測(cè)試過(guò)程中發(fā)現(xiàn)很多錯(cuò)誤，雖然已經(jīng)修改，但是仍然不敢說(shuō)是完美的。希望用戶在使用中發(fā)現(xiàn)錯(cuò)后及時(shí)與本人聯(lián)系以便改正。 測(cè)試方法選擇 因?yàn)槊總€(gè)模塊完成一個(gè)單獨(dú)的功能，與同級(jí)的其它模塊之間沒(méi)有相互依賴的關(guān)系，所以，有可能把每個(gè)模塊作為一個(gè)單獨(dú)的實(shí)體來(lái)測(cè)試，而且通常比較容易設(shè)計(jì)檢驗(yàn)?zāi)K正確性的測(cè)試方案。模塊測(cè)試的目的是保證每個(gè)模塊作為一個(gè)單元能正確運(yùn)行，所以模塊測(cè)試通常又稱為單元測(cè)試。 子系統(tǒng)測(cè)試是把經(jīng)過(guò)單元測(cè)試的模塊放在一起形成一個(gè)子系統(tǒng)來(lái)測(cè)試。模塊相互間的協(xié)調(diào)和通信是這個(gè)測(cè)試過(guò)程中的主要問(wèn)題，因此這個(gè)步驟著重測(cè)試模塊的接口。 系統(tǒng)測(cè)試是把經(jīng)過(guò)測(cè)試的子系統(tǒng)裝配成一個(gè)完整的 系統(tǒng)來(lái)測(cè)試。在這個(gè)過(guò)程 本科生畢業(yè)設(shè)計(jì)（論文） 40 中不僅應(yīng)該發(fā)現(xiàn)社的錯(cuò)誤，還應(yīng)該驗(yàn)證系統(tǒng)確