Board logo

標題: [發問] 有關image圖片顯示問題!!!! [打印本頁]
作者: afu9240    時間: 2018-5-16 17:23     標題: 有關image圖片顯示問題!!!!

請教各位前輩!!!!
請問一下image一定要有一個CommandButton去控制圖片才會顯示,,,請問有什麻方法可以show userform1時,image內的圖片自動顯示嗎??...求協助 謝謝


Private Sub CommandButton1_Click()
    Image1.Picture = LoadPicture("C:\PCA-7039\20180516.jpg")
End Sub
作者: nolookyou    時間: 2018-5-17 09:18

回復 1# afu9240


    請教版大~
    您要的效果像影片這樣嗎?
    [attach]28723[/attach]
作者: afu9240    時間: 2018-5-17 09:53

回復 2# nolookyou


    感謝n大回覆  感謝*2000
不過您的檔案我這邊好像無法開啟 ,不知是有鎖定還是內容無法開啟!!!!!
作者: nolookyou    時間: 2018-5-17 10:19

回復 3# afu9240


    我把影片改放我自己的google雲端硬碟，
    麻煩版大試連看看
   
    https://drive.google.com/file/d/1Sdmk9OQDhsZkCvd1YkTkAaImeIkjZtHb/view?usp=sharing
作者: afu9240    時間: 2018-5-17 10:34

回復 4# nolookyou


    感謝n大回覆,感謝*2000
  userform1.show直接可以看到iamge圖片,,我就是要這種方式,想請問這樣要如何設定,code哪裡要做修改嗎???煩請n大協助 感謝*2000
作者: Hsieh    時間: 2018-5-17 10:54

回復 1# afu9240
表單初始化事件
  1. Private Sub UserForm_Initialize()
  2. Me.Image1.Picture = LoadPicture("C:\PCA-7039\20180516.jpg")
  3. End Sub
複製代碼
作者: nolookyou    時間: 2018-5-17 10:55

回復 5# afu9240


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

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

    關鍵程式碼段落這寫在下面，有2段，分別是 CommandButton1_Click() 與 UserForm_Initialize()
  1. '寫在工作表1裡面
  2. Private Sub CommandButton1_Click()
  3.     UserForm1.Show
  4. End Sub

  6. '寫在表單UserForm1裡面
  7. Private Sub UserForm_Initialize()
  8.     Image1.Picture = LoadPicture("C:\PCA-7039\20180516.jpg")
  9. End Sub
複製代碼
作者: afu9240    時間: 2018-5-17 11:00

回復 6# Hsieh


    感謝超級版主回覆 感謝*2000

  我又忘了初始化的部分....感謝
作者: afu9240    時間: 2018-5-17 11:00

回復 7# nolookyou

感謝n大協助 ,,,,,我忘了初始化的部分 感謝*2000  謝謝
作者: nolookyou    時間: 2018-5-17 11:18

回復 9# afu9240


    寫程式就是這樣，忘是正常的，熱血多練習寫多次一點就會越來越熟，
    等到版大練到有一天突然覺得，
    阿!!!我可以來幫其他論壇網友解問題了的時候，
    那就是版大獲得初步成就的時候
   
    加油喔，你可以 der~~^^
作者: jeffrey628litw    時間: 2018-6-11 21:30

回復 1# afu9240


    版大請問是像這樣嗎?

[attach]28818[/attach]

[attach]28817[/attach]
作者: afu9240    時間: 2018-6-12 13:22

回復 11# jeffrey628litw


    謝謝J大回覆,感謝*20000



歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)