• 沒有找到結果。

2-2.20 OLE(物件連結和嵌入)控制物件

在文檔中 陳致中老師VB6電子書 (頁 73-78)

圖 2:解決方式之一,利用資料庫本身的工具轉換成舊版本的格式

圖 3:執行結果

2-2.20 OLE(物件連結和嵌入)控制物件

如果元件支援『物件連結和嵌入』(OLE),可以不用任何程式碼就把物件 連結或嵌入應用程式,OLE 收納器控制項為使用物件的視覺化介面提供了最 大的靈活性。使用 OLE 收納器控制項,可以包括下列幾項特點:

1. 在應用程式中為物件建立一個預留位置。在執行階段建立出現在 OLE 收納 器控制項中的物件,或者改變已在設計階段置於 OLE 收納器控制項的物件。

2. 在應用程式中建立連結物件。

3. 將 OLE 收納器控制項與資料庫連結。

1. 先設定 Data 控制項 相關的屬性。

2. 再設定 TextBox 控制項的 屬性,如下:

設 DataSource 為 Data1 物件名稱。

設 DataField 為工作表 內的欄位名稱(設定順 序不可以顛倒)。

2

2

屬 性 說 明

17 更新物件支援的動作清單。 FetchVerbs 18 將物件以 OLE1.0 的檔案格式儲存。 SaveToOle1File AutoActivate

(自動啟動)

sourcedoc 必要的。將文件的檔案名稱當作內嵌物件的範本來使用。如 果不指定來源文件,它必須是一個長度為零的字串("")。

2

我們下面將介紹使用 OLE 收納器控制項的相關應用,第一個範例是播放 自己錄製的聲音(註:聲音須先錄製,若不會使用附屬應用程式下的『錄音程式』,請自 行參閱光碟的多媒體教學),第二個範例是介紹如何開啟預設的 Excel 檔案。

請參閱光碟 EX2-2.20 資料夾(OLE 的應用_聲音篇)內容,當我們按 下 CommandButton 所製作的按鈕,會發出自己所錄製的聲音。

註:當我們利用『OLE』物件建立於表單上,會出現如(圖 1)的畫面,並選擇『Wave Sound』物件類型,然後按『確定』鈕,此時會自動出現如(圖 2)錄音程式的畫 面(若之前已錄製,可直接關閉),最後只要撰寫兩行程式即可,請參考(圖 3),

其中 『App.Path』表示目前聲音檔案實際路徑(請先將程式存檔,並與聲音檔案放 置在相同資料夾內,否則會找不到檔案而出現錯誤)。

圖 1:選擇插入的物件類型

圖 2:自動開啟錄音程式 (Windows 作業系統的內建程式)

2

圖 3:程式與執行結果

請參閱光碟 EX2-2.20 資料夾(OLE 的應用_Excel 篇)內容,當我們 按下 CommandButton 所製作的按鈕,會自動開啟預設的 Excel 檔案

(test.xls)。

註: 當我們利用『OLE』物件建立於表單上,不選擇任何物件類型,直接按『取消』鈕,

然後再設定 OLE 物件的 Class 屬性,會出現如(圖 4)的畫面,並選擇 Excel.Sheet.8 類別,但會因為 Excel 版本不同而有所差異,最後只要撰寫三行程式碼即可,請參 考(圖 5),請務必先將程式存檔,並與 Excel 檔案放置在相同資料夾內,否則會 因為找不到檔案而出現錯誤。還有另一種聯結設定方式,請直接參考光碟多媒體教 學說明。

圖 4:選擇插入的物件類別 圖 5:程式與執行結果 按一下,

聽聽自己 的聲音!

在文檔中 陳致中老師VB6電子書 (頁 73-78)