【導(dǎo)讀】步由工業(yè)社會進(jìn)入信息社會。信息技術(shù)是當(dāng)代最具潛力的新的生產(chǎn)力，信。息資源是經(jīng)濟(jì)和社會發(fā)展的重要戰(zhàn)略資源。信息化成為各國經(jīng)濟(jì)和科技競。隨著我國市場經(jīng)濟(jì)的迅速發(fā)展和加入WTO，企業(yè)信息化程。很多單位對計算機(jī)信息管理專業(yè)人才需求越來越大。被調(diào)查單位普遍反映。性信息管理人才。

　　

【正文】 else jg(1)= ENDI ENDF ENDI IF VAL(SUBS(STR(hj,10,2),2,1))=0 IF VAL(SUBS(STR(hj,10,2),1,1))=0 jg(2)= ELSE jg(2)=chp(10) ENDI ELSE FOR i=1 TO 10 IF VAL(SUBS(STR(hj,10,2),2,1))=i jg(2)=chp(i)+rmb(2) ENDI ENDF ENDI IF VAL(SUBS(STR(hj,10,2),3,1))=0 IF VAL(SUBS(STR(hj,10,2),1,1))=(SUBS(STR(hj,10,2),2,1))=0 IF VAL(SUBS(STR(hj,10,2),2,1))=0 jg(3)= ELSE 39 jg(3)=chp(10) ENDI ELSE jg(3)=rmb(3) ENDI ELSE FOR i=1 TO 10 IF VAL(SUBS(STR(hj,10,2),3,1))=i jg(3)=chp(i)+rmb(3) ENDI ENDF ENDI IF VAL(SUBS(STR(hj,10,2),4,1))=0 IF VAL(SUBS(STR(hj,10,2),3,1))=0 jg(4)= ELSE jg(4)=chp(10) ENDI ELSE FOR i=1 TO 10 IF VAL(SUBS(STR(hj,10,2),4,1))=i jg(4)=chp(i)+rmb(4) ENDI ENDF ENDI IF VAL(SUBS(STR(hj,10,2),5,1))=0 IF VAL(SUBS(STR(hj,10,2),4,1))=0 jg(5)= ELSE 40 jg(5)=chp(10) ENDI ELSE FOR i=1 TO 10 IF VAL(SUBS(STR(hj,10,2),5,1))=i jg(5)=chp(i)+rmb(5) ENDI ENDF ENDI IF VAL(SUBS(STR(hj,10,2),6,1))=0 IF VAL(SUBS(STR(hj,10,2),5,1))=0 jg(6)= ELSE jg(6)=chp(10) ENDI ELSE FOR i=1 TO 10 IF VAL(SUBS(STR(hj,10,2),6,1))=i jg(6)=chp(i)+rmb(6) ENDI ENDF ENDI IF VAL(SUBS(STR(hj,10,2),7,1))=0 IF VAL(SUBS(STR(hj,10,2),6,1))=0 jg(7)= ENDI ELSE FOR i=1 TO 10 IF VAL(SUBS(STR(hj,10,2),7,1))=i 41 jg(7)=chp(i) ENDI ENDF ENDI IF VAL(SUBS(STR(hj,10,2),9,1))=0 IF VAL(SUBS(STR(hj,10,2),10,1))=0 jg(9)= ELSE IF HJ0 jg(9)=CHP(10) ELSE jg(9)= ENDI ENDI ELSE FOR i=1 TO 9 IF VAL(SUBS(STR(hj,10,2),9,1))=i jg(9)=chp(i)+RMB(9) ENDI ENDF ENDI IF VAL(SUBS(STR(hj,10,2),9,1))=0 jg(10)= ENDI FOR i=1 TO 10 IF VAL(SUBS(STR(hj,10,2),10,1))=i jg(10)=chp(i)+rmb(10) ENDI ENDF 42 IF hj=1 if int(hj)=hj jg(8)=rmb(7)+整 ELSE JG(8)=RMB(7) ENDI ELSE jg(8)=rmb(8) ENDI FOR i=1 TO 10 hjd=ALLT(hjd)+ALLT(jg(i)) ENDF retu hjd 菜單用生成器生成，主要的 程序代碼如下： * ********************************************************* * * * * 菜單定義 * * * ********************************************************* * SET SYSMENU TO SET SYSMENU AUTOMATIC DEFINE PAD _2670ujj0q OF _MSYSMENU PROMPT 系統(tǒng)設(shè)定 COLOR SCHEME 3 DEFINE PAD _2670ujj0r OF _MSYSMENU PROMPT 藥品出入庫 COLOR SCHEME 3 DEFINE PAD _2670ujj0s OF _MSYSMENU PROMPT 藥品管理 COLOR SCHEME 3 DEFINE PAD _2670ujj0t OF _MSYSMENU PROMPT 幫助 COLOR SCHEME 3 ON PAD _2670ujj0q OF _MSYSMENU ACTIVATE POPUP 系統(tǒng)設(shè)定 43 ON PAD _2670ujj0r OF _MSYSMENU ACTIVATE POPUP 藥品出入庫 ON PAD _2670ujj0s OF _MSYSMENU ACTIVATE POPUP 藥品管理 DEFINE POPUP 系統(tǒng)設(shè)定 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF 系統(tǒng)設(shè)定 PROMPT 人員管理 DEFINE BAR 2 OF 系統(tǒng)設(shè)定 PROMPT 期初錄入 DEFINE BAR 3 OF 系統(tǒng)設(shè)定 PROMPT 退出 ON SELECTION BAR 1 OF 系統(tǒng)設(shè)定 do form scx\ ON SELECTION BAR 2 OF 系統(tǒng)設(shè)定 do form scx\ ON SELECTION BAR 3 OF 系統(tǒng)設(shè)定 do prg\ DEFINE POPUP 藥品出入庫 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF 藥品出入庫 PROMPT 藥品出庫 DEFINE BAR 2 OF 藥品出入庫 PROMPT 藥品入庫 DEFINE BAR 3 OF 藥品出入庫 PROMPT 藥品到藥房 DEFINE BAR 4 OF 藥品出入庫 PROMPT \ DEFINE BAR 5 OF 藥品出入庫 PROMPT 個人完成任務(wù)查詢 ON SELECTION BAR 1 OF 藥品出入庫 do form scx\ck ON SELECTION BAR 2 OF 藥品出入庫 do form scx\gr ON SELECTION BAR 3 OF 藥品出入庫 do form scx\ykdyf ON SELECTION BAR 5 OF 藥品出入庫 do form scx\dwcx DEFINE POPUP 藥品管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF 藥品管理 PROMPT 藥品出入庫帳簿 DEFINE BAR 2 OF 藥品管理 PROMPT 調(diào)整價格 DEFINE BAR 3 OF 藥品管理 PROMPT 藥品分類 DEFINE BAR 4 OF 藥品管理 PROMPT \ DEFINE BAR 5 OF 藥品管理 PROMPT 打印清資表 DEFINE BAR 6 OF 藥品管理 PROMPT 購藥計劃 44 DEFINE BAR 7 OF 藥品 管理 PROMPT 銷售藥品統(tǒng)計 DEFINE BAR 8 OF 藥品管理 PROMPT 整理數(shù)據(jù) ON SELECTION BAR 1 OF 藥品管理 do form scx\ypzhb ON SELECTION BAR 2 OF 藥品管理 do form scx\tj ON SELECTION BAR 3 OF 藥品管理 do form scx\lb ON SELECTION BAR 5 OF 藥品管理 do prg\程序 ON SELECTION BAR 6 OF 藥品管理 do form scx\jyjh ON SELECTION BAR 7 OF 藥品管理 do form scx\tongj ON SELECTION BAR 8 OF 藥品管理 do form scx\modifydata 附錄二（維護(hù)說明書和程序清單名） 一個系統(tǒng)，不可能完善。當(dāng)記錄的變動，政策的改變，都要改變系統(tǒng)的結(jié)構(gòu)與方法，所以這里只列出部分表、程序、表單、報表的文件名稱。 保存客戶信息 臨時出庫數(shù)據(jù)存儲 出庫主文件 庫存主文件 庫存輔助文件 臨時購入數(shù)據(jù)存儲 購入主文件 賬簿文件 保存藥品類別 保存用戶信息 程序文件 主程序文件 備份文件 解密文件 加密文件 表單文件 45 出庫表單 入庫表單 購藥查詢 賬簿表單 類別錄入表單 新藥錄入表單 藥品查詢表單 人員管理表單 參考文獻(xiàn) [1]. Visual C++ 信息管理系統(tǒng)開發(fā)實例導(dǎo)航 人民郵電出版社 [2]. 薩師煊 數(shù)據(jù)庫系統(tǒng)概論 高等教育出版社 [3]. 李師賢，李文軍，周曉聰 面向?qū)ο蟪绦蛟O(shè)計基礎(chǔ) 高等教育出版社 [4]. 施伯樂等編著 . 數(shù)據(jù)庫系統(tǒng)教程 . 高等教育出版社 , 1999.