【正文】 ActiveX 控件是對 Visual Basic 內(nèi)部控件集合的擴充 。 例如：ADO Data控件 ， 它是 Data控件的功能擴充 ， 可使 Visual Basic具有更強的數(shù)據(jù)訪問能力 。 應該講 ， Visual Basic的諸多強大功能正是依靠 ActiveX 控件獲得的 。 經(jīng)常使用的 ActiveX 控件有： ADO Data 、 數(shù)據(jù)組合 、 數(shù)據(jù)列表 、 DataGrid 、 公共對話框 、 RichTextBox 等 。 ADO Data 在使用 ADO Data 控件之前需要在 “ 部件 ” 對話框中 ， 選擇“ Microsoft ADO Data Control‖選項 ， 將其引入到工具箱 。 如同 Data 控件 ， ADO Data 控件也是通過屬性實現(xiàn)了對數(shù)據(jù)源的連接 。 其用于連接的關(guān)鍵屬性是： ConnectionString屬性 設置數(shù)據(jù)源連接方式 。 RecordSource屬性 設置記錄源類型 、 組成 。 DataCombo 、 Data List 控件 為了使用 DataCombo 和 Data List 控件 ， 需要在 “ 部件 ” 對話框中 ， 選擇 “ Microsoft DataList Controls‖選項 。 DataCombo 和 DataList 控件與標準列表框 、 組合框控件極為相似 ， 其不同在于 DataCombo 、 DataList 控件具有更強的數(shù)據(jù)綁定能力 。 DataCombo 、 DataList 控件能實現(xiàn)兩方面的數(shù)據(jù)綁定 。 其一方面 ， 可以通過 DataSource、 DataField屬性綁定到其將產(chǎn)生影響的目標數(shù)據(jù)的某個字段；另一方面 ， 還可以通過 RowSource、ListField屬性綁定到其列表所需數(shù)據(jù)的某個字段 。 DataGrid 要用 DataGrid 控件 ， 需要在 “ 部件 ” 對話框中 ， 選擇“ Microsoft DataGrid Control‖到工具箱 。 DataGrid 控件是一種類似于電子數(shù)據(jù)表的綁定控件 ， 可以顯示一系列行和列來表示記錄集合的記錄和字段 。 DataGrid 控件數(shù)據(jù)訪問功能極強 ， 但使用卻非常簡單 。在設計時只需要設置了它的 DataSource 屬性 ， 則其就會用數(shù)據(jù)源的記錄集來自動填充該表格 ， 和自動設置該控件的列標頭 。 CommonDialog（公共對話框） 要使用公共對話框 ， 需要在 “ 部件 ” 對話框中 ， 選擇 “ Microsoft CommonDialog Control‖到工具箱 。 公共對話框控件提供一組標準的操作對話框 ， 進行諸如打開和保存文件 ， 設置打印選項 ， 以及選擇顏色和字體等操作 。 方法 顯示的對話 ShowOpen 打開 ShowSave 另存為 ShowColor 顏色 ShowFont 字體 ShowPrinter 打印 ShowHelp 調(diào)用 Windows―幫助 ” RichTextBox 要使用 RichTextBox 控件 ， 需要在 “ 部件 ” 對話框中 ， 選擇 “ Microsoft RichTextBox Control‖到工具箱中 。 RichTextBox 控件和標準文本框類似 ， 標準 TextBox 控件用到的所有屬性 、 事件和方法 ， RichTextBox 控件幾乎都能支持 ， 例如 MaxLength 、 MultiLine 、 ScrollBars 、 SelLength、 SelStart 和 SelText。 RichTextBox 控件能以 rtf 格式和普通 ASCII 文本格式這兩種形式打開和保存文件 。 可以使用控件的方法（ LoadFile 和 SaveFile） 打開和保存文件 。 設計菜單 菜單能夠有效改善用戶界面 。 它是用戶界面設計中一個非常重要的內(nèi)容 。 菜單具有多種不同的形式 ， 其中： 標準 下拉菜單 、 彈出式菜單 是最常見的菜單形式 。 標準下拉菜單 標準下拉菜單的構(gòu)成包括：菜單欄 、 菜單標題 、 菜單列表 、 菜單項等成分 ， 它們按照層次關(guān)系合理組織 。 標準下拉菜單的操作特點是：當單擊一個菜單標題 （ 如 “ 文件 ” ）后 ， 包含菜單項目的列表就被拉下來 。 菜單屬性 Visual Basic中的菜單也是對象 。 菜單中各個成分都可以被當作為控件對象 ， 并具有和命令按鈕相似的屬性 。 其主要屬性有： Name屬性 必須設置的菜單對象標識符 。 Caption屬性 菜單對象標題 。 Index屬性 菜單控件數(shù)組中元素的索引標識號 。 Checked屬性 設置是否在菜單項旁出現(xiàn)復選標記 。 Enabled屬性 設置菜單對象是否有效 。 Visible屬性 設置菜單對象是否可見 。 用菜單編輯器創(chuàng)建菜單 在 Visual Basic 環(huán)境下可以通過菜單編輯器建立菜單 。 菜單編輯器中的控件列表框列出當前窗體的所有菜單控件 。通過單擊 “ 插入 ” 按鈕可以在現(xiàn)有的控件之間增加一個菜單控件 ， 該控件會在菜單控件列表框中顯示 。 彈出式菜單 彈出式菜單是獨立于菜單欄而顯示在窗體上的浮動菜單 。 在彈出式菜單上顯示的項目取決于按下鼠標右鍵時指針所處的位置；因而 ， 彈出式菜單也被稱為上下文菜單 。 彈出式菜單實質(zhì)上既是下拉菜單中某個菜單標題下的菜單項列表 ， 只是激活方式不同而已 。 為了顯示彈出式菜單 ， 可使用 PopupMenu 方法 。 該方法使用語法如下： [object.]PopupMenu menuname [, flags [,x [, y [, boldmand ]]]] 創(chuàng)建工具欄 （ 1） 一般情況下 ， 工具欄是用來配合菜單 。 工具欄具有菜單所缺少的圖形化的外觀 ， 而且提供了比菜單更快速的訪問方式 。 因此 ， 利用工具欄與應用程序中最常用的菜單命令建立聯(lián)系 ， 由此可提高應用程序的用戶操作速度 。 為便于創(chuàng)建工具欄 ， Visual Basic的專業(yè)版與企業(yè)版專門提供了用于制作工具欄的 ToolBar 控件 。 創(chuàng)建工具欄 （ 2） 使用 ToolBar 控件創(chuàng)建工具欄的步驟如下： 1. 引入控件集 : 在 “ 部件 ” 對話框中 ， 選擇 “ Microsoft Common Controls ‖， 把 ToolBar 、 ImageList等控件引入到工具箱 。 2. 加入控件 : 從工具箱選取 ToolBar 、 ImageList控件到設計窗體 。 3. 向 ImageList 控件置入合適的圖象 。 4. 建立 ImageList與 Toolbar 之間的關(guān)聯(lián) 。 5. 在 Toolbar 中建立按鈕 。 對話框 對話框分模式或無模式兩種類型 。 如果一個對話框 ， 在可以切換到其它窗體或?qū)υ捒蛑耙笙葐螕?“ 確定 ” 或 “ 取消 ” ， 則它就是模式的 。 一般情況下 ， 顯示重要消息的對話框總應當是模式的 ， 它要求程序在繼續(xù)運行之前 ， 必須對提供消息的對話框作出響應 。 無模式的對話框允許在對話框與其他窗體之間轉(zhuǎn)移焦點而不用關(guān)閉對話框 。 因此 ， 當對話框正在顯示時 ， 可以在當前應用程序的其他地方繼續(xù)工作 。 無模式對話框用于顯示頻繁使用的命令與信息 。 使用預定義對話框 預定義的對話框是依靠函數(shù)來實現(xiàn)的 ， 有： InputBox 、MsgBox 兩個函數(shù) ， 分別用來提供輸入對話框和消息對話框 。 語法格式分別是： InputBox ( 提示字符串 [, 標題字符串 ] [, 文本框缺省字符串 ] ) MsgBox ( 提示字符串 [ , 按鈕數(shù)值 ] [ ,標題字符串 ] ) 使用自定義對話框 自定義對話框就是含有控件的窗體 ， 這些控件包括命令按鈕 、 選取按鈕和文本框 ， 它們可以為應用程序接收信息 。 可以按照以下操作來完成自定義對話框的制作 。 1. 通過設置窗體的 Caption 屬性 ， 為對話框加上合適的標題 。 2. 對話框通常不需要移動 、 改變尺寸 、 最大化或最小化等操作 。對話框邊框尺寸也往往是固定的 。 要達到以上效果 ， 可以通過設置 BorderStyle、 ControlBox、 MaxButton 和 MinButton 屬性獲得 。 3. 對話框必須至少包含一個退出該對話框的命令按鈕 。 通常用兩個命令按鈕 , 這兩個按鈕的 Caption 屬性設置 “ 確定 ” 與 “ 取消 ” 。 第 6章 事件驅(qū)動 第 7章 文件處理和輸出打印 第 8章 程序管理、編輯和調(diào)試 第 9章 創(chuàng)建應用程序 第 10章 圖形、多媒體 第 11章 數(shù)據(jù)庫應用 第 12章 Visual Basic其它功能 實例教學 課件說明 本課件是中國水利水電出版社發(fā)行的專系列教材之一 《 Visual Basic 程序設計教程 》的電子教學配套資料?？捎糜诮處熼_展本課程的多媒體教學。 多媒體課件內(nèi)容包括：課程教學和實例演示兩個部分。其中，實例內(nèi)容取自教材中的三個典例，本課件含這些典例的源程序和 課件說明 經(jīng)過編譯后的程序。因此，本課件實例內(nèi)容也可以用做學生上機實踐素材。但為使用好其中的實例，需要安裝 Visual Basic 專業(yè)版或企業(yè)版。 本課件采用開放式結(jié)構(gòu) ， 因此教師可以根據(jù)自己的實際教學需要進行補充或改動。 程序設計 Visual Basic 制作人：張晉宇 2022 年 8 月