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