【正文】 27 第七章 詳細設計 設計基本數(shù)據(jù)模塊 “基本數(shù)據(jù)”模塊用來管理系統(tǒng)經(jīng)常引用的數(shù)據(jù)，如藥品、供應商、客戶、業(yè)務員、倉庫等數(shù)據(jù)。 ? 第 1519 行的函數(shù)用來根據(jù)系統(tǒng)當前時間，生成一個隨機的序號。 vbCrLf amp。user id=sa。如果連接標記為真，則返回。得到當前時間 17 Randomize 18 GenNo = GenNo amp。卸載登錄窗體 12 Set fMainForm = New frmMain 39。應用程序標題 7 vbModal 39。定義主窗體類型 2 Public UserName As String 39。在本例中，有的窗體初始化時就要顯示數(shù)據(jù)庫的數(shù)據(jù)，所以在打開這類窗體之前， 通過設置窗體的 strSQL 參數(shù)，使其獲取數(shù)據(jù)庫中的數(shù)據(jù)進行顯示。倉庫調貨 96. = SELECT * FROM jxc_move 97. 39。業(yè)務員類別 88. = SELECT * FROM jxc_SMType 89. 39。 _ 83. _enddate,out_amount,out_price,out_discount,out_total, amp。顯示“藥品類別”窗體 76. End Sub 24 77. Private Sub mnuCommName_Click() 39。顯示“庫存信息”窗體 71. End Sub 72. Private Sub mnuCNType_Click() 39。顯示“修改密碼”窗體 65. End Sub 66. Private Sub mnuOUTStore_Click() 39。顯示“進貨信息 —— 按業(yè)務員查詢”窗體 58. End Sub 59. Private Sub mnuCust_Click() 39。顯示“銷售信息 —— 按客戶查詢”窗體 52. End Sub 53. Private Sub mnuOUTSaler_Click() 39。顯示“進貨信息 —— 按倉庫查詢”窗體 46. End Sub 47. Private Sub mnuINSupp_Click() 39。退出 38. Unload Me 39. End Sub 40. Private Sub mnuSupp_Click() 39。入庫單 32. = SELECT in_id,in_date,in_saler,sup_id,st_id,_id, amp。 _ 27. od_enddate,od_amount,od_price,od_discount,od_total,od_memo amp。顯示“銷售訂單”窗體 20. End Sub 21. Private Sub mnuStore_Click() 39。銷售訂單 16. = SELECT so_id,so_date,so_saler,cus_id,_id, amp。關于 10. 39。E） mnuOUTSaler 幫助（ amp。E） mnuINSaler 銷售查詢（ amp。Q） mnuQuery 進貨查詢（ amp。S） MnuOUT1 Ctrl+F4 庫存管理（ amp。O） mnuINOrders Ctrl+F1 入庫單（ amp。U） mnuCust Ctrl+U 業(yè)務員（ amp。T） mnuCNType 業(yè)務員（ amp。M） mnuModifyPWD 添加用戶（ amp。 21 選擇菜單“工具 /菜單編輯器”命令，打開“菜單編輯器”對話框，逐個創(chuàng)建系統(tǒng)的菜單 。 （ 2） 右鍵單擊左側工具欄，在彈出的菜單中選擇“部件”命令，打開“部件”對話框，在該對話框中選擇“ Microsoft Windows ”部件，如圖 61 所示。 （ 7） 當關閉圖 419 所示對話框時，將提示用戶輸入表名進行保存。 （ 5） 單擊“確定”按鈕，即可完成數(shù)據(jù)庫文件的創(chuàng)建。 （ 1） 啟動 MS SQL Server2021 的“企業(yè)管理器”。在 MS SQL Server2021 中創(chuàng)建該表的 SQL 語句如下： CREATE TABLE [dbo] . [jxc_out] ( [out_date] [smalldatetime] NOT NULL , /*銷售日期 */ [out_saler] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*業(yè)務員 */ [out_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*銷售單號 */ [cus_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*客戶編號 */ [st_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*倉庫編號 */ [_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*藥品編號 */ [_enddate] [smalldatetime] NULL, /*有效期 */ [out_amount] [float] NULL , /*數(shù)量 */ [out_price] [float] NULL , /*單價 */ [out_discount] [float] NULL , /*折扣 */ [out_total] [float] NULL , /*金額 */ [out_cash] [char] (10) COLLATE Chinese_PRC_CI_AS NULL , /*支付方式 */ [out_arr] [char] (2) COLLATE Chinese_PRC_CI_AS NULL , /*是否記賬 */ [out_rate] [float] NULL , /*預付比例 */ [out_memo] [nvarchar] (255) COLLATE Chinese_PRC_CI_AS NULL, /*備注 */ ) ON [PRIMARY] （ 12） jxc_stock（庫存）表：用于保存藥品的庫存信息，該表包括 7 個字段，分別用來保存 庫存更新日期、編號、倉庫編號、藥品編號、有效期、數(shù)量、金額等信息。在 MS SQL Server2021中創(chuàng)建該表的 SQL 語句如下： CREATE TABLE [dbo] . [jxc_store] ( [st_id] [char] (14) COLLATE Chinese_PRC_CI_AS NOT NULL , /*編號 */ [st_name] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NOT NULL, /*倉庫名稱 */ [st_memo] [nvarchar] (255) COLLATE Chinese_PRC_CI_AS NULL, /*備注 */ （ 8） jxc_orders（進貨訂單）表：用于保存進貨訂單信息，該表包括 11 個字段，分別用來保存訂單日期、業(yè)務員、訂單號、供應商編號、藥品編號、有效期、數(shù)量、單價等信息。該表包括 12個字段，分別用來保存供應商編號、名稱、地址、郵政編碼、聯(lián) 系電話等信息。該表包括 11 個字 段，分別用來保存藥品的標號、名稱、類型、有效期、進價、分銷價、零銷價、廠家等信息。 銷 售 單記 賬支 付 方 式金 額折 扣數(shù) 量 有 效 期日 期業(yè) 務 員倉 庫藥 品單 價客 戶預 付 比 例備 注 圖 59： 銷售單的 ER 圖 14 數(shù)據(jù)庫結構設計 本系統(tǒng)共創(chuàng)建了 13 張表：分別是 jxc_type（藥品類別）表、 jxc_CommName（藥品信息）表、 jxc_cust（客戶信息）表、 jxc_supp（供應商信息）表、 jxc_SMType（業(yè)務員類別）表、 jxc_sales（業(yè)務員信息）表、 jxc_store（倉庫信息）表、jxc_orders（進貨訂單）表、 jxc_SalesOrders（銷售訂單）表、 jxc_in（入庫單）表、 jxc_out（銷售單）表、 jxc_stock（庫存）表、 jxc_move（倉庫調貨信息）表。 ? 藥品實體、客戶實體的 ER 圖，如圖 5圖 52 所示。 ? 本項目需保存的數(shù)據(jù)量可能會較大（藥品、供應商、客戶的數(shù)量很大），使用 MS SQL Server2021 可完成對海量數(shù)據(jù)進行安全、快速的 保存與查詢操作。 系統(tǒng)功能結構 本系統(tǒng)的功能主要包括基本數(shù)據(jù)、進貨管理、銷售管理、庫存管理、查詢等五部分。 ? 能錄入藥品的入庫單、銷售單。 ? 界面簡潔、框架清晰、美觀大方。本章實例就是使用這種方式為大多數(shù)窗體設置了 strSQL 屬性和 iMode 屬性，向窗體傳遞 SQL 語句和窗體的工作模式。這種方式的缺點是不能準確表達參數(shù)的意義。主要有以下缺點。 1. 使用全局變量傳遞參數(shù) 在模塊文件中使用 Public 聲明全局變量，這些全局變量在整個項目中都可以被訪問。 ? Key 設置該節(jié)點的 Key 值。 通過向集合對象 Nodes 中添加 Node 對象，即可向控件中添加顯示項。 8 第三章 關鍵技術 使用 Tree View 顯示數(shù)據(jù) 使用 Tree View 控件可顯示分層結構的數(shù)據(jù)，其中每個數(shù)據(jù)項為一個 Node對象，每個 Node 對象均由一個標簽和一個可選的位圖組成。 從計算機信息管理急速，以及企業(yè)的業(yè)務需求兩方面出發(fā)，對醫(yī)藥進銷存系統(tǒng)（下面稱為“本系統(tǒng)”）的可行性進行分析，為企業(yè)就決策提供依據(jù)。 3. 銷售管理 ? 銷售訂單； ? 銷售管理。因此，開發(fā)這樣一套藥品進銷存系統(tǒng)是很有必要的工作。 關鍵詞：藥品，窗體 ,域 ,數(shù)據(jù)庫 Abstract： The calculator management information system is a system engineering, synthesizing the calculator, work, database, the munication technique, also including the business enterprise management science and numerous abundant empirical summary of is the example that the advanced science technique bines with the modern business enterprise management. Its creation and movement is the business enterprise management management develops the certain stage, inevitable request of certain scale and particular and economic environmentses are. Currently, the global drugs` market petition is increasingly vigorous, the panies medicine enterprise wants to be keep on the win the benefit to be decided by whether it can win and keep the satisfaction of the equal customers or analysis, we use the VISUAL BASIC development tool of the pany of MICROSOFT, making use of various development tool that faces to the object of what it provide, particularly is this ability of the data window way is convenient and simple and direct to manipulate the database of intelligence turn the object, build up the system application prototype in the in a short time first, then, start the prototype system to carry on the need generation to the beginning, revise and improve continuously, until formation the customer is satisfie