[發問] 提取"userform"里使用的圖片文件

mhl9mhl9

求教:請教老師教教我如何才能提取"userform"里使用的圖片文件.
我自己找的"點陳圖"size太大,我的userform用multypage(有5頁),用了5張大size圖片做背景,結果74k的文件變成1074k.羅命.
找到一個userform的背景圖,size不大,但我不知道如何提取那個userform的背景圖文件.
謝謝幫忙!!!

GBKEE

回復 1# mhl9mhl9

1. Option Explicit
   
2. Private Sub UserForm_Initialize() '表單初始化時的程式
   
3. Me.Picture = LoadPicture(pathname) '提取那個userform的背景圖文件
   
4. End Sub
   
5. '** Picture 屬性
   
6. '** 語法
   
7. '** Object.Picture = LoadPicture(pathname)
   
8. '** Picture 屬性的語法具有以下幾個單元:
   
9. '** 單元 說明
   
10. '** object 必要的引數。指一個有效物件。
    
11. '** pathname 必要的引數。圖形檔的完整路徑。

複製代碼

mhl9mhl9

回復 2# GBKEE

可能我沒有把自己的要求講清楚,我有一個文件里有一userform,它的背景圖很好,我想取出用在其他userform里,我沒有圖片文件,用你的方法試了,取不出圖片.
還是要謝謝你.

GBKEE

回復 3# mhl9mhl9
要高手幫忙了,因我也取不出圖片.