【正文】 在工程資源管理器中右擊 ，選擇 [添加 ]→ [添加窗體 ]命令，名稱為Frmkytg，窗體布局 如 圖 49 所示。 14． 過(guò)戶 窗體及其控件設(shè)計(jì) 在工程資源管理器中右擊 ，選擇 [添加 ]→ [添加窗體 ]命令，名稱為齊齊哈爾大學(xué)畢業(yè)設(shè)計(jì)（論文）用紙 26 Frmgh，窗體布局 如 圖 412 所示。 如 圖414 所示。設(shè)置窗體屬性如下： Captioon 為“費(fèi)用全查詢”， Backcolor 為淺粉色， Height 為 5820， Width 為 9165， Icon 為大樹(shù)圖標(biāo)。選擇 [工程 ]菜單中 [部件 ]命令，選擇“ Microsoft DataGrid Control (OLE DB)”選項(xiàng)，將 DataGrid 控件添加到工具箱中，再將其放置到窗體上， Backcolor 屬性為綠色。 如 圖 417 所示。 圖 420 關(guān)于窗體 4． 3 報(bào)表的制作 1． 報(bào)表的概念 利用報(bào)表可以把數(shù)據(jù)表中的數(shù)據(jù)按一定的格式輸出到屏幕上或打印到紙上。 頁(yè)腳注 —— 每頁(yè)有一個(gè)，如頁(yè)碼。 再次右擊 Connection1，選 擇 [添加命令 ]命令 ，創(chuàng)建 Command1 對(duì)象，右擊 Command1，在屬性中設(shè)置該對(duì)象連接的數(shù)據(jù)源為需要打印的數(shù)據(jù)表 。本系統(tǒng)同時(shí)創(chuàng)建了一個(gè) Command2 對(duì)象，將通知表與其關(guān)聯(lián)，利用它可以打印出催繳通知。 \幫助 .chm ，即為調(diào)用與主程序同目錄下的幫 助 .chm 幫助文件，按 F1 鍵時(shí)調(diào)用。如果沒(méi)有要找的信息則顯示提示信息，之后從中取出密碼字段對(duì)應(yīng)的值與密碼文本框中輸入的值進(jìn)行比較，當(dāng)不相等時(shí)顯示提示信息，否則調(diào)用主界面窗體。最后將記錄添加到操作員表中。單擊保存按鈕時(shí)，首先檢測(cè)要保存的信息是否為空，如果為空則顯示提 示信息，否則將交費(fèi)信息保存到繳費(fèi)表中，并顯示操作成功的提示信息。操作員可在此時(shí)修改信息，之后單擊 [保存 ]按鈕， 首先判斷輸入的基本信息是否為空，如果為空則顯示提示信息，之后刪除用戶信息表中用戶名與組合框中選擇的用戶名相同的記錄，再把修改的記錄添加到用戶信息表中。查找和修改錯(cuò)誤的過(guò)程稱為程序調(diào)試。 6． 1 程序調(diào)試和排錯(cuò) 1．編輯時(shí)錯(cuò)誤 當(dāng)用戶在代碼窗口編輯代碼時(shí)， VB 會(huì)對(duì)程序直接進(jìn)行語(yǔ)法檢查，當(dāng)發(fā)現(xiàn)程序中存在輸入錯(cuò)誤時(shí)， VB 會(huì)彈出一個(gè)對(duì)話框，提示出錯(cuò)信息 。這時(shí)， Visual Basic 也彈出一個(gè)對(duì)話框，提示錯(cuò)誤信息。這類錯(cuò)誤往往是由指令代碼執(zhí)行了一非法操作引起的。通常，邏輯錯(cuò)誤不會(huì)產(chǎn)生錯(cuò)誤提示信息，故錯(cuò)誤較難排除，需要程序員仔細(xì)地閱讀分析程序，并且有調(diào)試程序的經(jīng)驗(yàn)。 程序編寫(xiě)及調(diào)試完畢后，單擊 [文件 ]菜單下的 [生成 齊齊哈爾市有線電視計(jì)費(fèi)管理系統(tǒng) .EXE]命令，將該數(shù)據(jù)庫(kù)程序編譯生成可執(zhí)行程序 齊齊哈爾市有線電視計(jì)費(fèi)管理系統(tǒng) .EXE。 在向?qū)С绦蜻\(yùn) 行的初始界面中，單擊“選擇工程”后的 [瀏覽 ]按鈕，找到要打包的 VB 工程文件名“工程 1”。單擊 [下一步 ]按鈕， 在“壓縮文件類型”中選擇 [單個(gè)的壓縮文件 ]命令，單擊 [下一步 ]按鈕，輸入安裝程序標(biāo)題為“ 齊齊哈爾市有線電視計(jì)費(fèi)管理系統(tǒng) ”。單擊 [下一步 ]按鈕，彈 出“打包和展開(kāi)向?qū)?已完成！ ”對(duì)話框。 初始畫(huà)面如圖 61 所示。單擊 WINDOWS 系統(tǒng)的 [開(kāi)始 ]菜單，選擇 [程序 ]中的 [有線電視計(jì)費(fèi)管理系統(tǒng) ]中的 [有線電視計(jì)費(fèi)管理系統(tǒng) ]命令，即可運(yùn)行系統(tǒng)，執(zhí)行所需操作。 在 整體 布局中遵循醒目、大方、清晰、明了的原則， 主界面中只采用菜單的形式供給使用者操作，所有的操作簡(jiǎn)單易懂便于學(xué)習(xí)使用。而且在程序的編寫(xiě)過(guò)程中加入了程序的注釋，便于以后的修改及完善。其次，系統(tǒng)提供了強(qiáng)大的對(duì)用戶的操作功能，包括 收費(fèi)設(shè)置、用戶信息錄入及開(kāi)機(jī)、移機(jī)、停機(jī)、過(guò)戶、用戶基本信息查詢、費(fèi)用查詢、欠費(fèi)查詢、月清零 、 打印用戶信息及催繳通知 的功能，使得操作員能夠根據(jù)用戶的需求選擇適合的操作，完成相應(yīng)的工作。許維平老師為我所做的這一切對(duì)我以后如何以嚴(yán)謹(jǐn)?shù)膽B(tài)度和認(rèn)真負(fù)責(zé)的精神工作，都將產(chǎn)生非常重要的影響。 在此，表示特別的謝意。 同時(shí)，我還要感謝學(xué)校，感謝學(xué)院給了我這個(gè)步入社會(huì)前良好的實(shí)踐機(jī)會(huì)。 在指導(dǎo)教師 的幫助和本人的努力下，本系統(tǒng)的功能基本完備，但仍然存在著不足之處，在以后的工作和學(xué)習(xí)中 還要 去逐步完善，以適應(yīng)市場(chǎng)經(jīng)濟(jì)的要求， 使之 能夠成為一款切實(shí)可行的應(yīng)用軟件。 在使用中操作者無(wú)須了解編程語(yǔ)言的使用環(huán)境及使用方法，直接進(jìn)行相應(yīng)的操作就可以實(shí)現(xiàn)我們所要的功能。 “ 齊齊哈爾市有線電視計(jì)費(fèi)管理系統(tǒng) ”中使用的語(yǔ)言也都是最基本的操作語(yǔ)言，例如，在使用 VB 編程時(shí)，經(jīng)常用到 IF 條件語(yǔ)句來(lái)進(jìn)行 判斷選擇，也常使用 MSGBOX 函數(shù)彈出提示信息。且在 打包后安 裝調(diào)試成功，可以進(jìn)行添加及 查詢 等所有系統(tǒng)提供的 操作。彈出“ 齊齊哈爾市有線電視計(jì)費(fèi)管理系統(tǒng) 安裝程序 ” 對(duì)話框，單擊 [更改目錄 ]按鈕，更改系統(tǒng) 的安裝路徑，單擊 [單擊此處開(kāi)始安裝 ]按鈕，彈出“ 齊齊哈爾齊齊哈爾大學(xué)畢業(yè)設(shè)計(jì)（論文）用紙 39 市有線電視計(jì)費(fèi)管理系統(tǒng) 選擇程序組”對(duì)話框 ，單擊 [繼續(xù) ]按鈕， 開(kāi)始解包安裝直至完畢。之后彈出“工程 ”對(duì)話框 ,單擊 [關(guān)閉 ]按鈕即可。單擊 [下一步 ]按鈕，彈出“打包和展開(kāi)向?qū)?安裝位置”對(duì)話框。單擊[下一步 ]按鈕， 彈出“打包和展開(kāi)向?qū)?DAO 驅(qū)動(dòng)程序”對(duì)話框，選擇所有的驅(qū)動(dòng)程序后單擊 [下一步 ]按鈕，選中文件名及來(lái)源后單擊 [確定 ]按鈕， 彈出“打包和展開(kāi)向?qū)?包含文件”對(duì)話框，單擊 [添加 ]按鈕， 在“文件類型”中選“所有文件”， 找到數(shù)據(jù)庫(kù)文件“數(shù)據(jù)庫(kù)” ，單擊 [打開(kāi) ]按鈕，將其添加。 6． 3 使用打包向?qū)? VB 提供了專門為應(yīng)用程序打包的向?qū)Чぞ撸?選擇 [開(kāi)始 ]菜單中的[ 程序 ] 中的 [Microsoft VISUAL BASIC 中文版 ]中的 [Microsoft 齊齊哈爾大學(xué)畢業(yè)設(shè)計(jì)（論文）用紙 38 VISUAL BASIC 中文版工具 ]中的 [PACKAGE amp。遇到不好解決的地方，可先在該語(yǔ)句前加單引號(hào)，使其成為注釋信息，檢查完之后的語(yǔ)句再 排 除該處 錯(cuò) 誤 。 4． 邏輯錯(cuò)誤 齊齊哈爾大學(xué)畢業(yè)設(shè)計(jì)（論文）用紙 37 程序運(yùn)行后，得不到所期望的結(jié)果，這說(shuō)明程序存在邏輯錯(cuò)誤。這只需單擊“確定”按鈕，關(guān)閉出錯(cuò)提示對(duì)話框，然后對(duì)出錯(cuò)行進(jìn)行修改即可。 2． 編譯時(shí)錯(cuò)誤 編譯錯(cuò)誤指單擊了“啟動(dòng)”按鈕， VB 開(kāi)始運(yùn)行程序前，先編譯執(zhí)行的程序段時(shí)產(chǎn)生的錯(cuò)誤。即在脫離 VB 運(yùn)行環(huán)境的情況下，用戶也可以使用本系統(tǒng)。通過(guò) SQL 語(yǔ)言在繳費(fèi)表中查找用戶名和輸入姓名相同的每一個(gè)信息項(xiàng)來(lái)顯示的。單擊 [移除用戶 ]按鈕， 首先判斷要?jiǎng)h除的用戶信息不能為空，然后將其從用戶信息表 及繳費(fèi)表 中刪除。通過(guò)單擊現(xiàn)在交費(fèi)開(kāi)通復(fù)選框后，使框架內(nèi)的組合框及文本框能夠使用 。 之后判斷密碼及確認(rèn)密碼是否相同，如果不同顯示提示信息。 齊齊哈爾大學(xué)畢業(yè)設(shè)計(jì)（論文）用紙 33 第 5 章 主要 程序設(shè)計(jì) 思路 5． 1 登陸的設(shè)計(jì) 登陸窗體中，操作員是在組合框內(nèi)顯示的，密碼為空（文本框的TEXT 屬性為空），所以首先從“操作員表”中找出所有操作員來(lái)，如果找不到則顯示提示信息，否則把找到的操作員按順序添加到組合框中 顯示。 首先，在 WORD 文檔中輸入幫助信息，之后將其另存為 .html 文件格式，之后利用“ CHM 制作精靈”軟件將其轉(zhuǎn)換為 .chm 格式的文件。 在從 [工程 ]菜單中 選擇 [添加 Data Report]命令 ，在屬性窗口中設(shè)置DataSource為數(shù)據(jù)環(huán)境 DataEnviroment1對(duì)象， DataMember為 Command1對(duì)象，即指定數(shù)據(jù)報(bào)表設(shè)計(jì)器 DataReport1 的數(shù)據(jù)來(lái)源 。 3． 制作報(bào)表的步驟： 從 [工程 ]菜單中 選擇 [添加 Data Enviroment]命令 ， 在當(dāng)前工程內(nèi)加入一個(gè) DataEnvironent1 對(duì)象。 頁(yè)標(biāo)頭 —— 每頁(yè)有一個(gè)，即每頁(yè)的表頭，如字段名。 圖 418 欠費(fèi)查詢窗體 21． 月清零 窗體及其控件設(shè)計(jì) 在工程資源管理器中右擊，選擇 [添加 ]→ [添加窗體 ]命令，名稱為Frmyq0，窗體布局 如 圖 419 所示。設(shè)置 Adodc 的 RecordSource 屬性輸入命令文本為“ select * from 繳費(fèi)表”。將其添加到窗體上，名稱為 Adodc1， Backcolor 為淺粉色，Caption 為“查詢”。 圖 415 收費(fèi)設(shè)置窗體 齊齊哈爾大學(xué)畢業(yè)設(shè)計(jì)（論文）用紙 28 18． 費(fèi)用查詢 窗體及其控件設(shè)計(jì) 在工程資源管理器中右擊 ，選擇 [添加 ]→ [添加窗體 ]命令，名稱為Frmfycx，窗體布局 如 圖 416 所示。 圖 413 姓名查詢窗體 齊齊哈爾大學(xué)畢業(yè)設(shè)計(jì)（論文）用紙 27 16． 查詢用戶 窗體及其控件設(shè)計(jì) 在工程資源管理器中右擊 ，選擇 [添加 ]→ [添加窗體 ]命令，名稱為Frmcx，窗體布局見(jiàn)圖所示。 齊齊哈爾大學(xué)畢業(yè)設(shè)計(jì)（論文）用紙 25 圖 410 開(kāi)機(jī)窗體 12． 移機(jī) 窗體及其控件設(shè)計(jì) 在工程資源管理器中右擊 ，選擇 [添加 ]→ [添加窗體 ]命令，名稱為Frmkytgw1，窗體布局 如 圖 411 所示。 圖 46 初始用戶錄入窗體 齊齊哈爾大學(xué)畢業(yè)設(shè)計(jì)（論文）用紙 23 8． 新裝錄入 窗體及其控件設(shè)計(jì) 在工程資源管理器中右擊 ，選擇 [添加 ]→ [添加窗體 ]命令，名稱為Frmxzlr，窗體布局 如 圖 47 所示。雙擊“退出”按鈕輸入命令 Unload Me。添加 4 個(gè)標(biāo)簽名稱分別為 Label Label Label Label4，背景為淺粉色， Caption 屬性分別為“操作員：”、“密碼：”、“確認(rèn) 密碼：”、及“真實(shí)姓名”。 點(diǎn)擊插入窗格按鈕來(lái)插入窗格，共 4 個(gè)。輸入命令窗體名 .show 即可調(diào)用其它窗體。單擊 [下一個(gè) ]按鈕，標(biāo)題為“幫助”，名稱為 bangzhu，在快捷鍵中選 F1。單擊 [下一個(gè) ]按鈕，標(biāo)題為“打印用戶信息”，名稱為 dayonghu。 單擊 [下一個(gè) ]按鈕，標(biāo)題為“ 欠費(fèi)查詢”，名稱為qfcx。C)”，名稱為 shoufei。單擊 [下一個(gè) ]按鈕，標(biāo)題為“開(kāi)移停機(jī)過(guò)戶”，名稱為 yitingguo。單擊 [下一個(gè) ]按鈕，標(biāo)題為“初始用戶錄入”，名稱為chushi。單擊 [下一個(gè) ]按鈕，標(biāo)題為“退出系統(tǒng) (amp。單擊 [下一個(gè) ]按鈕，標(biāo)題為“增加操作員”，名稱為 zengjia。高度 Height 設(shè)為6525，寬度 Width 設(shè)為 7650。O)表示按 Alt+O 可直接執(zhí)行“確定”按鈕中的命令?！懊艽a”后添加一個(gè)文本框，名稱為 Text1，背景為綠色。 3． 登陸窗體及其控件設(shè)計(jì) 打開(kāi) vb，新建窗體，將其名稱改為 Frmdenglu，將其 Caption 屬性設(shè)置為“登陸”，背景 Backcolor 設(shè)置為淺紫色，高度 Height 設(shè)為 2370，寬度 Width 設(shè)為 36