【正文】 合同管理 合同 訂貨單 合格 不合格 管理員 用計(jì)算機(jī)對 產(chǎn)品銷售 進(jìn) 行 管 理 ，進(jìn) 一 步 提 高 市 場 的 現(xiàn) 代 化 管 理 水平 。系統(tǒng)應(yīng)符合現(xiàn)代化、自動(dòng)化的管理制度，并達(dá)到操作直觀、方便、實(shí)用、安全等要求。修改合同信息 銷 售 管 理 ：添加合同信息，查詢月銷售總額。 分 別 如 下 圖 所 示 產(chǎn)品銷售信息管理系統(tǒng)的分為 基 礎(chǔ) 數(shù) 據(jù) 、銷 售 管 理 、查 詢 子系統(tǒng)和統(tǒng)計(jì) 子系統(tǒng) 四個(gè)部分。 輸 入 合 同 信 息 表 界 面 如 下 ； 組合框 Combo Combo2 的 click 事件代碼： 客戶號 .value= 產(chǎn)品編號 .value= 輸 入 合 同 信 息 表 的 命 令 組 按 鈕 的 click 事件代碼如下 select 合同表 do case case =1 if reo()!=1 goto top endif case =2 if reo()1 skip 1 endif case =3 if reo()recc() skip endif case =4 if re()!=recc() go bottom endif case =5 browse nomodify noappend title合同 表信息 case =6 append blank 合同號 .setfocus case =7 endcase if reo()=1 =.f. =.f. else =.t. =.t. endif if reo()=recc() =.f. =.f. else =.t. =.t. endif 管理產(chǎn)品信息 改 產(chǎn) 品 信 息 表 界 面 如 下 ： 修 改 產(chǎn) 品 信 息 表 的 命 令 組 按 鈕 的 click 事件代碼如下 if reo( )=recc( ) =.f. else =.t. endif if reo( )=1 =.f. else =.t. endif do case case = 1 if re( ) recc( ) skip endif case = 2 if re( ) 1 skip 1 endif case = 3 go top case = 4 go bottom case = 5 browse noedit title 產(chǎn) 品 信 息 表 case = 6 產(chǎn)品編號 .enabled =.t. 產(chǎn)品名稱 .enabled =.t. 型號規(guī)格 .enabled =.t. 單價(jià) .enabled =.t. =.f. =.f. =.f. =.f. =.f. =.f. =.f. =.t. case = 8 產(chǎn)品編號 .enabled =.F. 產(chǎn)品名稱 .enabled =.f. 型號規(guī)格 .enabled =.f. 單價(jià) .enabled =.f. =.t. =.t. =.t. =.t. =.t. =.t. =.t. =.f. case = 7 endcase . 修改客戶信息表其中利用數(shù)據(jù)環(huán)境建立了表和表單之間的關(guān)聯(lián)，利 用 組 合 框 添 加 客 戶 數(shù) 據(jù) 給 用 戶 提 供 了 方 便 。 where = and =cpb.產(chǎn)品編號 browse nomodify noappend title 合 同 信 息 表 case = 6 endcase if reo( )=recc( ) =.f. else =.t. endif if reo( )=1 =.f. else =.t. endif 2. 產(chǎn) 品 銷 售 管 理 信 息 系 統(tǒng) 的 查 詢 模 塊 設(shè) 置 了 按 月 份 查 詢 、 按 相同 產(chǎn) 品 名 稱 查 詢 。 where 產(chǎn)品表 .產(chǎn)品編號 =合同表 .產(chǎn)品編號 。 FROM 合 同 表 ,產(chǎn)品表 where 產(chǎn)品表 .產(chǎn) 品 編 號 =合同表 .產(chǎn)品編號 。 INTO cursor xsze1 sele sum(訂貨總金額 ) as 訂貨總金額 from xsze1 into cursor xsze2 = 退出 click 事件代碼 品 銷 售 管 理 信 息 系 統(tǒng) 封 面 開 始 窗 口 ： 開 始 命 令 按 鈕 的 click 事件代碼 if trim()=123 and trim()=456 do else messagebox(用 戶 名或密 碼錯(cuò)誤 ,2+5,警告 ) endif 七 、 系 統(tǒng) 測 試 功能測試 軟件測試是軟件開發(fā)過程的重要組成部分，是用來確認(rèn)一個(gè)程序的品質(zhì)或性能是否符合開發(fā)之前所提出的一些要求。 測 試 是 否 可 以 正 常 對 會(huì) 員 相 關(guān) 信 息 進(jìn) 行 管 理 。鏈接測試必須 在 集 成 測 試 階 段 完 成 。例如：只能接受某些字符，測 試 時(shí) 可 以 跳 過 這 些 字 符 ， 看 系 統(tǒng) 是 否 會(huì) 報(bào) 錯(cuò) 。 (4)負(fù) 載 測 試 這 一 部 分 將 測 試 正 常 情 況 下 系 統(tǒng) 性 能 和 用 戶 數(shù) 目 之 間 的 關(guān)系 ， 查 看 在 多 個(gè) 用 戶 同 時(shí) 使 用 本 系 統(tǒng) 時(shí) 是 否 正 常 。確 保 用 戶 憑 直 覺 就 知 道 VFP 應(yīng)用系統(tǒng)里面是否還有內(nèi)容，內(nèi)容 在 什 么 地 方 。 圖 形 測 試 的 內(nèi) 容 有 ： a) 要 確 保 圖 形 有 明 確 的 用 途 。 安 全 性 測 試 系 統(tǒng) 的 安 全 性 測 試 區(qū) 域 主 要 有 ： 測 試 有 效 和 無 效 的 用 戶 名和 密 碼 ，要 注 意 到 是 否 大 小 寫 敏 感 ，可 以 試 多 少 次 的 限 制 ，是 否可 以 登 錄 而 直 接 瀏 覽 某個(gè)窗體等。通 過 這 次 畢 業(yè) 設(shè) 計(jì) ，我 掌 握 了 一 種 新 的 數(shù) 據(jù) 庫 系 統(tǒng) 開 發(fā) 工 具 Visual 。另外，通過這次畢業(yè)設(shè)計(jì)，提高了自己運(yùn)用所 學(xué) 的 基 礎(chǔ) 知 識 和 技 能 ， 獨(dú) 立 解 決 一 般 的 計(jì) 算 機(jī) 工 程 問 題 的 能力。 九 、 參 考文 獻(xiàn) 濟(jì) 民 ， 湯 觀 全 《 Visual 及其應(yīng)用系統(tǒng)》 北 京 ： 清 華 大 學(xué) 出 版 社 2021 2.《 Visual 實(shí)用編程 100 例》 中 國 鐵 道 出 版 社 3.《 Visual 時(shí)尚編程百例》 機(jī) 械 工 業(yè) 出 版 社 4.《 Visual FoxPr 數(shù) 據(jù) 庫 開 發(fā) 實(shí) 例 解 析 》 機(jī)械工業(yè)出版社 09/20 11:46 102 機(jī)體齒飛面孔雙臥多軸組合機(jī)床及 CAD 設(shè)計(jì) 09/08 20:02 3kN 微型裝載機(jī)設(shè)計(jì) 09/20 15:09 45T 旋挖鉆機(jī)變幅機(jī)構(gòu)液壓缸設(shè)計(jì) 08/30 15:32 5 噸卷揚(yáng)機(jī)設(shè)計(jì) 10/30 17:12 C620 軸撥桿的工藝規(guī)程及鉆 2Φ16孔的鉆床夾具設(shè)計(jì) 09/21 13:39 CA6140 車床撥叉零件的機(jī)械加工工藝規(guī)程及夾具設(shè)計(jì) 831003 08/30 15:37 CPU 風(fēng)扇后蓋的注塑模具設(shè)計(jì) 09/20 16:19 GDC956160 工業(yè)對 輥成型機(jī)設(shè)計(jì) 08/30 15:45 LS 型螺旋輸送機(jī)的設(shè)計(jì) 10/07 23:43 LS 型螺旋輸送機(jī)設(shè)計(jì) 09/20 16:23 P90B 型耙斗式裝載機(jī)設(shè)計(jì) 09/08 20:17 PE10 自行車無級變速器設(shè)計(jì) 10/07 09:23 話機(jī)機(jī)座下殼模具的設(shè)計(jì)與制造 09/08 20:20 T108 噸自卸車拐軸的斷裂原因分析及優(yōu)化設(shè)計(jì) 09/21 13:39 XY 型數(shù)控銑床工作臺的設(shè)計(jì) 09/08 20:25 YD5141SYZ 后壓縮式垃圾車的上裝箱體設(shè)計(jì) 10/07 09:2