執行LoadPicture指令時出現錯誤

Private Sub Command1_Click()
Picture1.Picture = LoadPicture(App.Path & "\菊草葉.jpg")
End Sub

 

原因 : 沒有正確的存檔

解決方法 : 先將檔案和圖片存在同一個資料夾再執行。