截屏之后，如何用從系統剪貼板上獲取圖片資料，并生成jpg檔案
期待高手，第一次發帖。有什么沒說清楚的，多多包含。
最好是VBS實作。
uj5u.com熱心網友回復：
Private Sub Command1_Click()
Dim PIC As New StdPicture
Set PIC = Clipboard.GetData
SavePicture PIC, App.Path & "\PIC.jpg"
End Sub
使用VB的Clipboard物件就可以實作了
uj5u.com熱心網友回復：
如何實作截屏的，樓主能否告知一下uj5u.com熱心網友回復：
你的意思是用printScreen鍵截屏后，在你的程式里面顯示，然后匯出jpg？uj5u.com熱心網友回復：
Dim PIC As New StdPictureSet PIC = Clipboard.GetData
uj5u.com熱心網友回復：
要保存成JPG格式，你需要一個專門的BMP－>JPG轉換程式uj5u.com熱心網友回復：
這只是獲得了 位圖資料而已！
你用 .jpg為擴展名保存圖片，它表面上看起來是 jpg圖片，但實際上它仍然是 BMP的圖片。
正如5F所說，還要 BMP轉JPEG的程序才行的。
uj5u.com熱心網友回復：
Dim PIC As StdPicture'不需要newSet PIC = Clipboard.GetData
uj5u.com熱心網友回復：
Private Sub Command1_Click()
Dim PIC As New StdPicture
Set PIC = Clipboard.GetData
SavePicture PIC, App.Path & "\PIC.bmp"
Shell "alchemy.exe -j "+App.Path + "\PIC.bmp "+App.Path + "\PIC.jpg",vbHide
End Sub
http://www.handmade.com
uj5u.com熱心網友回復：
別人的電腦上都沒有alchemy.exe 這個檔案，你的代碼能運行嗎？
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/153414.html
標籤：VBA