【正文】 。從課題的選擇到研究和論文的寫作過程中，徐老師淵博的學識、嚴謹?shù)闹螌W態(tài)度、敬業(yè)的精神和平易近人的為人態(tài)度，給我留下了深刻的印象，不僅讓我學到了專業(yè)知識，還讓我學到了很多實用的操作技巧， 這些將讓我一生受益。在這次的設計中，吸取了經(jīng)驗，開闊了視野，受益頗多。 2． 再者，由于現(xiàn)代企業(yè)的經(jīng)營模式已經(jīng)發(fā)展為了連鎖經(jīng)營為主體的企業(yè)模式，因此考慮到企業(yè)在同城 不同地或者不同城市的子公司、銷售網(wǎng)點能夠同時使用一種軟件，共享實時更新的數(shù)據(jù)資源，該軟件還有待開發(fā)成網(wǎng)絡系統(tǒng)。該系統(tǒng)除了能實現(xiàn)用戶登錄，基本信息輸入以外，還具備進貨信息、銷售信息、庫存信息的定時統(tǒng)計、條件查詢、報表打印、數(shù)據(jù)庫備份和恢復等功能，基本實現(xiàn)了最初的設計目標。該軟件經(jīng)過以上的調(diào)試，運行后，并未報其他錯誤，從而所有預定功能都可如愿實現(xiàn)了。 3． 在報表打印時時常會出現(xiàn)如圖 ，那是由于報表的信息過大，以至南昌航空大學學士學位論文 40于默認的打印設置無法實現(xiàn)報表信息的全部顯示造成的。因此，只需打開這些表。為了集中這些信息，在制作時，又重新建立一張表來存放這些必要的字段信息。添加一個綁定界面，然后在該界面下填寫當前服務器名，這樣運行起來就不會報如下錯誤。這樣做，最好把數(shù)據(jù)庫連接統(tǒng)一寫在公共模塊里，修改起來就比較方便。 南昌航空大學學士學位論文 39第六 章 軟件調(diào)試 1． 如圖 所 示，如果在設計時，將數(shù)據(jù)庫連接綁定為一個固定的服務器，當系統(tǒng)在另外一部計算機上運行時，就會出現(xiàn)以下錯誤框提示。 在該系統(tǒng)中考慮到實際操作的需要，添加了一個實用工具菜 單，取名為“輔助工具”在輔助工具里，利用 VB 里的 Shell 函數(shù)來實現(xiàn)對 Windows 下的計算器和記事本應用程序的調(diào)用。 Variant (Integer)，表示在程序運行時窗口的樣式。 Variant (String)，要執(zhí)行的程序名，以及任何必需的參數(shù)或命令行變量，可能還包括目錄或文件夾，以及驅動器。 輔助工具 Shell 函數(shù)的作用就是在 VB 里調(diào)用一個可執(zhí)行文件，返回一個 Variant(Double),如果成功調(diào)用的話，該值代表這個程序的任務標識 ID，若不成功，則返回值為 0。然后依次重復以上步驟，直到所有的索引標題都已經(jīng)編輯完成。然后 點擊索引按鈕，轉換到編輯索引的界面。 首先，利用 DreamWeaver 或者 FrontPage 軟件制作各個標題的 HTML 文件。 被 IE瀏覽器支持的 Javas cript、VBs cript、 ActiveX、 Java Applet、 Flash、常見圖形文件 (GIF、 JPEG、 PNG)、音頻視頻文件 (MID、 WAV、 AVI)等等， CHM 同樣支持，并可以通過 URL 與 Inter 聯(lián)系在一起。 南昌航空大學學士學位論文 35 圖 打印設置運行圖 點擊打印按鈕后，打印效果見圖 所示： 圖 報表打印結果 幫助文件 一個好的應用程序不僅要有高效率的程序代碼，方便快捷的幫助文件更是不可缺少的一部分 。同時由于報表要素在數(shù)據(jù)庫中建立了一張表來存放，所以在再次打開該界面時，填報單位等項上會保留上一次填寫的信息。 如圖 所示，在該界面 上，用戶可以選擇要打印的報表類型，還可以選擇報表打印的時間單位。 首先要在公共模塊中定義一些必要的變量 Public reportdays As Integer Public retitle As String Public redanwei As String Public pizhun As String Public tianbao As String Public shenhe As String 然后在報表的代碼窗中鍵入如 下代碼： Private Sub datareport_initialize() (section4).Controls(ttitle).Caption = retitle (section4).Controls(danwei).Caption = redanwei (section3).Controls(pizhunren).Caption = pizhun (section3).Controls(tianbaoren).Caption = tianbao (section3).Controls(shenheren).Caption = shenhe howreport (reportdays) End Sub 7． 因為考慮到用戶的實際情況，即打印報表的標頭、填報單位、填報人、批準人和審核人是不固定的，做為實用 的應用程序，要把報表的這些要素作為一個可填寫的表格是比較合適的 。 6． 在報表的報表表頭（ Section4）添加 4個 rptLabel，調(diào)整好位置，設置字體大小，并且設置四個控件的名稱。單擊確定，退出后，重新點擊右鍵，選擇“展開所有”，得到所有將要使用的字段名，如圖 ： 4． 然后回到集成，在工程菜單中選擇“添加 Data Report”，添加 Data Report 報表編輯器 Data Report1，設置其 DataResource 為 DataEnvironment1,設置其DataMember 為 my_clothe。將命名改為“ output”。 3． 然后點擊“下一步”，連接數(shù)據(jù)庫，設置見圖 。 2． 在數(shù)據(jù)環(huán)境設計器右鍵單擊“ Connection1” ,選擇重命名，將連接名改成數(shù)據(jù)庫的名字 —— my_clothe。以 下以銷售報表為例，來說明報表的制作過程。 在調(diào)用數(shù)據(jù)庫的數(shù)據(jù)到報表上顯示之前，必須建好視圖，該視圖在上一章節(jié)已經(jīng)介紹過了，這里就不再重復。它與數(shù)據(jù)源（通常都是選擇數(shù)據(jù)環(huán)境設計器 Data Environment designer 作為數(shù)據(jù)源）一起使用，可以從幾個不同的相關表開始創(chuàng)建報表。 下面簡單介紹一下 Data Report 的使用。 Data Report 是一個比較成熟的報表打印解決方案。 打印報表 在 Visual Basic 開發(fā)的數(shù)據(jù)庫系統(tǒng)中，報表打印是其中最重要也是最常用的功南昌航空大學學士學位論文 31能之一。 (sql) 39。 amp。Data Source=e41 sql = use master RESTORE DATABASE my_clothe from disk=39。User ID=sa。 其 SQL語句如下： Provider=。 因此，在設計對話框（ CommonDialog）控件時，對其編程就不能使用另存為的方法而是選擇打開文件的方法。只是在打開對話框時，用戶不是選擇保存路徑，而是打開所要恢復的數(shù)據(jù)庫備份。 39。 amp。Initial Catalog=My_clothe。Persist Security Info=False。 對 ProgressBar控件編程如下： Dim connter As Integer Dim sql, workarea(15) As String ‘ workarea(15)：工作 進度 設置 = True = UBound(workarea) ‘ 設置進度條的最大值 = ‘ 設置進度條的當前值 For connter = LBound(workarea) To UBound(workarea) workarea(connter) = initial value amp。由于使用方塊來填充控件，因此所填充的數(shù)量只能是接近于 Value 屬性的當前設置值。 ProgressBar 控件的重要屬性包括 Max 屬性、 Min 屬性和 Value 屬性。 ProgressBar 控件有一個行程和一個當前位置 。因而可以監(jiān)視操作完成的進度。 由于備份一個大型數(shù)據(jù)庫的耗時較長，在制作該模塊時添加 一個可以反映備份進度的控件 —— 進度條 （ ProgressBar） 既美 觀又實用 。運行結果如圖 所示。用戶只須打開這個 按鈕，系統(tǒng)就會彈出一個如圖 ： 圖 備份路徑對話框 然后 用戶 只須選擇存放數(shù)據(jù)庫備份文件的路徑即可。以下就是 VB 中對對話框的典型編程方法。在備份界面設計中用到 的是“另存為”的方法，在恢復數(shù)據(jù)庫的界面中也要用到對話框控件，但是它所使用的方法是“打開文件”。 在數(shù)據(jù)庫備份的界面上，采用了一個對話框（ CommonDialog）的控件 來作為用戶選擇數(shù)據(jù)庫備份存放路徑的方法 ?？紤]到 系統(tǒng) 所使用的是比較大型的數(shù)據(jù)庫 — SQL Server 2021，所以采用了 該數(shù)據(jù)庫自身帶有的備份與恢復功能來制作備份與恢復的模塊，該模塊的界面如圖 ： 圖 數(shù)據(jù)庫備份界面 對于備份 ，該系統(tǒng)提供了兩條選擇路徑，即 用戶可以選擇在主 菜單的“系統(tǒng)維護” 下找到備份菜單；另一種方法是在快捷的工具條下，也能找到備份選項 。例如： Access 數(shù)據(jù)庫等。 2． 利用 filecopy 命令直接拷貝數(shù)據(jù)庫文件 mdf 和日志文 件 ldf 的方式。打印結果如圖 ： 圖 查詢打印運行界面 其余的 查詢 由于本著系統(tǒng)設計風格統(tǒng)一的原則，基本的設計步驟與以上所述相類似，南昌航空大學學士學位論文 27這里就不再重復說明。 隱藏的辦 法很簡單，只需要設定某行的行高為 0就可以了。例如：導致該軟件的可讀性很差，除了編程人員，其他人很難看懂該表格 ，這樣開發(fā)出來的軟件根本就不能用 。Initial Catalog=My_clothe。Persist Security Info=False。不過正因為這樣 ，越是自定義的東西，開發(fā)出來的東西越靈活，越符合用戶需求。 因此 ， 使用 MSFlexGrid通常還要對它的行列寬度進行設置。如果需要顯示被回繞的文本 ，需要增加單元的列寬（ ColWidth 屬性）或行高（ RowHeight 屬性）。 Text 屬性提供了當前單元格內(nèi)容的 信息。 Row 和 Col 屬性指定了當前的 MSFlexGrid 單元格。它提供了高度靈活的網(wǎng)格排序、合并和格式設置功能 。 首先要在 VB中加載 Microsoft FlexGrid ， 在常用工具條下點擊右鍵，選擇“部件”，然后鉤選 “ Microsoft Flexgrid Control ” ，則在工具條上就會出現(xiàn)該控件。其中，較突出的表現(xiàn)是它不僅可以加載文本數(shù)據(jù)，還可以加載圖片等多媒體數(shù)據(jù)。因為在該系統(tǒng)中并未使用 ADO，所以只需選擇使用 MSFlexGrid 即可。雖然，在 VB 中可以做為表格使用的控件有很多種，例如： DataGrid、DBGrid、 還有 上述提到的 MSFlexGrid 和更加高級的 MSHFlexGrid。 查詢結果采用 一個叫“ MSFlexGrid”的控件來顯示 。 39。 amp。 sQSql = sQSql amp。 dBeginDate amp。 and = 39。 amp。 amp。 amp。 amp。 39。 amp。業(yè)務員點開如圖 所示的進貨菜單界面。也就是說，用戶決不可能查詢到?jīng)]有進貨的年份或還未發(fā)生的年份的進貨記錄。只須選擇了“按時間”查詢的復選框后，在年、月、日的選項框中選擇用戶所要查詢的起始時間和終止時間，點擊確定按鈕后，即可在另一個窗體下得到查詢結果。由負責進貨的業(yè)務員打開進貨單輸入界面，進行輸入。 進貨信息查詢的程序流程圖如圖 所示。 南昌航空大學學士學位論文 22 圖 服裝進銷存主界面 進貨 信 息 查詢 本系統(tǒng)設置了四個查詢項目，分別是進貨信息查詢、銷售信息查 詢、庫存信息查詢和出庫信息查詢。 同時還在界面下方設置了狀態(tài)欄，狀態(tài)欄顯示了系統(tǒng)時間和當前狀態(tài)。 主界面的 設計是否友好關系到該系統(tǒng)的第一印象和實用價值的最初體現(xiàn)。 由于在設計時考慮到界面的美觀與風格 的 統(tǒng)一，將其他界面都設置成在該平臺下打開。 表 出庫單信息表的結構 列名 數(shù)據(jù)類型 長度 允許空 說明 提貨日期 Datetime 8 Not nu