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