【正文】 MDIForm_Unload(Cancel As Integer) 2. If vbMinimized Then 3. SaveSetting , Settings, MainLeft, 4. SaveSetting , Settings, MainTop, 5. SaveSetting , Settings, MainWidth, 6. SaveSetting , Settings, MainHeight, 7. End If 8. End Sub 9. Private Sub mnuAbout_Click() 39。T） mnuOUTStore 按業(yè)務(wù)員查詢（ amp。T） mnuINStore 按業(yè)務(wù)員查詢（ amp。Q） mnuDetail Ctrl+F6 查詢（ amp。O） mnuOUTOrders Ctrl+F3 銷售單（ amp。I） mnuIN 進(jìn)貨訂 單（ amp。S） mnuSupp Ctrl+S 客戶（ amp。B） mnuBase 藥品類別（ amp。S） mnuSystem 修改密碼（ amp。 添加菜單欄 接下來(lái)介紹為主窗體添加菜單欄的步驟。 制作該主窗體的步驟如下： （ 1） 打開(kāi) Visual 中文版，新建一個(gè)標(biāo)準(zhǔn)工程，向工程中添加一個(gè)MDIForm 窗體，設(shè)置其名稱屬性為“ frmMain“，標(biāo)題為“濟(jì)世藥業(yè)進(jìn)銷存管理系統(tǒng)”。在“企業(yè)管理器”左側(cè)的數(shù)據(jù)庫(kù)列表中找到“ MedicineJXC”，右鍵單擊該數(shù)據(jù)庫(kù)，在彈出的快捷菜單中選擇“新建 /表”命令，將打開(kāi)如圖 419 所示的對(duì)話框，在該對(duì)話框中輸入列名、數(shù)據(jù)類型、長(zhǎng)度等內(nèi)容。 （ 4） 單擊“事務(wù)日志”選項(xiàng)卡，設(shè)置事務(wù)日志文件的保存位置為 C： \醫(yī)藥進(jìn)銷存 \DATA”，并設(shè)置數(shù)據(jù)文件名為“ ”，如圖 418所示。 本章介紹在 MS SQL Server2021 中創(chuàng)建數(shù)據(jù)庫(kù)的另一種方法 —— 使用企業(yè)管理器在圖形界面中創(chuàng)建數(shù)據(jù)庫(kù)和表。在 MS SQL Server2021 中創(chuàng)建該表的 SQL 語(yǔ)句如下： CREATE TABLE [dbo] . [jxc_in] ( [in_date] [smalldatetime] NOT NULL , /*訂貨日期 */ [in_saler] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*業(yè)務(wù)員 */ [in_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*入庫(kù)單號(hào) */ [sup_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*供應(yīng)商編號(hào) */ [st_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*倉(cāng)庫(kù)編號(hào) */ [_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*藥品編號(hào) */ [_enddate] [smalldatetime] NULL, /*有效期 */ [in_amount] [float] NULL , /*數(shù)量 */ [in_price] [float] NULL , /*單價(jià) */ [in_discount] [float] NULL , /*折扣 */ [in_total] [float] NULL , /*金額 */ [in_cash] [char] (20) COLLATE Chinese_PRC_CI_AS NULL , /*支付方式 */ [in_arr] [char] (2) COLLATE Chinese_PRC_CI_AS NULL , /*是否記賬 */ [in_rate] [float] NULL , /*預(yù)付比例 */ 18 [in_memo] [nvarchar] (255) COLLATE Chinese_PRC_CI_AS NULL, /*備注 */ ) ON [PRIMARY] （ 11） jxc_out（銷售單）表：用于保存藥品銷售出庫(kù)信息，該表包括 15 個(gè)字段，分別用來(lái)保存銷售日期、業(yè)務(wù)員、銷售單號(hào)、客戶編號(hào)、倉(cāng)庫(kù)編號(hào)、藥品編號(hào)、有效期、數(shù)量、單價(jià)等信息。在 MS SQL Server2021 中創(chuàng)建該表的 SQL 語(yǔ)句如下： CREATE TABLE [dbo] . [jxc_sales] ( [sl_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*編號(hào) */ [sl_name] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NOT NULL, /*姓名 */ [sl_type] [char] (20) COLLATE Chinese_PRC_CI_AS NULL , /*業(yè)務(wù)員類別 */ [sl_tele] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL, /*電話 */ [sl_address] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL, /*地址 */ [sl_carid] [char] (18) COLLATE Chinese_PRC_CI_AS NULL , /*身份證號(hào) */ [sl_typeid] [char] (14) COLLATE Chinese_PRC_CI_AS NULL , /*類別 編號(hào) */ [sl_memo] [nvarchar] (255) COLLATE Chinese_PRC_CI_AS NULL, /*備注 */ ) ON [PRIMARY] （ 7） jxc_store（倉(cāng)庫(kù)信息）表：用于保存公司各倉(cāng)庫(kù)的信息，該表包括 3 個(gè)字段，分別用來(lái)保存?zhèn)}庫(kù)編號(hào)、名稱和備注等信息。在MS SQL Server2021 中創(chuàng)建該表的 SQL 語(yǔ)句如下： CREATE TABLE [dbo] . [jxc_cust] ( [_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*客戶編號(hào) */ [_name] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NOT NULL, /*客戶名稱 */ [_address] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL, /*地址 */ [_post] [char] (6) COLLATE Chinese_PRC_CI_AS NULL , /*郵政編號(hào) */ [_tele] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL, /*聯(lián)系電話 */ [_] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL, /*網(wǎng)址 */ [_linker] [char] (20) COLLATE Chinese_PRC_CI_AS NULL , /*聯(lián)系人 */ [_] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL, /*電子郵件 */ [_taxno] [nvarchar] (40) COLLATE Chinese_PRC_CI_AS NULL, /*稅號(hào) */ [_bankno] [nvarchar] (40) COLLATE Chinese_PRC_CI_AS NULL, /*銀行賬號(hào) */ [_bank] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL, /*開(kāi)戶銀行 */ [_memberID] [char] (14) COLLATE Chinese_PRC_CI_AS NULL , /*會(huì)員卡號(hào) */ [_discount] [float] NULL , /*折扣比例 */ [_memo] [nvarchar] (255) COLLATE Chinese_PRC_CI_AS NULL, /*備注 */ ) ON [PRIMARY] （ 4） jxc_supp（供應(yīng)商信息）表：用于保存供應(yīng)商的各項(xiàng)信息。在 MS SQL Server2021 中創(chuàng)建該表的 SQL 語(yǔ)句如下： CREATE TABLE [dbo] . [jxc_type] ( [bigtype] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*大類編號(hào) */ [bigname] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NOT NULL , /*大類編號(hào) */ [type] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*大類編號(hào) */ [name] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NOT NULL , /*大類編號(hào)*/ [memo] [nvarchar] (255) COLLATE Chinese_PRC_CI_AS NOT NULL /*備注 */ ) ON [PRIMARY] （ 2） jxc_CommName（藥品信息）表：用于保存銷售藥品的各項(xiàng)信息。 銷 售 日 期備 注金 額折 扣單 價(jià)數(shù) 量 有 效 期日 期業(yè) 務(wù) 員客 戶藥 品銷 售 日 期記 賬支 付 方 式金 額折 扣數(shù) 量 有 效 期日 期業(yè) 務(wù) 員倉(cāng) 庫(kù)藥 品單 價(jià)供 應(yīng) 商預(yù) 付 比 例備 注 圖 57： 銷售訂單的 E=R 圖 圖 58： 入庫(kù)單的 ER 圖 ? 銷售單實(shí)體的 ER 圖，如圖 59 所示。下面將分別介紹這 9 個(gè)實(shí)體的 ER 圖，通過(guò) ER 圖了解各實(shí)體的屬性。 數(shù)據(jù)庫(kù)分析 本系統(tǒng)由 VB6+MS SQL Server2021 數(shù)據(jù)庫(kù)構(gòu)成，本項(xiàng)目選擇使用數(shù)據(jù)庫(kù)MS SQL Server2021 系統(tǒng)的原因有： ? MS SQL Server2021 作為一個(gè)大型的數(shù)據(jù)庫(kù)系統(tǒng)，具備現(xiàn)代數(shù)據(jù)庫(kù)管理系統(tǒng)所需求的各種強(qiáng)大功能。 ? 對(duì)用戶輸入的數(shù)據(jù)，系統(tǒng)進(jìn)行嚴(yán)格的數(shù)據(jù)檢驗(yàn)，盡可能排除認(rèn)為輸入錯(cuò)誤。 ? 能管理進(jìn)貨訂單、銷售訂單。 10 第四章 系統(tǒng)設(shè)計(jì) 系統(tǒng)目標(biāo) 根據(jù)需求分析的描述及與用戶的溝通，最終確定系統(tǒng)要實(shí)現(xiàn)的目標(biāo)如下。這種方式的有點(diǎn)是自定義屬性可由程序員設(shè)置有意義的名稱。 2. 使用窗體屬性傳遞參數(shù) 可通過(guò)窗體屬性傳遞，比如使用 屬性傳遞參數(shù)。但是其缺點(diǎn)也是顯而易見(jiàn)的。常用的幾種參數(shù)傳遞方法有如下幾種。 ? Tvwlast1：該節(jié)點(diǎn)置于任何其他的在 relative 中被命名的同一級(jí)別的節(jié)點(diǎn)后面： ? TvwNext2：該節(jié)點(diǎn)置于在 relative 中被命名的節(jié)點(diǎn)的后面： ? tvwPrevius3：該節(jié)點(diǎn)置于在 relative 中被命名的節(jié)點(diǎn)的前面： ? tvwChild4：該節(jié)點(diǎn)成為在 relative 中被命名的節(jié)點(diǎn)的子節(jié)點(diǎn)。如圖 45 所示顯示了具有兩個(gè)根節(jié)點(diǎn)的樹，其中第 1 個(gè)根節(jié)點(diǎn)又有兩個(gè)子節(jié)點(diǎn)。 系統(tǒng)目標(biāo) 醫(yī)藥進(jìn)銷存系統(tǒng)的目標(biāo)是：實(shí)現(xiàn)藥品進(jìn)、銷、存數(shù)據(jù)的信息化管理，提高藥品的周轉(zhuǎn)率，同時(shí)提高資金的利用率，提高藥品進(jìn)銷存信息的查詢效率，提高藥品進(jìn)銷存數(shù)據(jù)存儲(chǔ)的可靠性、保密性、降低管理成本，減少人力物力資源。 1. 引言 某醫(yī)藥公司為了能加強(qiáng)對(duì)藥品銷售的管理，提高藥品流通效率、使資金利用率更高，為了提高庫(kù)房人員管理進(jìn)銷 存數(shù)據(jù)的效率，計(jì)劃開(kāi)發(fā)醫(yī)藥進(jìn)銷存系統(tǒng)。 2. 進(jìn)貨管理 ? 進(jìn)貨訂單管理； ? 入庫(kù)管理。 使用計(jì)算機(jī)對(duì)藥品的入庫(kù)、銷售、庫(kù)存數(shù)據(jù)進(jìn)行管理，具有手工管理所無(wú)法比擬的優(yōu)點(diǎn) ， 例如：檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、