有關image圖片顯示問題!!!! - Excel程式區

帖子: 65
主題: 18
精華: 0
積分: 71
點名: 0
作業系統: WINXP、7、10、SERVER2012
軟體版本: Office 2010-2016
閱讀權限: 20
性別: 男
註冊時間: 2011-1-27
最後登錄: 2025-5-4

1^# 跳轉到 »

發表於 2018-5-17 09:18 | 顯示全部帖子

回復 1# afu9240

請教版大~
您要的效果像影片這樣嗎?

0517.rar (304.33 KB)

帖子: 65
主題: 18
精華: 0
積分: 71
點名: 0
作業系統: WINXP、7、10、SERVER2012
軟體版本: Office 2010-2016
閱讀權限: 20
性別: 男
註冊時間: 2011-1-27
最後登錄: 2025-5-4

2^#

發表於 2018-5-17 10:19 | 顯示全部帖子

回復 3# afu9240

我把影片改放我自己的google雲端硬碟，
麻煩版大試連看看

https://drive.google.com/file/d/1Sdmk9OQDhsZkCvd1YkTkAaImeIkjZtHb/view?usp=sharing

帖子: 65
主題: 18
精華: 0
積分: 71
點名: 0
作業系統: WINXP、7、10、SERVER2012
軟體版本: Office 2010-2016
閱讀權限: 20
性別: 男
註冊時間: 2011-1-27
最後登錄: 2025-5-4

3^#

發表於 2018-5-17 10:55 | 顯示全部帖子

回復 5# afu9240

我把比較詳細的程式碼設計內容用在影片裡面，連結如下：

https://drive.google.com/file/d/1nYWv8V3b4iPtwBW603Sa9bU6dc5gUDAE/view?usp=sharing

關鍵程式碼段落這寫在下面，有2段，分別是 CommandButton1_Click() 與 UserForm_Initialize()

'寫在工作表1裡面
Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
'寫在表單UserForm1裡面
Private Sub UserForm_Initialize()
Image1.Picture = LoadPicture("C:\PCA-7039\20180516.jpg")
End Sub

複製代碼

帖子: 65
主題: 18
精華: 0
積分: 71
點名: 0
作業系統: WINXP、7、10、SERVER2012
軟體版本: Office 2010-2016
閱讀權限: 20
性別: 男
註冊時間: 2011-1-27
最後登錄: 2025-5-4

4^#

發表於 2018-5-17 11:18 | 顯示全部帖子

回復 9# afu9240

寫程式就是這樣，忘是正常的，熱血多練習寫多次一點就會越來越熟，
等到版大練到有一天突然覺得，
阿!!!我可以來幫其他論壇網友解問題了的時候，
那就是版大獲得初步成就的時候

加油喔，你可以 der~~^^