返回列表 上一主題 發帖

如何在自定表單中開啟JPG檔案

icestormer

帖子
127 
主題
28 
精華
0 
積分
160 
點名
0  
作業系統
W7 
軟體版本
2003 
閱讀權限
20 
性別
男 
註冊時間
2010-11-1 
最後登錄
2017-5-20 
1# 跳轉到 »
發表於 2012-5-12 10:21 | 顯示全部帖子
回復 1# hbjang


   不知你的做法是不是跟我做的一樣

我的是這樣
1:表單上有一個  Image1 (用來顯示JPG檔的圖像用)
2:在commandbutton 內寫上

Private Sub CommandButton4_Click()
  mypic = "C:\Users\user\Desktop\XXX.jpg" '原始圖像路徑及檔名 XXX是圖像檔名
       Image1.Picture = LoadPicture(mypic) '載入原始設定圖像檔
end sub

TOP

icestormer

帖子
127 
主題
28 
精華
0 
積分
160 
點名
0  
作業系統
W7 
軟體版本
2003 
閱讀權限
20 
性別
男 
註冊時間
2010-11-1 
最後登錄
2017-5-20 
2#
發表於 2012-5-12 20:05 | 顯示全部帖子
回復 5# hbjang


  很高興有幫助到你.不過別叫我大大..我也是VBA新手一枚..

TOP

        靜思自在 : 做好事不能少我一人，做壞事不能多我一人。
返回列表 上一主題