【正文】 Visual Basic編程及實例分析教程 1 Visual Basic編程及實例分析教程 主講：鄭海春 Visual Basic編程及實例分析教程 2 緒論 為什么要學這么課程？ 學習這么課程對以后的學習有何幫助？ Visual Basic編程及實例分析教程 3 章節(jié)結構 第一章： Visual Basic概述 第二章： Visual Basic編程起步 第三章： Visual Basic語言基礎 第四章： Visual Basic程序結構 第五章： 應用程序用戶界面 第六章： 多重窗體與多文檔界面 第七章： Visual Basic文件系統(tǒng) 第八章： Visual Basic圖形操作 第九章： 創(chuàng)建和使用自定義類 第十章： Windows API編程 第十一章： 程序調試與錯誤處理 第十二章： Visual Basic數(shù)據(jù)庫編程 第十三章： 學生信息管理系統(tǒng)開發(fā)實例 Visual Basic編程及實例分析教程 4 第六章 多重窗體與多文檔界面 本章內容 掌握 VB的多重窗體應用程序的設計方法 掌握多文檔（ MDI）界面應用程序的設計方法 Visual Basic編程及實例分析教程 5 多重窗體應用程序設計 多文檔界面應用程序設計 小結 習題 本 章 目 錄 Visual Basic編程及實例分析教程 6 多重窗體應用程序設計 添加多重窗體 ： 多重窗體應用程序的工程包含多個普通窗體，其中的第一個窗體是在建立工程時由系統(tǒng)自動添加的。其余的窗體則要在設計界面時添加。 設置啟動對象： 在程序運行時，首先被加載并執(zhí)行的對象，稱為程序的啟動對象。 多重窗體實際就是工程中包含多個普通窗體，每個窗體的用法和特點與前一章介紹的窗體一樣。 Visual Basic編程及實例分析教程 7 應用實例 【 例 】 編寫一簡單的學生成績處理程序，實現(xiàn)學生成績的輸入、計算和評價的功能。分析：本程序需要用到三個窗體和一個標準模塊文件。這三個窗體分別為主窗體、輸入成績窗體和計算成績窗體。標準模塊用來定義保存學生成績的全局變量和對學生成績等級進行評價的全局函數(shù)。 (1)窗體設計界面如圖所示。 Visual Basic編程及實例分析教程 8 (2) 有關屬性的設置。 工程、主窗體及控件屬性值設置 對象 屬性 設置值 對象 屬性 設置值 工程 Name(名稱 ) prjStuScore 命令按鈕 Name(名稱 ) cmdInput 主窗體 Name(名稱 ) frmMain Caption 輸入成績 BorderStyle 1Fixed Single 命令按鈕 Name(名稱 ) cmdCompute Caption 學生成績處理程序 Caption 計算成績 Icon c:\ MutiForm\chengji.ico 命令按鈕 Name(名稱 ) cmdExit 標簽 Caption 學生成績處理程序 Caption 退出 FontName 楷體 _GB2312 圖像框 Picture c:\ MutiForm\ FontSize 小三 BorderStyle 1Fixed Single Visual Basic編程及實例分析教程 9 輸入成績窗體及控件屬性值設置 對象 屬性 設置值 對象 屬性 設置值 輸入成績窗體 Name(名稱 ) frmInput 文本框 Name(名稱 ) txtChi BorderStyle 1Fixed Single Text Caption 輸入成績 標簽 Caption 英語： ControlBox False 文本框 Name(名稱 ) txtEng 框架 Caption 學生成績 Text 標簽 Caption 數(shù)學： 標簽 Caption 政治： 文本框 Name(名稱 ) txtMath 文本框 Name(名稱 ) txtEng Text Text txtPol 標簽 Caption 語文： 命令按鈕 Name(名稱 ) cmdBack Caption 返回 Visual Basic編程及實例分析教程 10 計算成績窗體及控件屬性值設置 對象 屬性 設置值 對象 屬性 設置值 計算成績窗體 Name(名稱 ) frmCompute 標簽 Caption 平均成績： BorderStyle 1Fixed Single 文本框 Name(名稱 ) txtAve Caption 計算成績 Text ControlBox False 標簽 Caption 等級： 框架 Caption 計算與評價 文本框 Name(名稱 ) txtLevel 標簽 Caption 總分： Text 文本框 Name(名稱 ) txtTotal 命令按鈕 Name(名稱 ) cmdBack Text Caption 返回 Visual Basic編程及實例分析教程 11 (3)代碼編寫 在主窗體 frmMain的代碼窗口編寫如下程序代碼： Option Explicit Private Sub cmdCompute_Click() 39。計算成績 Unload Me : End Sub Private Sub cmdExit_Click() 39。退出 End End Sub Private Sub cmdInput_Click() 39。輸入成績 Unload Me : End Sub Visual Basic編程及實例分析教程 12 在輸入成績窗體 frmInput的代碼窗口編寫如下程序代碼： Option Explicit Private Sub cmdBack_Click() 39。返回 39。保存成績到全局變量中 m_Math = Val() : m_Chi = Val() m_Eng = Val() : m_Pol = Val() 39。卸載本窗體 Unload Me 39。加載并顯示主窗體 End Sub Visual Basic編程及實例分析教程 13 在計算成績窗體 frmCompute的代碼窗口編寫如下程序代碼： Option Explicit Private Sub cmdBack_Click() 39。返回 Unload Me : End Sub Private Sub Form_Load() 39。計算總分 = m_Math + m_Chi + m_Eng + m_Pol 39。計算平均成績 = Val() / 4 39。計算等級 = ScoreLevel(Val()) End Sub Visual Basic編程及實例分析教程 14 在標準模塊 Common的代碼窗口編寫如下程序代碼： Option Explicit 39。定義用于存儲數(shù)學，語文，英語，政治成績的公有變量 Public m_Math!, m_Chi!, m_Eng!, m_Pol! Public Function ScoreLevel(x As Single) As String 39。評定等級共有通用函數(shù) ,參數(shù)為平均成績 Select Case x Case Is = 90 ScoreLevel = 優(yōu)秀 Case Is = 80 ScoreLevel = 良好 Case Is = 70 ScoreLevel = 中等 Case Is = 60 ScoreLevel = 及格 Case Else ScoreLevel = 不及格 End Select End Function Visual Basic編程及實例分析教程 15 (4)設置好界面和屬性后，請在工程的屬性對話框中將主窗體 frmMain設置為啟動對象，然后運行程序 Visual Basic編程及實例分析教程 16 多文檔界面應用程序設計 MDI應用程序的創(chuàng)建 – 創(chuàng)建 MDI窗體 1. 新建一個標準 EXE工程。 2. 單擊“工程”菜單下的“添加 MDI窗體”命令，打開“添加 MDI窗體”對話框。 3. 在“新建”選項卡中，選擇“ MDI窗體”圖標，單擊“打開”按鈕 – 創(chuàng)建子窗體 用戶界面樣式主要有兩種：單文檔界面和多文檔界面。 SDI界面的一個示例就是 Microsoft Windows中的 NotePad（記事本）應用程序。 但絕大多數(shù)基于 Windows的應用程序都是 MDI界面。 Visual Basic編程及實例分析教程 17 MDI窗體及其子窗體的加載 可以在 MDI窗體的 Click事件中加入代碼： Private Sub MDIForm_Click() 0 End Sub 修改 MDI窗體的 Click事件過程，使其當改變子窗體 Form1的 “ Caption”屬性時，可自動顯示該子窗體，代碼如下： Private Sub MDIForm_Click() = True : = 我是子窗體 End Sub Visual Basic編程及實例分析教程 18 MDI窗體及其子窗體的操作 1. 移動窗體 2. 最大化子窗體 3. 最小化子窗體 MDI窗體的常用屬性、方法和事件 1. ActiveForm屬性 2. ActiveControl屬性 3. Arrange方法 4. QueryUnload事件 Visual Basic編程及實例分析教程 19 應用實例 【 例 】 設計一個 MDI記事本程序。 (1)窗體設計界面如圖所示。 Visual Basic編程及實例分析教程 20 (3)代碼編寫 (見教材 ) (4)運行結果如圖所示。 (2)屬性設置 (見教材 ) Visual Basic編程及實例分析教程 21 小結 本章主要對 VB的多重窗體和多文檔 （ MDI）界面應用程序的設計方法進行講述 ， 并給出了相應的具體應用實例 。 Visual Basic編程及實例分析教程 22 習題 簡答題 1. 文檔界面一般有哪幾中組織形式？簡述創(chuàng)建 MDI文檔界面的一般方法和步驟。 2. 試說明普通窗體、 MDI窗體、 MDI子窗體之間的區(qū)別？ 3. MDI子窗體能否單獨作為啟動窗體？當關閉 MDI子窗體時，其MDI窗體是否隨之關閉？ 4. 在 MDI窗體中，是否可放置其他控件？若能，哪些控件可以放在 MDI窗體上？ 5. 如何指定多文檔界面應用程序中的活動窗體？ Visual Basic編程及實例分析教程 23 第七章 Visual Basic文件系統(tǒng) 本章內容 了解文件的結構及類型。 掌握不同類型文件的讀寫操作。 掌握常用的文件操作函數(shù)和語句 Visual Basic編程及實例分析教程 24 文件結構及類型 文件操作 文件操作函數(shù)和語句 小結 習題 本 章 目 錄 Visual Basic編程及實例分析教程 25 文件結構及類型 文件是存儲在外部介質上的數(shù)據(jù)的集合： 文件結構 ： 計算機中，一般除一些內存駐留程序或正在執(zhí)行的程序及少量數(shù)據(jù)被裝入內存外，其余大量的程序和數(shù)據(jù)在外存中存放，必要時才被調入內存。那么當數(shù)據(jù)被調入、調出文件時，必須知道其存放的位置，否則很難查找相應的數(shù)據(jù)。為能有效的存放數(shù)據(jù)，就必須將數(shù)據(jù)以某種方式存儲起來，這種特定的存儲方式就是文件結構。 Visual Basic編程及實例分析教程 26 文件類型 1. 順序存取文件 2. 隨機存取文件 ?? ??記錄 n 1 記錄 n 記錄 n + 1分界字符 分界字符 分界字符 分界字符??記錄號 n 記錄號 n + 1字段 1 字段 2 ? 字段 1 字段 2 ? ??記錄 n 記錄 n + 1Visual Basic編程及實例分析教程 27 文件操作 順序文件的打開和關閉 順序文件的寫操作 順序文件的讀操作 Open 文件名 For Input|Output|Append As []文件號 Close [ []文件號 1