社區(qū)醫(yī)院藥品管理信息系統(tǒng)畢業(yè)論文

1、摘摘 要要 20 世紀(jì)末，隨著計(jì)算機(jī)科學(xué)的發(fā)展，商務(wù)電算化已經(jīng)成為一個(gè)趨勢(shì)，藥品的銷 售管理也不例外。本文研究了一種基于 vb 編程技術(shù)的社區(qū)醫(yī)院藥品管理信息系統(tǒng)， 此方案與現(xiàn)今醫(yī)藥銷售部門已采用的一些方案相比，具有用戶使用更人性化、界面 更直觀、系統(tǒng)結(jié)構(gòu)靈活等優(yōu)點(diǎn)。 論文主要介紹了基于 vb 編程技術(shù)的社區(qū)醫(yī)院藥品信息管理系統(tǒng)。本系統(tǒng)主要由 6 大部分模塊組成，分別是：用戶管理模塊，出入庫(kù)管理模塊，過(guò)期藥品管理模塊， 庫(kù)存查詢模塊，基表管理維護(hù)模塊。 本文在第一章說(shuō)明了醫(yī)院藥品信息管理系統(tǒng)的系統(tǒng)框架和總體設(shè)計(jì). 介紹了開(kāi) 發(fā)工具的選擇,并敘述了 windows 下的 vb6.0 編程環(huán)境。在

2、接下來(lái)的幾章中介紹了我 所完成功能模塊的結(jié)構(gòu)和功能以及具體設(shè)計(jì)過(guò)程。最后對(duì)本次畢業(yè)設(shè)計(jì)做出了總結(jié)。 關(guān)鍵字：關(guān)鍵字：信息管理系統(tǒng)；藥品管理；vb。 abstract end of 20th centuries, along with the development of the computer, the business electric calculator turn to have already become a trend, the sale management of the drugs is no exception. this text studied a kind of ac

3、cording to pb the plait distance technique of medicine entering to sell and to save the information management system, some projects that this project and present medicine sale departments already adopt compare, having the customer usage more humanized, the interface even keep the view, the system s

4、tructure vivid etc. advantage. the thesis mainly introduced according to the pb the medicine of the plait distance technique enters to sell and to save the information management system, that system is gathered into and sell, saved in integral whole, still gathering at the same time finance manageme

5、nt, statistics to search etc. function. this system mainly from 6 big and parts of molds pieces constitute, respectively is: the mold piece of the foundation information manages , sale management, store in warehouse to manage, stock management, the finance management, constitution management. the re

6、alization of the concrete function makes use of the pb plait distance technique. this text introduced a system frame and total designs that explained the medicine to enter to sell and to save the information management system. the choice of development tool, and described the windows under of pb6.0

7、plait distance environments. introduced the structure and functions and concretly design processes of the function mold piece that i completes in next several chapterses. did to this graduation design finally summary. keykey words:words: the system of information management, gathered into and sell,

8、saved in integral whole, the humanization design, pb 目錄目錄 目錄目錄.iv 引引 言言 .- 1 - 第一章第一章 系統(tǒng)結(jié)構(gòu)系統(tǒng)結(jié)構(gòu) .- 2 - 1.1 系統(tǒng)框架.- 2 - 1.1.1 系統(tǒng)結(jié)構(gòu)圖- 2 - 1.1.2 各功能模塊進(jìn)行簡(jiǎn)述:- 2 - 1.2 開(kāi)發(fā)工具研究.- 3 - 1.2.1 開(kāi)發(fā)工具的選擇- 3 - 1.3windows下的 vb6.0 編輯環(huán)境的簡(jiǎn)介 .- 5 - 1.3.1 面向?qū)ο蟮木幊? 5 - 1.3.2 實(shí)現(xiàn)菜單選項(xiàng)- 5 - 1.3.3 組合框（combo box）控件- 6 - 1.3.4 mdi

9、 窗口的使用- 6 - 第二章第二章 系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn) .- 7 - 2.1 模塊功能描述.- 7 - 2.1.1 信息管理模塊設(shè)計(jì)- 7 - 2.1.2 信息管理模塊 adodc 數(shù)據(jù)對(duì)象使用- 7 - 2.2 用戶信息管理模塊.- 8 - 2.2.1 數(shù)據(jù)處理功能設(shè)計(jì)與實(shí)現(xiàn)- 8 - 2.2.2 入庫(kù)管理模塊- 10 - 2.2.3 出庫(kù)管理模塊- 10 - 2.2.3 庫(kù)存查詢管理模塊- 11 - 2.2.4 過(guò)期藥品管理模塊- 12 - 2.2.5 免費(fèi)藥品發(fā)放模塊- 12 - 2.2.6 基表信息管理模塊- 13 - 第三章第三章 入庫(kù)管理模塊設(shè)計(jì)與實(shí)現(xiàn)入庫(kù)管理模塊設(shè)計(jì)與

10、實(shí)現(xiàn) .- 14 - 3.1 模塊功能描述.- 14 - 3.1.1 業(yè)務(wù)流程設(shè)計(jì)- 14 - 3.2 入庫(kù)登記模塊.- 14 - 3.2.1 入庫(kù)登記模塊流程設(shè)計(jì)- 14 - 3.2.2 關(guān)鍵技術(shù)- 15 - 3.2.3 入庫(kù)登記模塊的實(shí)現(xiàn)- 15 - 3.3 庫(kù)存查詢模塊.- 19 - 3.3.1 設(shè)計(jì)思路- 19 - 3.3.2 庫(kù)存查詢模塊實(shí)現(xiàn)- 19 - 第四章第四章 基表維護(hù)設(shè)計(jì)與實(shí)現(xiàn)基表維護(hù)設(shè)計(jì)與實(shí)現(xiàn) .- 22 - 4.1 模塊功能描述.- 22 - 4.1.1 基本信息管理模塊流程圖- 22 - 4.2 用戶設(shè)置模塊.- 22 - 4.2.1 設(shè)計(jì)思路- 22 - 4.2.2

11、 密碼設(shè)置模塊的實(shí)現(xiàn)- 22 - 4.3 醫(yī)療保險(xiǎn)設(shè)置模塊.- 24 - 4.3.1 設(shè)計(jì)思想- 24 - 4.4 過(guò)期藥品清理模塊.- 25 - 4.4.1 設(shè)計(jì)思想- 25 - 結(jié)束語(yǔ).- 28 - 致謝致謝 .- 28 - 參考文獻(xiàn)參考文獻(xiàn) .- 29 - 引引 言言 隨著我國(guó)經(jīng)濟(jì)的蓬勃發(fā)展和人們對(duì)醫(yī)藥產(chǎn)品需求的迅速增加，醫(yī)藥行業(yè)正處于 一個(gè)高速發(fā)展的時(shí)期。行業(yè)的快速發(fā)展必然導(dǎo)致競(jìng)爭(zhēng)的加劇，要想在激烈的市場(chǎng)競(jìng) 爭(zhēng)中謀求發(fā)展，客觀上要求企業(yè)必須加強(qiáng)內(nèi)部管理，提高運(yùn)營(yíng)效率。另外，由于醫(yī) 藥產(chǎn)品種類繁多、銷售模式特殊、業(yè)務(wù)量大，單憑手工記賬已遠(yuǎn)遠(yuǎn)適應(yīng)不了企業(yè)的 快速發(fā)展的需求?？梢哉f(shuō)，沒(méi)有信息

12、化的醫(yī)藥管理幾乎是不可想象的。 基于這個(gè)大潮流的驅(qū)使之下，國(guó)內(nèi)外藥品信息管理系統(tǒng)相繼推出。它們最大的 共同點(diǎn)是：系統(tǒng)功能強(qiáng)大，系統(tǒng)界面華麗，業(yè)務(wù)流程趨向于復(fù)雜化。由于社區(qū)醫(yī)院 藥品管理銷售的主要群體集中在一個(gè)或幾個(gè)社區(qū)范圍之內(nèi)，必須具備低成本、系統(tǒng) 結(jié)構(gòu)靈活、設(shè)計(jì)人性化、功能實(shí)用化、用戶界面操作簡(jiǎn)潔等特性的醫(yī)院藥品信息管 理系統(tǒng)成為市場(chǎng)需求的主流。 為了實(shí)現(xiàn)醫(yī)藥管理工作的信息化，本著用戶使用更人性化、界面更直觀、系統(tǒng) 結(jié)構(gòu)靈活的理念，同時(shí)為管理者和業(yè)務(wù)員提供一個(gè)集進(jìn)、銷、存于一體的平臺(tái)。根 據(jù)學(xué)習(xí)相關(guān)的軟件開(kāi)發(fā)知識(shí)及以相關(guān)軟件的使用和設(shè)計(jì)原理，通過(guò)對(duì)系統(tǒng)管理員， 藥品管理員，藥房銷售主管以及對(duì)

13、部分銷售人員的調(diào)研。提出相應(yīng)的設(shè)計(jì)方案。 “社區(qū)醫(yī)院藥品信息管理系統(tǒng)”是針對(duì)社區(qū)醫(yī)院藥庫(kù)綜合業(yè)務(wù)而設(shè)計(jì)的藥品管 理系統(tǒng)。該軟件集進(jìn)、銷、存于一體，查詢統(tǒng)計(jì)功能齊全，真正實(shí)現(xiàn)了進(jìn)、銷、存 信息化的管理。本軟件的前臺(tái)采用目前普及率較高的面向?qū)ο缶幊陶Z(yǔ)言 vb6.0 開(kāi)發(fā)， 后臺(tái)采用 access2000 數(shù)據(jù)庫(kù)。軟件界面簡(jiǎn)單直觀，軟件運(yùn)行較為穩(wěn)定。 在下面的正文部分將對(duì)社區(qū)醫(yī)院藥品管理系統(tǒng)的開(kāi)發(fā)過(guò)程、所涉及到的問(wèn)題及 解決方法進(jìn)行詳細(xì)說(shuō)明。 第一章第一章 系統(tǒng)結(jié)構(gòu)系統(tǒng)結(jié)構(gòu) 1.11.1 系統(tǒng)框架系統(tǒng)框架 本系統(tǒng)主要由用戶管理、入庫(kù)管理模塊，出庫(kù)管理模塊，庫(kù)存查詢模塊，過(guò)期藥品管理， 免費(fèi)藥品發(fā)放、

14、基表維護(hù)模塊。 1.1.11.1.1 系統(tǒng)結(jié)構(gòu)圖系統(tǒng)結(jié)構(gòu)圖 圖圖 1-11-1 社區(qū)醫(yī)院藥品信息管理系統(tǒng)結(jié)構(gòu)圖社區(qū)醫(yī)院藥品信息管理系統(tǒng)結(jié)構(gòu)圖 1.1.21.1.2 各功能模塊進(jìn)行簡(jiǎn)述各功能模塊進(jìn)行簡(jiǎn)述: : (1)基表信息管理模塊 主要功能是完成藥品基本信息的管理，包括藥品代碼編制、合作醫(yī)療信息設(shè)置， 以藥品代碼信息管理為例：對(duì)所使用的藥品進(jìn)行編制簡(jiǎn)寫(xiě)代碼，這樣在不同的模塊 中即可輸入所使用藥品的簡(jiǎn)化代碼，從事將將使用者從繁重的輸入藥品名稱的工作 中解放出來(lái)，以便更好的管理系統(tǒng)信息。 (2)入庫(kù)管理模塊： 入庫(kù)管理主要完成藥品入庫(kù)等信息的管理，可根據(jù)所采購(gòu)藥品信息進(jìn)行入庫(kù)處 理，入庫(kù)藥品信息分

15、為三類，一類是西藥、中成藥，二類是草藥及器械，三類是免 費(fèi)藥品?？煞诸悓⒁陨细黝愃幤返怯浫霂?kù)。藥品采用簡(jiǎn)化代碼來(lái)登入名稱，簡(jiǎn)化了 流程，也保證了輸入中的正確性。 (3)出庫(kù)藥品管理模塊： 主要完成藥品出庫(kù)信息的管理，藥品同樣分為同上三類藥品，這里的出庫(kù)分為 社 區(qū) 醫(yī) 院 藥 品 管 理 基表信息 出庫(kù)管理 入庫(kù)管理 用戶管理 庫(kù)存查詢 藥品代 碼信息 出庫(kù) 登記 入庫(kù) 登記 藥庫(kù) 查詢 添加 用戶 合作醫(yī) 療設(shè)置 銷售 出庫(kù) 庫(kù)存 查詢 修改 庫(kù)存 合作醫(yī) 療計(jì)費(fèi) 藥械 查詢 免費(fèi)藥 品查詢 修改 權(quán)限 編輯 信息 過(guò)期藥品管理 藥庫(kù) 清理 刪除 過(guò)期 免費(fèi)藥 品清理 兩類，一類是院內(nèi)調(diào)拔，

16、如將批量藥品調(diào)行病房藥庫(kù)，另一類是日常的銷售性出庫(kù)。 日常銷售性出庫(kù)同時(shí)按醫(yī)療保險(xiǎn)制度對(duì)藥品直接進(jìn)行計(jì)費(fèi)。 (4)庫(kù)存查詢模塊： 庫(kù)存查詢模塊主要對(duì)藥品庫(kù)存信息進(jìn)行綜合查詢，以便對(duì)庫(kù)存性況進(jìn)行盤點(diǎn)， 針對(duì)不同的查詢類別，構(gòu)建查詢字段進(jìn)行查詢。 (5)過(guò)期藥品清理模塊： 無(wú)論對(duì)于哪一類藥品，當(dāng)過(guò)期時(shí)不能出庫(kù)，所以所有類別的藥品都設(shè)置了失效 標(biāo)記，本模塊根據(jù)出廠日期和過(guò)期日期，設(shè)置失效標(biāo)記，并對(duì)過(guò)期藥品進(jìn)行過(guò)濾， 清除掉過(guò)期的藥品，被清理的藥品不能出庫(kù)。 (6)用戶管理模塊： 主要管理所使用系統(tǒng)的用戶及期操作權(quán)限，用戶具有不同的安全級(jí)別。用戶分 為超級(jí)用戶和普通用戶，對(duì)于超級(jí)用戶擁有全部權(quán)限，可執(zhí)

17、行一切操作;對(duì)于普通用 戶在清理過(guò)期藥品和修改庫(kù)存等模塊中受到限制。主要包括密碼設(shè)置、權(quán)限設(shè)置,可 完成對(duì)當(dāng)前用戶密碼、權(quán)限的設(shè)置，對(duì)當(dāng)前用戶信息進(jìn)行添加、修改、刪除。 1.21.2 開(kāi)發(fā)工具研究開(kāi)發(fā)工具研究 基于本系統(tǒng)的需求分析的需要，開(kāi)發(fā)本系統(tǒng)采用的是面向?qū)ο蟮某绦蛟O(shè)計(jì)技術(shù)。 在操作系統(tǒng)上選用 microsoft windows 的操作平臺(tái)作為系統(tǒng)開(kāi)發(fā)環(huán)境,前臺(tái)采用 vb6.0 較為普遍的面向?qū)ο蟮某绦蜷_(kāi)發(fā)語(yǔ)言，后對(duì)數(shù)據(jù)庫(kù)采用 access2000 這一較為簡(jiǎn)單的 數(shù)據(jù)庫(kù)做為數(shù)據(jù)容器，對(duì)方面程序開(kāi)，后期若有更高需求，可升遷。 1.2.11.2.1 開(kāi)發(fā)工具的選擇開(kāi)發(fā)工具的選擇 micros

18、oft 公司推出的 windows 應(yīng)用程序開(kāi)發(fā)工具vb6.0，是目 前較為廣泛的面向?qū)ο蟮拈_(kāi)發(fā)工具，vb6.0 是基于 microsoft windows 系列操作平臺(tái)下的功能強(qiáng)大的程序開(kāi)發(fā)環(huán)境。它具有 c 語(yǔ)言和 c+語(yǔ)言 的靈活性，而且它的開(kāi)發(fā)環(huán)境又采用了面向?qū)ο?、消息映射等編程機(jī)制， 通過(guò)使用一種巧妙的方式將 windows 的編程以類的形式封裝起來(lái)，使用 戶用起來(lái)更實(shí)用更方便等。 其主要功能特點(diǎn)有： (1)中文版本 完全中文化的環(huán)境使用戶更容易操作，用戶能在很短的時(shí)間里就可 以熟悉 vb6.0 的開(kāi)發(fā)環(huán)境。 (2)具有面向?qū)ο蟮拈_(kāi)發(fā)工具 在 vb6.0 中，采用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法

19、，將程序和數(shù)據(jù)封裝起 來(lái)視為一個(gè)類，每個(gè)類都是封裝的。這樣使數(shù)據(jù)更具有安全性。用戶在 設(shè)計(jì)時(shí)需要熟悉所要使用的類，既可以在 mfc 下進(jìn)行直觀的操作，又可 以在 win32 環(huán)境下進(jìn)行實(shí)際的手寫(xiě)代碼設(shè)計(jì)。 (3)消息映射的編程機(jī)制 在編寫(xiě)程序代碼時(shí)，各個(gè)程序段之間不一定有聯(lián)系，但只要通過(guò) vb 提供的消息映射機(jī)制就可以使兩個(gè)代碼段之間發(fā)生關(guān)聯(lián)，使程序既易于 編寫(xiě)又易于維護(hù)，符合人們正常的，習(xí)慣的思維方法，從而更方便于復(fù) 雜問(wèn)題的解決。 (4)具有語(yǔ)句生成器和快速提示幫助 語(yǔ)句生成器和快速提示幫助使用戶不必記憶很多的屬性和成員函數(shù)， 并在較短的時(shí)間內(nèi)就可以開(kāi)發(fā)出功能強(qiáng)大的應(yīng)用程序，通過(guò) vb6.

20、0 提供 的類庫(kù)幫助，來(lái)熟悉所要使用的類的功能。從而在開(kāi)發(fā)設(shè)計(jì)過(guò)程中，能 起到事半功倍的效果。 (5)支持多種數(shù)據(jù)庫(kù)系統(tǒng)的訪問(wèn) 利用數(shù)據(jù)庫(kù)控件或者 odbc 能夠連接訪問(wèn)的數(shù)據(jù)庫(kù)系統(tǒng)有， microsoft access、microsoft sql server，oracle，等.但是在具體 的開(kāi)發(fā)過(guò)程中，選擇哪種數(shù)據(jù)庫(kù)和數(shù)據(jù)源，應(yīng)根據(jù)具體軟件開(kāi)發(fā)的需要 和本人的實(shí)際情況來(lái)決定，由于本系統(tǒng)并不是很復(fù)雜，出于做為做畢業(yè) 設(shè)計(jì)這一研究的需要故采用較為簡(jiǎn)單易于掌握的 access2000 做為后數(shù) 據(jù)庫(kù)。 (6)而 vb 語(yǔ)言又是軟件市場(chǎng)上非常流行專業(yè)的開(kāi)發(fā)語(yǔ)言之一，隨著 計(jì)算機(jī)技術(shù)的飛速發(fā)展，計(jì)算

21、機(jī)的程序設(shè)計(jì)語(yǔ)言也得到了迅猛的發(fā)展， 但是在開(kāi)發(fā)軟件之前究竟選擇哪種程序設(shè)計(jì)語(yǔ)言，應(yīng)根據(jù)具體的程序開(kāi) 發(fā)需要和所在的軟件開(kāi)發(fā)團(tuán)隊(duì)的需要，以及本人對(duì)計(jì)算機(jī)程序設(shè)計(jì)語(yǔ)言 掌握的熟練程度來(lái)決定，目前在軟件開(kāi)發(fā)市場(chǎng)上，java,vb 等程序設(shè)計(jì) 語(yǔ)言成為面向?qū)ο笤O(shè)計(jì)的主流的開(kāi)發(fā)語(yǔ)言。故而，由于以上各原因，本 系統(tǒng)在開(kāi)發(fā)過(guò)程中采用 vb 程序設(shè)計(jì)語(yǔ)言。 1.3windows1.3windows 下的下的 vb6.0vb6.0 編輯環(huán)境的簡(jiǎn)介編輯環(huán)境的簡(jiǎn)介 1.3.11.3.1 面向?qū)ο蟮木幊堂嫦驅(qū)ο蟮木幊?vb6.0 應(yīng)用程序基本的構(gòu)建模塊是用戶所創(chuàng)建的對(duì)象，每一個(gè)對(duì)象都具有一定 的特性和成員函數(shù)，開(kāi)發(fā)

22、人員可以根據(jù)實(shí)際需要繼承系統(tǒng)所提供的類或者自己創(chuàng)建 的類來(lái)定義每一個(gè)對(duì)象。類與類之間可以通過(guò)聲明消息映射，這樣可以類所定義的 對(duì)象之間能夠傳遞消息。使應(yīng)用程序具有可通用性、可擴(kuò)展性同時(shí)具有了強(qiáng)大的功 能。 1.3.21.3.2 實(shí)現(xiàn)菜單選項(xiàng)實(shí)現(xiàn)菜單選項(xiàng) 菜單是軟件開(kāi)發(fā)過(guò)程中應(yīng)用的重要的工具之一，大多數(shù)程序都依賴一個(gè)定義良 好的菜單使程序易于使用和維護(hù)，vb6.0 提供了強(qiáng)大的創(chuàng)建菜單功能使程序更加標(biāo) 準(zhǔn)，使用戶能夠更方便、更直觀的訪問(wèn)這些命令，菜單的使用價(jià)值越來(lái)越被軟件開(kāi) 發(fā)人員喜愛(ài)和接受。 1.3.31.3.3 組合框（組合框（combocombo boxbox）控件）控件 組合框（comb

23、o box）控件是組合了文本框和列表框的特性而形成的控件。其中 的列表框列出了可供用戶選擇的項(xiàng)，另外還有一個(gè)正文框，用戶可以選中列表框中 某項(xiàng)，也可在文本框中輸入內(nèi)容。組合框（combo box）有三種不同的風(fēng)格，即下拉 式組合框、簡(jiǎn)單組合框和下拉式列表框，其風(fēng)格可由具體的編程語(yǔ)言進(jìn)行設(shè)定和改 變。 1.3.41.3.4 mdimdi 窗口的使用窗口的使用 mdi 柜架結(jié)合了父窗口和子窗口，使用所有模塊共同存在一個(gè)父窗口容器中， 這樣做易于構(gòu)造一個(gè)多模塊多任務(wù)的信息管理系統(tǒng)，易于多模塊協(xié)作，也使管理系 統(tǒng)更加合理有效。vb6.0 提供了此類用戶接口，使用系統(tǒng)人需求分析到設(shè)計(jì)實(shí)現(xiàn)方 便快捷而有效

24、。 第二章第二章 系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn) 2.12.1 模塊功能描述模塊功能描述 主要功能是完成社區(qū)醫(yī)院藥品信息的管理，包括用戶管理、入庫(kù)管理模塊， 出庫(kù)管理模塊，庫(kù)存查詢模塊，過(guò)期藥品管理，免費(fèi)藥品發(fā)放、基表維護(hù)模塊 等模塊。 2.1.12.1.1 信息管理模塊設(shè)計(jì)信息管理模塊設(shè)計(jì) 信息管理模塊業(yè)務(wù)流程圖如圖 2-1 所示： 圖圖 2-12-1 藥品信息管理模塊流程圖藥品信息管理模塊流程圖 2.1.22.1.2 信息管理模塊信息管理模塊 adodcadodc 數(shù)據(jù)對(duì)象使用數(shù)據(jù)對(duì)象使用 adodc 數(shù)據(jù)對(duì)象是 datagrid 控件取得數(shù)據(jù)的橋梁，通過(guò)設(shè)置 adodc 的連接 字符，即可

25、建立與后臺(tái)數(shù)據(jù)庫(kù)之間的聯(lián)系，通過(guò) sql 語(yǔ)句將取得的數(shù)據(jù)庫(kù)存放 于 recordset 中，之后 datagrid 控件通過(guò) datasource 屬性取得數(shù)據(jù)，同時(shí) adodc 對(duì)像也是控件操作數(shù)據(jù)庫(kù)表的得利助手，使用 adodc 對(duì)象不但減少了數(shù)據(jù) 往反的麻煩，也為前臺(tái)提供了操作控制后臺(tái)數(shù)據(jù)庫(kù)的便利。所以本系統(tǒng)主要使 用 adodc 對(duì)像控制后臺(tái)數(shù)據(jù)庫(kù)。 2.22.2 用戶信息管理模塊用戶信息管理模塊 主要管理醫(yī)院藥庫(kù)管理人員信息，可給用戶分配不同的權(quán)限，以便使用戶在系 統(tǒng)中以不同的身份使用系統(tǒng)，從安全的角度來(lái)考慮，這不但可以最大限度的保證數(shù) 據(jù)安全，又可以各司其職各負(fù)其責(zé)，從而可以有效

26、地對(duì)用戶信息進(jìn)行管理。 2.2.12.2.1 數(shù)據(jù)處理功能設(shè)計(jì)與實(shí)現(xiàn)數(shù)據(jù)處理功能設(shè)計(jì)與實(shí)現(xiàn) 在用戶信息管理模塊的界面中，提供了對(duì)數(shù)據(jù)刪除、增加和修改等功能， 為此 藥品信息管理 入庫(kù)藥品管理出庫(kù)藥品管理庫(kù)存藥品查詢用戶管理 登記藥品 入庫(kù)信息 登記出庫(kù) 藥品信息 查詢各類 藥品庫(kù)存 清理各類 過(guò)期藥品 過(guò)期藥品管理免費(fèi)藥品發(fā)放 編輯免費(fèi) 發(fā)放藥品 編輯管理 用戶信息 加入添加、刪除、更新 3 個(gè)按鈕；添加用戶時(shí)要注意其在系統(tǒng)中的權(quán)限，以使之可 以根據(jù)安全需要來(lái)使用系統(tǒng)，以保證系統(tǒng)數(shù)據(jù)的安全性。效果圖如下： (1)添加、更新功能 由于前文已做敘述前臺(tái)在與后數(shù)據(jù)庫(kù)進(jìn)行交換數(shù)據(jù)是使用 vb6.0 提

27、供的 adodc 對(duì)像進(jìn)行的，所以其相應(yīng)代碼較為簡(jiǎn)單：如下： /添加部分： private sub command4_click() datagrid1.allowupdate = true adodc1.recordset.addnew end sub /更新部分： private sub command2_click() adodc1.recordset.updatebatch end sub 可見(jiàn)，只是使用 adodc 對(duì)象的方法，實(shí)現(xiàn)起來(lái)較為簡(jiǎn)單，也易于理解。 （2）刪除功能: 由于刪除操作相對(duì)于數(shù)據(jù)庫(kù)表來(lái)說(shuō)較為危險(xiǎn)，容易產(chǎn)生不可挽回的誤操作，所 以在刪除代碼中加入了刪除前的提醒過(guò)程，

28、以防止產(chǎn)生誤操作： /數(shù)據(jù)刪除 private sub command1_click() on error goto err1 dim respond as string with adodc1 respond = msgbox(當(dāng)前用戶將要被刪除，繼續(xù)嗎？, 4, 特別警告) if respond = vbyes then datagrid1.allowdelete = true .recordset.delete .recordset.update datagrid1.refresh datagrid1.allowdelete = false end if end with exit su

29、b err1: msgbox 數(shù)據(jù)庫(kù)已空或選擇了無(wú)效的數(shù)據(jù)！ end sub 圖圖 2-32-3 用戶信息管理刪除操作用戶信息管理刪除操作 2.2.22.2.2 入庫(kù)管理模塊入庫(kù)管理模塊 在藥品入庫(kù)登記模塊，可針對(duì)三類藥品進(jìn)行分類登記，并可以輸入藥品名稱時(shí) 以簡(jiǎn)化代碼的開(kāi)式進(jìn)行輸入，較為方便，使用戶從繁重的輸入工作中解放出來(lái)，也 減少了出現(xiàn)錯(cuò)誤的機(jī)率。如圖： 2.2.32.2.3 出庫(kù)管理模塊出庫(kù)管理模塊 出庫(kù)管理模塊，出庫(kù)分為兩類，一類是院內(nèi)調(diào)拔，如批量藥品調(diào)拔到病房藥庫(kù)， 另一類是銷售性質(zhì)的出庫(kù)，此類出庫(kù)應(yīng)按醫(yī)療保險(xiǎn)政策對(duì)患進(jìn)行相應(yīng)的報(bào)銷，并進(jìn) 行藥費(fèi)進(jìn)行計(jì)算。 每一類出庫(kù)都應(yīng)對(duì)藥品進(jìn)行是

30、否到期檢驗(yàn)，以保證出庫(kù)的藥品都是有效，并能 對(duì)根據(jù)庫(kù)存量自動(dòng)進(jìn)行關(guān)統(tǒng)計(jì)計(jì)算。 如圖： 2.2.32.2.3 庫(kù)存查詢管理模塊庫(kù)存查詢管理模塊 庫(kù)存查詢是系統(tǒng)的一個(gè)設(shè)計(jì)核心模塊，在本模塊中查詢是否靈活，直接體現(xiàn)本 系統(tǒng)設(shè)計(jì)是否科學(xué)，是否人性化，是不是能給信息管理帶來(lái)便利。 因此，在本模塊中設(shè)計(jì)了可能查詢所有藥品類別的庫(kù)存情況，且查詢字段多樣， 靈活，可以自己組建查詢條件，如下圖： 2.2.42.2.4 過(guò)期藥品管理模塊過(guò)期藥品管理模塊 過(guò)期藥品是必須不能流出庫(kù)存的，必須在庫(kù)存盤點(diǎn)進(jìn)將其清理，以便在管理員 的安排下做出適當(dāng)?shù)奶幚?，否則出庫(kù)到患者手中，會(huì)對(duì)患者的健康造成傷害的，如 下圖： 2.2.5

31、2.2.5 免費(fèi)藥品發(fā)放模塊免費(fèi)藥品發(fā)放模塊 免費(fèi)藥品是根據(jù)上級(jí)政策，派發(fā)給患者，免費(fèi)藥品對(duì)于重大疾病的控制是十分 重要的，因此，在對(duì)這類藥品的管理中要十分重視，確保發(fā)放中的完全免費(fèi)，在本 模塊設(shè)計(jì)中，對(duì)藥品類別進(jìn)行判斷，對(duì)于此類藥品，免收一切費(fèi)用。 還對(duì)患者參加的醫(yī)療保在藥品銷售中加進(jìn)運(yùn)用，使藥品銷售性出庫(kù)中進(jìn)行按比 便報(bào)銷，報(bào)銷比例按上級(jí)政策執(zhí)行，執(zhí)行標(biāo)準(zhǔn)可在基表維護(hù)中加以設(shè)置，如下圖： 2.2.62.2.6 基表信息管理模塊基表信息管理模塊 基表信息維護(hù)模塊，包括藥品簡(jiǎn)化代碼的設(shè)置，用戶信息管理，醫(yī)療保險(xiǎn)比列 設(shè)置。這此基表信息是系統(tǒng)中其他模塊運(yùn)行的基礎(chǔ)，直接關(guān)系到系統(tǒng)的整體表現(xiàn)， 所以

32、基表應(yīng)根據(jù)實(shí)際需要設(shè)計(jì)，并能隨時(shí)根據(jù)現(xiàn)實(shí)情況進(jìn)行相應(yīng)變更，如下圖： 第三章第三章 入庫(kù)管理模塊設(shè)計(jì)與實(shí)現(xiàn)入庫(kù)管理模塊設(shè)計(jì)與實(shí)現(xiàn) 3.13.1 模塊功能描述模塊功能描述 入庫(kù)管理主要完成三類藥品入庫(kù)登記，并根據(jù)出廠日期和失效日期，設(shè)置數(shù) 據(jù)庫(kù)中的失效標(biāo)記，以完成藥品的入庫(kù)，方便管理人員對(duì)藥品進(jìn)行管理。 3.1.13.1.1 業(yè)務(wù)流程設(shè)計(jì)業(yè)務(wù)流程設(shè)計(jì) 入庫(kù)管理模塊業(yè)務(wù)流程如圖 3-1 所示： 圖圖 3-13-1 入庫(kù)管理模塊業(yè)務(wù)流程圖入庫(kù)管理模塊業(yè)務(wù)流程圖 3.23.2 入庫(kù)登記模塊入庫(kù)登記模塊 根據(jù)醫(yī)院采購(gòu)藥品進(jìn)行入庫(kù)登記。可自動(dòng)生成入庫(kù)編號(hào)，自動(dòng)根據(jù)出廠日期和 失效期設(shè)置失效標(biāo)記。 3.2.1

33、3.2.1 入庫(kù)登記模塊流程設(shè)計(jì)入庫(kù)登記模塊流程設(shè)計(jì) (1)入庫(kù)登記模塊數(shù)據(jù)流程如圖 3-2 所示。 藥品（簡(jiǎn)碼）入庫(kù) 入庫(kù)登記 查看代碼 入庫(kù)明細(xì)表 庫(kù)存表 代碼明細(xì)表 代碼表 圖圖 3-2 入庫(kù)登記模塊數(shù)據(jù)流程圖入庫(kù)登記模塊數(shù)據(jù)流程圖 3.2.23.2.2 關(guān)鍵技術(shù)關(guān)鍵技術(shù) (1)藥品名稱簡(jiǎn)化代碼輸入，自動(dòng)填充其他信息。 其原理是在后臺(tái)數(shù)據(jù)庫(kù)建立藥品名稱簡(jiǎn)化代碼庫(kù)，并在入庫(kù)登記窗口中，當(dāng)用 戶輸入藥品名稱簡(jiǎn)化代碼后，從數(shù)據(jù)庫(kù)簡(jiǎn)化代碼表中查詢相應(yīng)藥品名稱其他信息并 填寫(xiě)到相應(yīng)控件中，供管理系統(tǒng)進(jìn)一步使用。 (2)藥品功用有效性控制。 藥品在入庫(kù)登記時(shí)，即根據(jù)廠家信息提供出廠日期和失效日期，并

34、據(jù)此在數(shù)據(jù) 庫(kù)表中設(shè)置失效標(biāo)記，以便在藥品失效時(shí)及時(shí)進(jìn)行清理。 3.2.33.2.3 入庫(kù)登記模塊的實(shí)現(xiàn)入庫(kù)登記模塊的實(shí)現(xiàn) 由于入庫(kù)登記子模塊與后臺(tái)數(shù)據(jù)庫(kù)交換數(shù)據(jù)，都使用數(shù)據(jù)對(duì)象控件 adodc 和 recordset 進(jìn)行操作，所以訪問(wèn)數(shù)據(jù)庫(kù)就變得易于操控。 (1)藥品名稱簡(jiǎn)化代碼輸入實(shí)現(xiàn)： private sub text1_change() on error goto err3 with adodc2 .recordsource = select * from & frmmain.kcode & where 編號(hào)= & text1.text & .refresh if .recordse

35、t.absoluteposition adposunknown then 庫(kù)存信息表 藥品簡(jiǎn)碼表 用戶輸入 簡(jiǎn)化代碼 入庫(kù)登記信 息表 text2.text = .recordset.fields(3) text18.text = .recordset.fields(2) text18.locked = true label23.forecolor = &hff& label23.caption = 已經(jīng)找到 & text1.text & 這個(gè)代碼! with adodc1 .recordsource = select * from & frmmain.datas & where 編號(hào)= &

36、text1.text & .refresh if .recordset.absoluteposition adposunknown then command1.enabled = false if .recordset.fields(數(shù)量) 0 then command2.enabled = false combo1.text = text3.text = text4.text = text5.text = text6.text = text7.text = text17.text = 請(qǐng)?zhí)顚?xiě)備注 msgbox 該藥品或器械庫(kù)存結(jié)余，不能繼續(xù)入庫(kù)！ text1.locked = false t

37、ext18.locked = false text18.text = text1.text = else label23.forecolor = &hff0000 label23.caption = 庫(kù)存 & text18.text & 已空,請(qǐng)?jiān)黾訋?kù)存量! combo1.locked = true command2.enabled = true text4.locked = true text5.locked = true text2.text = .recordset.fields(規(guī)格) combo1.text = .recordset.fields(單位) text3.text = .

38、recordset.fields(數(shù)量) text4.text = .recordset.fields(進(jìn)價(jià)) text5.text = .recordset.fields(零售價(jià)) text6.text = .recordset.fields(產(chǎn)地) text7.text = .recordset.fields(批號(hào)) end if else label23.forecolor = &hff0000 label23.caption = 庫(kù)房中沒(méi)有 & text18.text & ,請(qǐng)?zhí)砑有缕贩N! command2.enabled = false command1.enabled = true

39、 combo1.locked = false text4.locked = false text5.locked = false combo1.text = text3.text = text4.text = text5.text = text6.text = text17.text = 請(qǐng)?zhí)顚?xiě)備注 end if end with else command1.enabled = false command2.enabled = false label23.forecolor = &h12& label23.caption = 代碼庫(kù)中沒(méi)有 & text1.text & 這個(gè)代碼,應(yīng)先編制代碼!

40、 end if end with exit sub err3: msgbox 輸入了非法字符或數(shù)據(jù)項(xiàng)填寫(xiě)不完整！ end sub （2）藥品功用有效性控制： private sub command2_click() 庫(kù)存過(guò)期藥品必須清理后才能入庫(kù) dim rq1 as string dim rq2 as string dim rq3 as string on error goto err2 with adodc1 .recordsource = select * from & frmmain.datas & where 編號(hào)= & text1.text & .refresh if .recor

41、dset.fields(失效標(biāo)記) = false then if .recordset.absoluteposition adposunknown then .recordset.fields(規(guī)格) = text2.text .recordset.fields(單位) = combo1.text .recordset.fields(數(shù)量) = text3.text .recordset.fields(進(jìn)價(jià)) = text4.text .recordset.fields(進(jìn)價(jià)合計(jì)) = (text3.text) * (text4.text) .recordset.fields(零售價(jià)) =

42、text5.text .recordset.fields(零售合計(jì)) = (text3.text) * (text5.text) .recordset.fields(產(chǎn)地) = text6.text .recordset.fields(批號(hào)) = text7.text .recordset.fields(差額) = (.recordset.fields(零售合計(jì)) - (.recordset.fields(進(jìn)價(jià)合計(jì)) rq1 = text8.text & - & text9.text & - & text10.text .recordset.fields(采購(gòu)日期) = cdate(rq1)

43、rq2 = text11.text & - & text12.text & - & text13.text .recordset.fields(出廠日期) = cdate(rq2) rq3 = text14.text & - & text15.text & - & text16.text .recordset.fields(失效期) = cdate(rq3) .recordset.fields(備注) = text17.text .recordset.updatebatch end if command2.enabled = false text1.enabled = true text18.

44、enabled = true label23.caption = else msgbox 該庫(kù)存藥品已經(jīng)失效，須清理后才能入庫(kù)！ end if end with exit sub err2: msgbox 登記項(xiàng)目填寫(xiě)不全或數(shù)據(jù)類型不匹配！ end sub 執(zhí)行效果如下圖： 3.33.3 庫(kù)存查詢模塊庫(kù)存查詢模塊 主要負(fù)責(zé)查詢社區(qū)醫(yī)院藥庫(kù)中藥品的信息?？砂床煌侄尾煌瑮l件查詢庫(kù)存信 息。支持模糊查詢及在結(jié)果中查詢。顯示各品種藥品的庫(kù)存信息 3.3.13.3.1 設(shè)計(jì)思路設(shè)計(jì)思路 該模塊的設(shè)計(jì)思路與基礎(chǔ)信息查詢模塊設(shè)計(jì)思路相近，不同的地方主要是查詢 字段名與數(shù)據(jù)表不同。 3.3.23.3.2 庫(kù)

45、存查詢模塊實(shí)現(xiàn)庫(kù)存查詢模塊實(shí)現(xiàn) 庫(kù)存查詢模塊，主要是動(dòng)態(tài)生成查詢條件，并根據(jù)查詢條件對(duì)數(shù)據(jù)庫(kù)表進(jìn)行查 詢，并將查詢的結(jié)果實(shí)時(shí)顯示在控制中，實(shí)現(xiàn)如下： private sub text2_change() on error goto err2 with adodc1 select case combo1.text case 藥品銷售 .recordsource = select * from ypxs where & text1.text & like & text2.text & % .refresh datagrid1.columns(0).visible = false case 醫(yī)院藥品

46、庫(kù) .recordsource = select * from kcyp where & text1.text & like & text2.text & % .refresh datagrid1.columns(0).visible = false case 中草藥庫(kù) .recordsource = select * from caoyao where & text1.text & like & text2.text & % .refresh datagrid1.columns(0).visible = false case 醫(yī)療器材庫(kù) .recordsource = select * fr

47、om qixie where & text1.text & like & text2.text & % .refresh datagrid1.columns(0).visible = false case 藥品調(diào)撥 .recordsource = select * from ypdb where & text1.text & like & text2.text & % .refresh datagrid1.columns(0).visible = false case 住院病人 .recordsource = select 住院證號(hào),患者姓名,性別,年齡,地址,病種,科室類別,病 房號(hào),床位號(hào)

48、,主治大夫,住院日期,出院日期,預(yù)交費(fèi),費(fèi)用合計(jì),操作員 from zyf where & text1.text & like & text2.text & % .refresh datagrid1.columns(0).visible = false end select end with exit sub err2: msgbox 輸入條件錯(cuò)誤或輸入值類型不匹配！ end sub 圖圖 3-83-8 入庫(kù)查詢界面入庫(kù)查詢界面 第四章第四章 基表維護(hù)設(shè)計(jì)與實(shí)現(xiàn)基表維護(hù)設(shè)計(jì)與實(shí)現(xiàn) 4.14.1 模塊功能描述模塊功能描述 基表維護(hù)管理主要管理與系統(tǒng)設(shè)置有關(guān)的內(nèi)容。主要包括用戶密碼設(shè)置、權(quán)限 設(shè)置

49、、藥品代碼、醫(yī)療保險(xiǎn)報(bào)銷比例設(shè)置、過(guò)期藥品清理等。 4.1.14.1.1 基本信息管理模塊流程圖基本信息管理模塊流程圖 基表維護(hù)模塊業(yè)務(wù)流程如圖 4-1 所示。 基 表 維 護(hù) 管 理 用戶管理設(shè)置 藥品代碼設(shè)置 過(guò)期藥品清理 醫(yī)療保險(xiǎn)設(shè)置 用戶添加、權(quán)限控制 保險(xiǎn)比例控制 清理過(guò)藥藥品 藥品代碼分類填寫(xiě) 圖圖 4-14-1 系統(tǒng)設(shè)置管理模塊業(yè)務(wù)流程圖系統(tǒng)設(shè)置管理模塊業(yè)務(wù)流程圖 4.24.2 用戶設(shè)置模塊用戶設(shè)置模塊 主要功能是設(shè)置當(dāng)前用戶的密碼。工作流程是：設(shè)置當(dāng)前用戶的密碼，密碼效 驗(yàn)通過(guò)，完成密碼設(shè)置操作。 4.2.14.2.1 設(shè)計(jì)思路設(shè)計(jì)思路 (1)判斷密碼是否合理。 (2)修改數(shù)據(jù)

50、庫(kù)中的密碼。 4.2.24.2.2 密碼設(shè)置模塊的實(shí)現(xiàn)密碼設(shè)置模塊的實(shí)現(xiàn) (1)設(shè)置密碼 (2)編輯用戶 密碼設(shè)置窗體如圖： 表表 4-14-1 密碼設(shè)置窗體資源設(shè)置圖密碼設(shè)置窗體資源設(shè)置圖 (2)實(shí)現(xiàn)刪除按鈕 用戶單擊【刪除】按鈕時(shí)，必須允許用戶進(jìn)行確認(rèn)，避免產(chǎn)生誤操作，代碼如 下： private sub command1_click() on error goto err1 dim respond as string with adodc1 respond = msgbox(當(dāng)前用戶將要被刪除，繼續(xù)嗎？, 4, 特別警告) if respond = vbyes then datagrid

51、1.allowdelete = true .recordset.delete .recordset.update datagrid1.refresh datagrid1.allowdelete = false end if end with exit sub err1: msgbox 數(shù)據(jù)庫(kù)已空或選擇了無(wú)效的數(shù)據(jù)！ end sub (2)權(quán)限設(shè)置： 權(quán)限設(shè)置為 0 表示超級(jí)用戶，1 為普通用戶，超級(jí)用戶擁有全部權(quán)限，普通 用戶只具有部分權(quán)限，在系統(tǒng)中受到限制。如下圖： 圖圖 4-24-2 密碼設(shè)置模塊界面密碼設(shè)置模塊界面 4.34.3 醫(yī)療保險(xiǎn)設(shè)置模塊醫(yī)療保險(xiǎn)設(shè)置模塊 主要功能是完成依據(jù)上級(jí)政

52、策設(shè)置在藥品銷售中醫(yī)療保險(xiǎn)報(bào)銷的比例，這關(guān)系 到出庫(kù)模塊的計(jì)算藥費(fèi)，如下圖： 4.3.14.3.1 設(shè)計(jì)思想設(shè)計(jì)思想 考慮到目前各醫(yī)院在執(zhí)行醫(yī)保中存在各種各樣的情況，所以我在設(shè)計(jì)中只不過(guò) 進(jìn)行了一種設(shè)計(jì)上的嘗試，點(diǎn)到為止，日后若有需要我會(huì)根據(jù)實(shí)際情況增加本模塊 的權(quán)重。 4.4 過(guò)期藥品清理模塊過(guò)期藥品清理模塊 藥品在庫(kù)存中根據(jù)日期變化，會(huì)因長(zhǎng)時(shí)間沒(méi)有出庫(kù)而逐漸失效，而失效藥品是 不能出庫(kù)要，要及時(shí)進(jìn)行清理。 4.4.14.4.1 設(shè)計(jì)思想設(shè)計(jì)思想 （1）根據(jù)出廠日期和過(guò)期日期設(shè)置失效標(biāo)記。 （2）檢查數(shù)據(jù)庫(kù)表中的失效標(biāo)記 如下圖： （1）檢查失效日期，并設(shè)置失效標(biāo)記 代碼： public s

53、ub guolu() datagrid1.allowupdate = true on error goto err0 with adodc1 .recordsource = select * from & frmmain.datas .refresh for i = 0 to .recordset.recordcount if not .recordset.eof then if .recordset.fields(失效期) = date then .recordset.fields(失效標(biāo)記) = true .recordset.updatebatch else .recordset.fie

54、lds(失效標(biāo)記) = false .recordset.updatebatch end if .recordset.movenext end if next .recordsource = select * from & frmmain.datas & where 失效標(biāo)記=true .refresh label1.caption = combo2.text & 中過(guò)期或報(bào)廢共： & .recordset.recordcount & 種 datagrid1.allowupdate = false set datagrid1.datasource = adodc1 datagrid1.colu

55、mns(0).visible = false if combo2.text 免費(fèi)藥品 then datagrid1.columns(17).visible = false datagrid1.columns(進(jìn)價(jià)).numberformat = 0.00 datagrid1.columns(進(jìn)價(jià)合計(jì)).numberformat = 0.00 datagrid1.columns(零售價(jià)).numberformat = 0.00 datagrid1.columns(零售合計(jì)).numberformat = 0.00 datagrid1.columns(差額).numberformat = 0.00

56、 end if datagrid1.columns(1).width = 1000 datagrid1.columns(2).width = 1200 datagrid1.columns(3).width = 1200 datagrid1.columns(4).width = 600 datagrid1.columns(5).width = 600 datagrid1.columns(6).width = 600 end with exit sub err0: msgbox 數(shù)據(jù)庫(kù)已空 dfdf 或連接失??！ end sub （2） 代碼： private sub command4_click

57、() dim respond as string on error goto err4 with adodc1 respond = msgbox(本操作將清理所有過(guò)期報(bào)廢藥品記錄，繼續(xù)嗎？, 4, 特別警 告) if respond = vbyes then .recordsource = select * from & frmmain.datas & where 失效標(biāo)記=true .refresh .recordset.movefirst for i = 0 to .recordset.recordcount - 1 .recordset.fields(數(shù)量) = 0 if combo2.

58、text 免費(fèi)藥品 then .recordset.fields(進(jìn)價(jià)) = 0 .recordset.fields(進(jìn)價(jià)合計(jì)) = 0 .recordset.fields(零售價(jià)) = 0 .recordset.fields(零售合計(jì)) = 0 .recordset.fields(差額) = 0 end if .recordset.movenext .recordset.updatebatch next end if end with exit sub err4: msgbox 數(shù)據(jù)庫(kù)已空或選擇了無(wú)效的數(shù)據(jù)！ end sub 結(jié)束語(yǔ)結(jié)束語(yǔ) 本次畢業(yè)設(shè)計(jì)研究了 pb6.0 程序開(kāi)發(fā)技術(shù)，通過(guò)系

59、統(tǒng)設(shè)計(jì)，對(duì)面向?qū)ο缶幊踢@ 個(gè)編程思想有更進(jìn)一步的理性認(rèn)識(shí)。實(shí)現(xiàn)了 vb 語(yǔ)言在系統(tǒng)設(shè)計(jì)領(lǐng)域上的應(yīng)用和 access2000 數(shù)據(jù)庫(kù)在系統(tǒng)開(kāi)發(fā)時(shí)的應(yīng)用。實(shí)現(xiàn)了客戶和后臺(tái)管理人員登錄和保持相 對(duì)安全性。 本次畢業(yè)設(shè)計(jì)為基于 vb 技術(shù)的社區(qū)醫(yī)院藥品信息管理系統(tǒng),我所完成的模塊實(shí) 現(xiàn)了如下幾部分功能: 1.實(shí)現(xiàn)了對(duì)基礎(chǔ)信息的管理。 建立一個(gè)信息管理模塊,對(duì)信息進(jìn)行查詢、增修、改刪除等操作。做到數(shù)據(jù)的準(zhǔn) 確性,減輕管理人員負(fù)擔(dān)。 2.實(shí)現(xiàn)了對(duì)入庫(kù)信息的管理 實(shí)現(xiàn)了入貨、退貨的登記與查詢。建立數(shù)據(jù)提示對(duì)話框，實(shí)現(xiàn)了業(yè)務(wù)流程的人 性化。建立了票號(hào)的自動(dòng)生成機(jī)制，實(shí)現(xiàn)了數(shù)據(jù)的準(zhǔn)確性 3.實(shí)現(xiàn)了對(duì)系統(tǒng)設(shè)置信息

60、的管理 不但實(shí)現(xiàn)了密碼、權(quán)限、用戶的設(shè)置，處于隊(duì)安全的考慮，而且保證了相對(duì)的 安全性。 由于時(shí)間關(guān)系,以及自身能力有限。系統(tǒng)的功能未完全實(shí)現(xiàn)，如系統(tǒng)設(shè)置模塊的 數(shù)據(jù)備份、數(shù)據(jù)恢復(fù)功能的數(shù)據(jù)存取路徑問(wèn)題沒(méi)有得到解決。沒(méi)有系統(tǒng)幫助功能。 這些都需要進(jìn)一步的改進(jìn)和完善。 致謝致謝 在此感謝在畢業(yè)設(shè)計(jì)過(guò)程中，給予我畢業(yè)設(shè)計(jì)指導(dǎo)的全體畢業(yè)設(shè)計(jì)組的全 體老師，其中尤其感謝我的輔導(dǎo)老師，對(duì)我畢業(yè)設(shè)計(jì)的悉心指導(dǎo)。 感謝在我畢業(yè)設(shè)計(jì)過(guò)程中給予我?guī)椭挠?jì)算機(jī)系同學(xué)，對(duì)于我畢業(yè)設(shè)計(jì)的 大力的幫助和技術(shù)支持。 參考文獻(xiàn)參考文獻(xiàn) 1 王小茹, 吳財(cái)軍編著. visual basic 6.0 實(shí)例解析m.北京大學(xué)出版社，