想請問在vb中如何產生一個圖檔(.jpg),在畫面上畫圖後,再儲存檔案。我的程式碼如下,這樣的作法是可以,但產生出的檔案都只能在我的程式中讀出,而不能由小畫家開啟。到底該做什麼設定才好呢?謝謝回答囉....
FileNum = FreeFile
Open "c:\e1.jpg" For Binary As #FileNum
OLE1.FileNumber = FileNum
OLE1.SaveToFile (FileNum)
Close #FileNum
MsgBox ("存檔成功!")
Exit Sub
FileNum = FreeFile
Open "c:\e1.jpg" For Binary As #FileNum
OLE1.FileNumber = FileNum
OLE1.SaveToFile (FileNum)
Close #FileNum
MsgBox ("存檔成功!")
Exit Sub
全站熱搜
留言列表