【正文】 銀行AccountsS 文本 30 輸入法開啟 供方賬號(hào)TaxNumberS 文本 20 輸入法開啟 供方稅號(hào)PostCodeS 文本 12 輸入法開啟 供方郵編Pump_Purchaser 表是記錄了需方單位的具體信息，為合同管理的表提供信息，其結(jié)構(gòu)如表 所示。表 Pump_Purchaser字段名 數(shù)據(jù)類型 長(zhǎng)度 輸入法模式 備注Contractid 文本 20 輸入法開啟 合同編號(hào)UnitNameD 文本 52 輸入法開啟 需方名稱UnitAddressD 文本 52 輸入法開啟 需方地址Province 文本 20 輸入法開啟 省份Terminus 文本 10 輸入法開啟 總站Linkman 文本 10 輸入法開啟 聯(lián)系人LegalRepresentativeD 文本 6 輸入法開啟 需方法定代表EntrustDeputyD 文本 6 輸入法開啟 需方委托人TelephoneD 文本 50 輸入法開啟 需方電話CableAddressD 文本 50 輸入法開啟 需方傳真AccountBankD 文本 60 輸入法開啟 需方開戶銀行AccountsD 文本 30 輸入法開啟 需方賬號(hào)TaxNumberD 文本 20 輸入法開啟 需方稅號(hào)PostCodeD 文本 12 輸入法開啟 需方郵編Pump_MeasureUnit 表是記錄了合同的計(jì)量單位，其結(jié)構(gòu)如表 所示。表 Pump_MeasureUnit字段名 數(shù)據(jù)類型 長(zhǎng)度 輸入法模式 備注SerialNumber 文本 10 輸入法開啟 序列號(hào)PartName 文本 10 輸入法開啟 型號(hào)OperateDate 日期 8 執(zhí)行日期OperateDateNow 日期 8 現(xiàn)執(zhí)行日期ModifyDate 日期 8 修改日期ModifyDateNow 日期 8 現(xiàn)修改日期Pump_Material 表是記錄了合同的材料類型，其結(jié)構(gòu)如表 所示。表 Pump_Material字段名 數(shù)據(jù)類型 長(zhǎng)度 輸入法模式 備注SerialNumber 文本 10 輸入法開啟 序列號(hào)Material 文本 20 輸入法開啟 材質(zhì)OperateDate 日期/時(shí)間 輸入法關(guān)閉OperateDateNow 日期/時(shí)間 輸入法關(guān)閉ModifyDate 日期/時(shí)間 輸入法關(guān)閉ModifyDateNow 日期/時(shí)間 輸入法關(guān)閉 數(shù)據(jù)采集通過(guò)一些特征符合條件的測(cè)試數(shù)據(jù)，錄入到數(shù)據(jù)庫(kù)中，并在編碼調(diào)試階段測(cè)試各個(gè)功能模塊的實(shí)現(xiàn)。第 6 章 詳細(xì)設(shè)計(jì) 公用模塊設(shè)計(jì)由于該系統(tǒng)中各個(gè)功能模塊都頻繁的使用數(shù)據(jù)庫(kù)中的各種數(shù)據(jù)，因此需要一個(gè)公共的數(shù)據(jù)操作函數(shù)，用以執(zhí)行各種 SQL 語(yǔ)句，將這個(gè)公用函數(shù)放在公用模塊中，這樣整個(gè)工程項(xiàng)目中的任何地方都可以調(diào)用公用模塊中的函數(shù)，變量，這樣可以大大提高代碼的效率。 詳細(xì)主模塊代碼設(shè)計(jì) ADO 連接數(shù)據(jù)庫(kù)建立一個(gè) ADODC 控件，自動(dòng)生成連接語(yǔ)句，如下：Str1 = Provider=。Data Source= amp。 + \database\。Persist Security Info=False這種連接辦法不用考慮先建立“ODBC 數(shù)據(jù)員源管理器”來(lái)建立一個(gè)DSN。它使用了 OLE DB 連接字符串來(lái)識(shí)別 OLE DB 提供者并將提供者指向數(shù)據(jù)源的方法，這樣程序的可移植性很強(qiáng)。同時(shí)對(duì)數(shù)據(jù)庫(kù)的升級(jí)也方便了很多。 查詢代碼設(shè)計(jì)在主窗口的 open 事件中編寫代碼，主要是由 IF 語(yǔ)句完成。如果 If = And Trim() = Then//輸入查詢條件。MsgBox 請(qǐng)輸入要查詢的信息,或選擇要查詢的項(xiàng)目, vbInformation, 提示.//這是對(duì)光標(biāo)操作的提示編寫；，以方便操作。如果 If Trim() = Then//構(gòu)造查詢的 SQL 語(yǔ)句，設(shè)置查詢條件。在數(shù)據(jù)庫(kù)中查找的過(guò)程是定義用戶 SELECT * FROM 表這個(gè)表中找出內(nèi)容, 并連接 str1, adOpenStatic, adLockOptimistic。然后會(huì)進(jìn)行模糊查找，即輸入要查找內(nèi)容的比部分，通過(guò) SELECT * FROM 表名 whereamp。 字段名 amp。like 39。amp。 Trim() amp。 %39。完成。設(shè)置 顯示內(nèi)容為 urs 表中的內(nèi)容。如果 0 Then//設(shè)置查詢條件，呼出 list。否則系統(tǒng)回提示 MsgBox 沒(méi)有查到相關(guān)信息 , vbInformation, 提示...這樣的的基本代碼只要稍加修改就可以適應(yīng)其他情況的查詢，這樣可以減少重復(fù)編碼所帶來(lái)的不便。 刪除模塊代碼在設(shè)計(jì)刪除模塊時(shí)，首先做了忽略錯(cuò)誤的處理 On Error Resume Next。定義變量為整型 Dim i As Integer，作用是給出操作提醒 i = MsgBox(你真的要?jiǎng)h除嗎？, vbCritical + vbYesNo,警告)。當(dāng) i = 6 則符合刪除標(biāo)準(zhǔn)，刪除選中內(nèi)容 。如果 = 0 Then//不可刪除條件，則確定鍵不可用 = False，刪除不能進(jìn)行。 詳細(xì)子模塊代碼設(shè)計(jì) 系統(tǒng)登錄模塊圖 登錄界面用戶登陸程序代碼如下:這里是用 with select * from syslogin where sysname= 39。 amp。 name amp。 39。, str1, , , adCmdText同樣查找用戶相對(duì)應(yīng)密碼也是如此. password = crypt(D, jinyongren, Trim((2))) 為了保證登錄用戶的安全，通過(guò)程序?qū)τ脩裘艽a進(jìn)行了加密。 銷售合同信息模塊合同銷售信息模塊節(jié)面如圖 所示。圖 合同信息界面銷售合同信息模塊是主要上對(duì) Pump_Contract 表進(jìn)行合同新增、修改、查詢、刪除、輸入 Excel 報(bào)表操作，同時(shí)還有Pump_Contract，Pump_Provider，Pump_Purchaser， PartType， Pump_MeasureUnit， Pump_Material 等表配合 Pump_Contract 表來(lái)完善對(duì)合同的管理，使得銷售合同管理更加的完整。第 7 章 系統(tǒng)運(yùn)行測(cè)試分析本測(cè)試報(bào)告為銷售合同管理的測(cè)試報(bào)告，目的在于總結(jié)測(cè)試階段的測(cè)試以及分析測(cè)試結(jié)果，描述系統(tǒng)是否符合需求，具體測(cè)試結(jié)果如 圖所示表 系統(tǒng)數(shù)據(jù)測(cè)試表項(xiàng)目名稱 控制方法 輸入 預(yù)期結(jié)果 實(shí)際結(jié)果 比對(duì)結(jié)論操作員登陸 自動(dòng) 用戶名/密碼 進(jìn)入系統(tǒng)有部分管理權(quán)限進(jìn)入系統(tǒng)有部分管理權(quán)限測(cè)試成功添加基本信息管理在主界面點(diǎn)擊點(diǎn)擊圖標(biāo)進(jìn)入合同信息，供方信息、需方信息等MSFlexGrid1顯示新增記錄MSFlexGrid1顯示新增記錄測(cè)試成功添加信息管理（錯(cuò)誤）在主界面點(diǎn)擊點(diǎn)擊圖標(biāo)進(jìn)入重復(fù)的基本信息或者錯(cuò)誤信息驗(yàn)證無(wú)法通過(guò)。提示重復(fù)數(shù)據(jù)驗(yàn)證無(wú)法通過(guò)。提示重復(fù)數(shù)據(jù)測(cè)試成功銷售合同信息管理在主界面點(diǎn)擊點(diǎn)擊對(duì)應(yīng)圖標(biāo)進(jìn)入查找已有合同信息，修改內(nèi)容，保存更新原有合同信息被成功替換原有合同信息被成功替換測(cè)試成功合同管理（合同信息不為空）在主界面點(diǎn)擊點(diǎn)擊相應(yīng)圖標(biāo)進(jìn)入顯示現(xiàn)有合同信息，加以修改提示修改成功，MSFlexGrid1顯示生成數(shù)據(jù)提示修改成功，MSFlexGrid1顯示生成數(shù)據(jù)測(cè)試成功添加合同信息管理（合同信息重復(fù)）在主界面點(diǎn)擊點(diǎn)擊相應(yīng)圖標(biāo)進(jìn)入添加新銷售合同編號(hào)提示編號(hào)重復(fù)，合同生成失敗提示編號(hào)重復(fù)，合同生成失敗測(cè)試成功打印銷售合同信息在主界面點(diǎn)擊點(diǎn)擊圖標(biāo)進(jìn)入顯示要打印的合同信息輸出EXCEL報(bào)表，打印成功輸出EXCEL報(bào)表，打印成功測(cè)試成功管理員密碼修改登陸界面點(diǎn)密碼修改用戶名，原始密碼新密碼，重復(fù)新密碼修改成功。返回登陸界面str1表相關(guān)字段修改修改成功。返回登陸界面str1表相關(guān)字段修改測(cè)試成功從表 得出如下測(cè)試結(jié)論：上表中為主要窗體測(cè)試結(jié)論，包括了本程序主要功能和管理操作，測(cè)試較完整，所有程序運(yùn)行結(jié)果都符合設(shè)計(jì)要求，程序符合實(shí)際工作運(yùn)行需要。結(jié)束語(yǔ)首先是工作成果方面，軟件設(shè)計(jì)的全部功能均已經(jīng)實(shí)現(xiàn)。但代碼效率有待提高。其次工作效率方面，由于采用了Visual Basic6作為軟件開發(fā)工具，所以開發(fā)效率比較高，再由于采用了高效率的開發(fā)模型從而進(jìn)一步提高了工作效率。在這個(gè)工作中選擇項(xiàng)目，需求分析，快速設(shè)計(jì)，建立原形，合同處理等這些過(guò)程中遇到過(guò)不少的困難。這個(gè)過(guò)程就是一個(gè)發(fā)現(xiàn)問(wèn)題，分析問(wèn)題，解決問(wèn)題，吸取經(jīng)驗(yàn)的一個(gè)過(guò)程。它貫穿于整個(gè)畢業(yè)設(shè)計(jì)中。當(dāng)然，由于設(shè)計(jì)時(shí)間短以及我自身程序設(shè)計(jì)水平有限，整個(gè)系統(tǒng)還不夠完善，存在一些問(wèn)題。例如：數(shù)據(jù)有一定的冗余，可能會(huì)出現(xiàn)一些不可預(yù)知的錯(cuò)誤等等，這些都需要進(jìn)一步完善。在這次畢設(shè)里，除上面提到的，還有以下幾點(diǎn)的體會(huì)：（1）從整個(gè)設(shè)計(jì)過(guò)程中對(duì)問(wèn)題的分析，到查資料，然后對(duì)系統(tǒng)的分析，設(shè)計(jì)以及對(duì)軟件的開發(fā)環(huán)境的熟悉，以至到編碼、測(cè)試，調(diào)試，到最終的完成，我清楚了軟件設(shè)計(jì)的整個(gè)過(guò)程，對(duì)于這些不再陌生，培養(yǎng)了自己嚴(yán)謹(jǐn)?shù)倪壿嬎季S。（2）因?yàn)楫呍O(shè)題目是具有針對(duì)性的，用來(lái)解決實(shí)際問(wèn)題的，所以在這一過(guò)程中，不僅僅是學(xué)到了專業(yè)知識(shí)，而且了解了很多管理方面的知識(shí)。提高了自身解決問(wèn)題的能力。（3）在這一過(guò)程中，也增強(qiáng)了自身的動(dòng)手能力，對(duì)于電腦的操作比以前熟練了很多。（4）在調(diào)試的過(guò)程中曾遇到很多問(wèn)題，經(jīng)過(guò)這一階段，我學(xué)會(huì)了許多解決問(wèn)題的方法。致 謝首先，我要特別感謝我的指導(dǎo)老師喬白友。自畢業(yè)設(shè)計(jì)開始以來(lái)，他一直給我極大的幫助和指導(dǎo)，并提出了許多寶貴的意見。在畢業(yè)設(shè)計(jì)中對(duì)我的啟發(fā)性引導(dǎo)、嚴(yán)格的要求和耐心的指導(dǎo)不僅幫我解決了不少畢業(yè)設(shè)計(jì)過(guò)程中的疑難問(wèn)題，教會(huì)了我解決問(wèn)題的方法，也鍛煉了我分析問(wèn)題，解決問(wèn)題的能力。他嚴(yán)謹(jǐn)?shù)墓ぷ鲬B(tài)度和耐心育人的精神給我留下了深刻的印象，給予我極大的鼓舞，值得我終生學(xué)習(xí)。我的畢業(yè)設(shè)計(jì)的順利完成和我自身各方面的提高都離不開指導(dǎo)老師喬白友的教導(dǎo)。另外，我要衷心感謝曾經(jīng)教導(dǎo)過(guò)我的諸位老師對(duì)我的教誨，他們不僅使我的知識(shí)、能力得到提高，更重要的是教會(huì)了我怎樣提高自己的自學(xué)能力。當(dāng)然還要感謝在此期間給我?guī)椭耐瑢W(xué)和朋友。他們?yōu)槲姨峁┝嗽S多學(xué)習(xí)資料，讓我在學(xué)習(xí)數(shù)據(jù)庫(kù)編程的時(shí)候，不明白的地方可以查詢。在畢設(shè)過(guò)程中，對(duì)我的畢設(shè)，他們自己也給我提出了很多可行性的建議。參考文獻(xiàn)[1] 薩師煊，王珊。數(shù)據(jù)庫(kù)系統(tǒng)概論[M] 。北京：高等教育出版社。245270。[2] 鄭阿奇。Visual Basic 實(shí)用教程[M] 。北京：電子工業(yè)出版社。3042。[3] 成一天。電腦創(chuàng)世紀(jì)Visual Basic 編程篇[M]。北京：北京科海電子出版社。 [4] 郭琦。Visual Basic 數(shù)據(jù)庫(kù)系統(tǒng)開發(fā)技術(shù)。北京：人民郵電出版社，300320。[5] [美] Dianne Siebold，邱仲潘等譯。Visual Basic 開發(fā)指南SQL Server 篇[M]。北京：電子工業(yè)出版社。500550。[6] 張樹兵，戴紅，陳哲。Visual Basic 入門與提高[M]。北京：清華大學(xué)出版社。124135。[7] [美] Sid Adelmanamp。LarissaTerpelukMose。數(shù)據(jù)倉(cāng)庫(kù)項(xiàng)目管理。北京：清華大學(xué)出版社。[8] Dino Esposit。 技術(shù)內(nèi)幕[M]。北京: 清華大學(xué)出版社。:0660[9] [美]約翰遜。[M]。北京: 清華大學(xué)出版社。[10] [美]考夫曼， （美）唐格勒西納姆。 數(shù)據(jù)庫(kù)入門經(jīng)典[M]。北京: 清華大學(xué)出版社。:0394