【文章內容簡介】 確定 】 按鈕，關閉 “ 部件 ” 窗口，被選中的 ActiveX控件就會出現在工具箱中。 ActiveX控件概述 第 10章 ActiveX控件的應用 進度條（ ProgressBar）控件通過在進度欄中顯示適當數目的矩形來指示 “ 工作 ” 進程，進程完成后，進程欄添滿矩形。 進度條常用的屬性如下： （ 1） Max屬性用于設置 ProgressBar控件的上界限。 （ 2） Min屬性用于設置 ProgressBar控件的下界限。 （ 3） Value屬性是控件的當前值。 （ 4）在 “ 屬性頁 ” 窗口，可設置 ProgressBar控件的專門屬性 。 ProgressBar控件 第 10章 ActiveX控件的應用 ProgressBar控件 例 101 創(chuàng)建一個窗體，設計一個 “ 計時翻譯器 ” ，程序的運行結果如圖所示。 演示程序 第 10章 ActiveX控件的應用 滑塊（ Slider）控件通過在刻度條中顯示適當數目的刻度來指示 “ 工作 ” 進程，或通過人工移動滑塊控制進程，滑塊移到刻度條最后，標志進程完成。 滑塊常用的屬性如下： （ 1） Max屬性、 Min屬性、 Value屬性與 ProgressBar控件相同。 （ 2）在 “ 屬性頁 ” 窗口，可設置 Slider控件的專門屬性。 TagStrip控件 第 10章 ActiveX控件的應用 TagStrip控件 例 102 創(chuàng)建一個窗體，設計一個 “ 滾動字幕 ” ，程序的運行結果如圖所示。 演示程序 第 10章 ActiveX控件的應用 選項卡（ SSTab）控件用于設置包含多個選項卡的窗體界面。 選項卡常用的屬性如下： （ 1） Style屬性用于設置選項卡樣式。 （ 2） Tab屬性用于設置 SSTab控件的當前選項卡。 （ 3） Tabs屬性用于設置 SSTab控件選項卡數。 （ 4） TabsPerRow屬性用于設置每一行上的選項卡數。 （ 5）在 “ 屬性頁 ” 窗口，可設置 SSTab控件的專門屬性。 SSTab控件 第 10章 ActiveX控件的應用 SSTab控件 例 103 創(chuàng)建一個窗體，求解任意數列的積、和、極值以及任意數的排序問題 ，程序的運行結果如圖所示。 演示程序 第 10章 ActiveX控件的應用 列表視圖 （ ListView） 控件用來顯示一列或多列項目列表 ， 同時也可顯示圖標和文本項目的列表 。 ListView控件比前面介紹的List控件要復雜得多 ， ListView控件是由ColumnHeader和 ListItem對象所組成的 ， 其中 ColumnHeader對象的個數決定了控件的列數 ， 而 ListItem對象的個數則決定了控件的行數 。 ListView控件 第 10章 ActiveX控件的應用 （ 1） ColumnHeader對象的 SubItemIndex屬性 SubItemIndex屬性用于返回與 ListView控件中ColumnHeader對象關聯的子項目的索引。 子項目是字符串數組，代表顯示在報表視圖中的ListItem對象的數據。 第一列的列標頭 SubItemIndex屬性設置為 0，這是因為小圖標和 ListItem對象的文字總出現在第一列中，而且它們被當作 ListItem對象而不是子項目。 ListView控件 第 10章 ActiveX控件的應用 （ 2） ListItem對象的 SubItems屬性 SubItems屬性用于返回或設置一個字符串（子項目）數組，它代表 ListView控件中 ListItem對象的數據。 （ 3） ListView控件的 View屬性 ListView控件可使用四種不同視圖顯示項目，這可以用View屬性來確定。 View屬性用于返回或設置 ListView控件中 ListItem對象的外觀。 （ 4） ListView控件的 SortOrder屬性 SortOrder屬性用于返回或設置一個值，此值決定ListView控件中的 ListItem對象以升序或降序排序。 ListView控件 第 10章 ActiveX控件的應用 （ 5） ListView控件的 SortKey屬性 SortKey屬性用于返回或設置一個值，此值決定ListView控件中的 ListItem對象如何排序。 （ 6） ListView控件的 Sorted屬性 Sorted屬性用于返回或設置確定 ListView控件中的ListItem對象是否排序的值。 （ 7）在 “ 屬性頁 ” 窗口，可設置 ListView控件的專門屬性。 ListView控件 第 10章 ActiveX控件的應用 （ 1） ColumnHeader對象的 Add方法 ([index],[key],[text],[width],[alignment]) 功能：為 ListItem對象多個的關聯項目添加列標頭。 （ 2） ListItem對象的 Add方法 ([index],[key],[text],[icon],[smallIcon]) 功能：添加 ListItem對象到 ListView控件的 ListItems集合中，并返回對新創(chuàng)建對象的引用。 （ 3） ListItem對象的 Remove方法 Remove (Index) 功能：刪除 ListView控件中的子項目。 ListView控件 第 10章 ActiveX控件的應用 ListView控件 例 104 創(chuàng)建一個窗體，以列表的形式輸入數據 ，程序的運行結果如圖所示。 演示程序 第 10章 ActiveX控件的應用 “樹 ” 視圖（ TreeView）控件用于創(chuàng)建具有節(jié)點層次風格的程序界面。在這個控件中，每個節(jié)點還可以包含若干個子節(jié)點，每個節(jié)點具有展開或折疊兩種風格。 樹 ” 視圖常用的屬性如下： （ 1） Expanded屬性 Expanded屬性用于設置節(jié)點是否被展開。 其中： Expanded屬性 True是將節(jié)點展開，否則將節(jié)點折疊。 （ 2）在 “ 屬性頁 ” 窗口，設置 TreeView控件的專門屬性。 TreeView控件 第 10章 ActiveX控件的應用 （ 1） Add方法的格式如下： Add([Relative]， [Relationship]， [Key] ， [Text [Image]]) As Node 功能：在任意點擊的 Node對象下建立一個分節(jié)點。 （ 2） Remove方法的格式如下： Remove index 功能：刪除點擊的 Node對象分節(jié)點。 （ 3） SelectedItem方法的格式如下： 功能：取得點擊的 Node對象的索引號。 TreeView控件 第 10章 ActiveX控件的應用 TreeView控件 例 105 創(chuàng)建一個窗體，以 “ 樹 ” 視圖風格瀏覽數據，程序的運行結果如圖所示。 演示程序 第 10章 ActiveX控件的應用 圖片修剪（ PictureClip）控件實現設置允許選擇圖像的區(qū)域，然后在窗體或圖片框中顯示選定區(qū)域的圖像的操作。 PictureClip控件運行時不可見，可以用Picture屬性將位圖（ .bmp）文件加載到 PictureClip控件中。 圖片修剪常用的屬性如下： （ 1） ClipX與 ClipY屬性用于設置選擇圖像的區(qū)域的左上角坐標。 （ 2） ClipHeight與 ClipWidth屬性用于設置選擇圖像的區(qū)域范圍。 （ 3）在 “ 屬性頁 ” 窗口，設置 PictureClip控件的專門屬性。 PictureClip控件 第 10章 ActiveX控件的應用 PictureClip控件 例 106 創(chuàng)建一個窗體，實現圖片裁剪功能 ，程序的運行結果如圖所示。 演示程序 Visual Basic 程序設計 李雁翎 清華大學出版社 文件管理 第 11章 本章要點 數據文件 順序文件 隨機文件 文件的操作 文件系統控件 應用實例 第 11章 文件管理 數據文件是存儲在外部介質上的相關信息的集合，其文件的擴展名為（ TXT）。 在 Visual BASIC系統中，對磁盤中的文件有打開、讀取、寫入、關閉等操作，對文件進行訪問操作，其一般流程如圖所示。 數據文件 打開 （ 建立 ） 文件 訪問文件 關閉文件 第 11章 文件管理 在這里所說的數據文件結構是指文件存儲的邏輯結構。文件結構是由用戶自己定義的。通常數據文件是由若干記錄組成的，而記錄又是由若干變量組成的，某一指定的記錄的指定變量對應一個具體的數據。 數據文件 第 11章 文件管理 順序文件（ Sequential File）是普通的文本文件。 順序文件以 “ 換行 ” 符為分隔符號，一行一條記錄，每個記錄可長可短。順序文件中的記錄按寫入的先后，依次地排列，讀寫文件記錄時，或存取文件記錄時，都必須按記錄順序逐個進行操作。若要查找或修改順序文件中的一個記錄，就必須從第一個記錄開始，依次讀取，直到找到要查找或修改的記錄方可操作。 順序文件 第 11章 文件管理 打開順序文件語句格式如下： Open 文件名 For [Input | Output | Append] As 文件號 [Len = 記錄長度 ] 功能：為文件的輸入 /輸出分配緩沖區(qū)，并確定文件的存取方式、文件號及記錄長度。 注意事項： （ 1）其中： Input：讀文件 ,Output：寫文件 ,Append：以追加方式寫文件。 （ 2） 文件號 ：是一個整數表達式，取值范圍為 1～ 511。 （ 3） 記錄長度 ：小于或等于 32767的整數，確定其數據緩沖區(qū)的大小。 順序文件 第 11章 文件管理 關閉順序文件語句格式如下： Close [[]文件號 ] [， []文件號 ]…… 功能：結束對順序文件的操作，把文件緩沖區(qū)中的所有數據寫入文件中，并釋放與該文件相關的 “ 文件號 ” 。 注意事項： （ 1） 文件號 是可選項，若省略此項，則把所有打開的數據文件全關閉，否則只關閉指定的文件。 （ 2）如果程序中沒有 Close語句，在程序結束時，系統將自動關閉所有打開的數據文件。 順序文件 第 11章 文件管理 將數據寫入文件語句格式如下： Print 文件號， [表達式列表 ] 功能：將數據寫入到指定的順序文件中。 讀文件數據語句格式如下： Write 文件號 ， [表達式列表 ] 功能：從指定的順序文件中讀數據。 順序文件 第 11章 文件管理 隨機文件（ Random Access File）是可以按任意次序讀寫的文件。 隨機文件每個記錄的長度必須相同，每個記錄都有其唯一的記錄號。隨機文件數據讀取是依靠記錄號進行操作。 打開隨機文件語句格式如下： Open 文件名 For Random As 文件號 [Len=記錄長度 ] 功能：以隨機模式打開文件，為文件的輸入 /輸出分配緩沖區(qū)，確定文件號及記錄長度。 隨機文件 第 11章 文件管理 關閉隨機文件與關閉順序文件語句相同。 將數據寫入文件語句格式如下： Put []文件號 ， [記錄號 ]， 變量名 功能：將數據寫入到指定的隨機文件中。 讀文件數據語句格式如下： Get []文件號 ， [記錄號 ]， 變量名 功能：從指定的隨機文件中讀數據。 隨機文件 第 11章 文件管理 文件的操作 文件操作語句 語句格式如下 : ChDrive 驅動器 功能：設置當前 驅動器 。 語句格式如下 : MkDir 目錄 功能：創(chuàng)建一個新的目錄。 語句格式如下 : ChDir 目錄 功能：設置當前 目錄 。 語句格式如下 : RmDir 目錄 功能：刪除一個已存在的空目錄。 第 11章 文件管理 文件的操作 文件操作函數